<% Function Counts(CounterFile) Dim objFSO,objTS Application.Lock Set objFSO=Server.CreateObject("Scripting.FileSystemObject") Set objTS=objFSO.OpenTextFile(Server.MapPath(CounterFile),1,True) If Not objTS.AtEndOfStream Then Counts=CLng(objTS.ReadLine) End If Counts=Counts+1 objTS.Close Set objTS=objFSO.OpenTextFile(Server.MapPath(CounterFile),2,True) objTS.WriteLine(Counts) objTS.Close Application.Unlock End Function %> 南京信息工程大学图书馆-最新讯息  

  OA资源                     

64,IOP ERL


链接:http://iopscience.iop.org/collections

注:IOP ERL是英国皇家物理学会出版社(IOPP)电子期刊中环境科学方面的开放获取期刊,将环境变化及管理的相关研究、活动、政策及资讯整合在此期刊当中,学科领域包括生物多样性、气候变化、人口和环境、能源、环境和文化、环境与资源经济学、健康、政策分析、污染、科学和政治环境风险估等主題。

 

 

 

 

 

  

南京信息工程大学图书馆

2015年6月11日


本页被浏览次数:<%=Counts("CounterOAzy0001.txt")%>

关闭窗口

CopyRight© http://lib.nuist.edu.cn All Rights Reserved 2003

南京信息工程大学图书馆 版权所有