openfilecontent.asp

asp功能增强函数 本函数库是为了广大ASP后台开发人员而设计 本程序内不带任何广告代码 弥补了ASP相对与PHP的功能缺陷

<%

FunCtion OpenFileContent(FolderFileName)

	FolderFileName1=Server.MapPath(FolderFileName)
	
	Set fso=Server.CreateObject("ScripTing.FileSystemObject")
	If fso.FileExists(FolderFileName1)=True Then
	Set MyFile=Fso.OpenTextFile(FolderFileName1,1)
	OpenFileContent=MyFile.Readall()

	Else
	OpenFileContent=""
	End If

End FunCtion

%>