关于LyfUpload的使用
我编了一个使用LyfUpload上传文件程序,第一个页面提交表单,第二个页面处理
但是当使用Set obj = Server.CreateObject("LyfUpload.UploadFile")语句时,放哪儿都不行,都会报如下错误:
错误类型:
LyfUpload (0x80020009)
Subscript out of range
下面是第二个页面的代码:
<%@Language=VBScript %>
<HTML>
<BODY>
<%
Set obj = Server.CreateObject("LyfUpload.UploadFile")'_________就是这句话!!!
set cn=server.CreateObject("ADODB.connection")
provider = "Provider=Microsoft.Jet.OLEDB.4.0;"
dbpath="Data Source=" & server.MapPath("mail.mdb")
cn.open Provider & dbpath
set rs=server.CreateObject("ADODB.recordset")
commandtext="insert into production values('"&trim(obj.request("pID"))&"','"&trim(obj.request("pname"))&"','"&trim(obj.request("price"))&"','"&trim(obj.request("s3"))&"','"&trim(obj.request("infor"))&"')"
cn.execute Commandtext,0,AdCmdText
Path = Server.MapPath("production")
varfname=trim(obj.request("pID")) & ".rar"
ss=obj.SaveFile("file1", path,True,varfname) '保存文件到服务器
set objFSO = nothing
set obj = nothing
rs.close
set rs=nothing
cn.close
set cn=nothing
response.Redirect "promanage.asp"
%>
</body>
</html>
请问是怎么回事,怎么改?
问题点数:0、回复次数:16Top
1 楼jolinkyo(楼主太有才了)回复于 2005-06-01 23:14:52 得分 0
试试看
Set obj = Server.CreateObject("LyfUpload.UploadFile")
set cn=server.CreateObject("ADODB.connection")
provider = "Provider=Microsoft.Jet.OLEDB.4.0;"
dbpath="Data Source=" & server.MapPath("mail.mdb")
cn.open Provider & dbpath
set rs=server.CreateObject("ADODB.recordset")
sql="select * from production"
rs.open sql,conn,1,3
pID=trim(obj.request("pID"))
pname=trim(obj.request("pname"))
price=trim(obj.request("price"))
s3=trim(obj.request("s3"))
infor=trim(obj.request("infor"))
rs.addnew
rs("pID")=pID
rs("pname")=pname
……
rs("infor")=infor
rs.update
Path = Server.MapPath("production")
varfname=trim(obj.request("pID")) & ".rar"
ss=obj.SaveFile("file1",path,True,varfname)
set obj=nothing
rs.close
cn.closeTop
2 楼jolinkyo(楼主太有才了)回复于 2005-06-01 23:16:10 得分 0
rs.open sql,cn,1,3
写错了Top
3 楼net_lover(【孟子E章】)回复于 2005-06-01 23:17:03 得分 0
<form enctype="multipart/form-data">必须的Top
4 楼Unending(看分答题)回复于 2005-06-01 23:19:36 得分 0
就是组件没有注册嘛
regsvr32 LyfUpload.dll先Top
5 楼jolinkyo(楼主太有才了)回复于 2005-06-01 23:26:13 得分 0
regsvr32.exe c:\windows\system\LyfUpload.dllTop
6 楼chsal()回复于 2005-06-01 23:40:48 得分 0
To: Unending(西部来客)
我注册LyfUpload.dll了啊
To:jolinkyo()
不行,Set obj = Server.CreateObject("LyfUpload.UploadFile")有问题,下面根本就不能执行
To: net_lover(孟子E章)
我改了,不报错了,但是文件没有上载成功。也就是执行完,找不到上载的文件
Top
7 楼net_lover(【孟子E章】)回复于 2005-06-02 00:00:23 得分 0
上载不成功:
1,权限问题
2,文件夹路径是否正确Top
8 楼net_lover(【孟子E章】)回复于 2005-06-02 00:01:29 得分 0
请打印出来
path,varfname两个看是否正确Top
9 楼ILBatistuta()回复于 2005-06-02 00:06:16 得分 0
谁知道lyfupload是什么工作原理?
发到king2000ygy@163.comTop
10 楼chsal()回复于 2005-06-02 09:17:37 得分 0
To: net_lover(孟子E章)
1,文件路径是用file按钮找的,肯定没有问题
2,权限问题是什么啊?Top
11 楼mikespook(CSDN == 吹死大牛)回复于 2005-06-02 09:31:55 得分 0
NTFS格式的磁盘,在部分情况下IIS的IUSR用户无写权限~~Top
12 楼chsal()回复于 2005-06-02 11:31:20 得分 0
To:mikespook(懒猫开始新生活)
我的那个磁盘是FAT32格式的啊Top
13 楼king5281273(那夜狂花)回复于 2005-06-02 12:56:52 得分 0
组件的运行环境问题
我记得在2000server sp4下会出错
Top
14 楼chsal()回复于 2005-06-02 13:46:10 得分 0
To: king5281273(那夜狂花)
我用的是XP自带的IIS。Top
15 楼kaixinglei(开星泪)回复于 2005-06-02 13:54:04 得分 0
我用过个组件没有什么问题啊!先注册后就可以正常的使用了。
Top
16 楼kaixinglei(开星泪)回复于 2005-06-02 13:57:16 得分 0
检察一下你提交的表单是不是有问题。Top
相关问题
- 求:LyfUpload使用方法
- LyfUpload组件使用的怪问题!高分求解!
- 关于LyfUpload组件在2003下面的使用
- 怎样使用LYFUPLOAD(刘玉峰)上传组件?高手帮忙,详细点[每人给100分]
- lyfupload组件在ASP中运行良好,但是把整个ASP编译成DLL却无法使用,Why?Help!!!
- 那位高手知道使用lyfupload上传组件时,怎么得到文件名?
- 那位高手知道使用lyfupload上传组件时,关于上传路径的问题
- 请高手帮忙解决使用LyfUpload 上传组件碰到的问题。错误 '800a0047'
- 使用LyfUpload时候的奇怪事情,难以用生成的新名字重命名文件
- 使用




