◆asp检测文件是否存在问题
以下是我的两个检测文件的函数,我目录下明明是有test.txt这个文件的,
但是检测时两个函数都检测不出来。
请问是哪里错了,请帮忙修改一下,谢谢了。
<%
Function ReportFileStatus(filespec)
Dim fso, msg
Set fso = CreateObject( "Scripting.FileSystemObject ")
If (fso.FileExists(filespec)) Then
msg = filespec & " 存在。 "
Else
msg = filespec & " 不存在。 "
End If
ReportFileStatus = msg
End Function
Function FolderExits(Folder)
Folder=Server.Mappath(Folder)
Set FSO= Server.CreateObject( "Scripting.FileSystemObject ")
IF FSO.FolderExists(Folder) Then
FolderExits=true
Else
FolderExits=false
End IF
End Function
%>
<%
ee=ReportFileStatus( "test.txt ")
ff=FolderExits( "test.txt ")
%>
<%=ee%> <br>
<%=ff%>
[解决办法]
Set fso = Server.CreateObject( "Scripting.FileSystemObject ")
[解决办法]
路径不对.如果是当前目录下try:ee=ReportFileStatus(Server.mappath( "test.txt "))ff=FolderExits(Server.mappath( "test.txt "))