观致3和观致5:ASP转DLL问题!!

来源:百度文库 编辑:高校问答 时间:2024/05/06 06:01:36
为什么在ASP里可以用,而转为DLL后却显示
TradeCMS_Common 错误 '800a01a8'
需要对象 (晕,直接用ASP时可以用呵!)

错误代码如下:

Response.Write FSOFolder("../News")

其中所用 FSOFolder 如下:
Public Sub FSOBegin()
Set Fso = Server.CreateObject("Scripting.FileSystemObject ")
End Sub

Public Sub FSOEnd()
Set Fso = Nothing
End Sub

Function FSOFolder(Str)
Call FSOBegin
If Fso.folderExists(Server.MapPath(Str)) = False Then FSOFolder = "(×)"
Call FSOEnd
End Function

这句:
Function FSOFolder(Str)
Call FSOBegin
If Fso.folderExists(Server.MapPath(Str)) = False Then FSOFolder = "(×)"
Call FSOEnd
End Function

少了个End If吧。