70分求救,关于在vb中做asp上传组件,我想给一百分,但不知为什么给不了.我还有2000多分呢

yanhe100 2001-12-09 03:26:12
Dim MyResponse As Response
Dim Myrequest As Request

这是我在vb中的程序,请大家看看有何错误,
在asp中server.createobject()就有错

Public Sub onStartPage(PassedSc As ScriptingContext)
Dim formData() As Byte

Set MyResponse = PassedSc.Response
Set Myrequest = PassedSc.Request
Size = Myrequest.TotalBytes()
formData = Myrequest.BinaryRead(Size)
For i = LBound(formData) To UBound(formData)
MyResponse.Write formData(i)
Next
End Sub
...全文
49 回复 打赏 收藏 举报
写回复
回复
切换为时间正序
请发表友善的回复…
发表回复
发帖
VB基础类

7681

社区成员

VB 基础类
社区管理员
  • VB基础类社区
加入社区
帖子事件
创建了帖子
2001-12-09 03:26
社区公告
暂无公告