＋设为首页 ＋添加到收藏夹
我在dll里写成upfile_5xSoft跟fileinfo两个类，编译后通过asp页面调用，就是不能用.........
CLASS upfile_5xSoft:
Public upfile_5xSoft_Stream
Dim Form, File, Version
Private myscriptingcontext As ScriptingContext
Private myapplication As Application
Private myrequest As Request
Private myresponse As Response
Private myserver As Server
Private mysession As Session
Public Sub OnStartPage(PassedScriptingContext As ScriptingContext)
Set myscriptingcontext = PassedScriptingContext
Set myapplication = myscriptingcontext.Application
Set myrequest = myscriptingcontext.Request
Set myresponse = myscriptingcontext.Response
Set myserver = myscriptingcontext.Server
Set mysession = myscriptingcontext.Session
End Sub
Public Sub OnEndPage()
Set myscriptingcontext = Nothing
Set myapplication = Nothing
Set myrequest = Nothing
Set myresponse = Nothing
Set myserver = Nothing
Set mysession = Nothing
End Sub
Private Sub Class_Initialize()
....
End Sub
Private Function subString(theStart, theLen)
...
End Function
Private Function inString(theStart, varStr)
....
End Function
Private Sub Class_Terminate()
...
End Sub
Private Function GetFilePath(FullPath)
..
End Function
Private Function GetFileName(FullPath)
...
End Function
Private Function toByte(Str)
...
End Function
CLASS FILEINFO:
Dim FormName, FileName, FilePath, FileSize, FileStart
Private Sub Class_Initialize()
...
End Sub
Public Function SaveAs(FullPath)
...
End Function
具体代码可参考原来的代码，没有改动过。
哪位仁兄帮帮忙？？另外加分
在机器上注册了么？
这东西很难弄成DLL文件,我也尝试过没有成功,也不报错,晕!所以放弃!因为更本不知道哪个地方有问题!郁闷!
留名/关注
不过为什么不用sa?
asp调用时到底是哪句出错?
是某个方法?还是createobject时就错了?
