关于LyfUpload 错误 '80020009' 下标越界的错误,还请大侠们帮帮忙！！！

  今天想通过asp实现图片的上传功能（本地和局域网都可实现图片上传），但是LyfUpload老是提示下标越界的提示，实在是找不出哪里出了问题，希望有经验的过来者能帮帮小弟，谢谢了，代码如下：
<%
dim obj
set conn=server.createobject("adodb.connection") 
conn.Open"Driver={SQL Server};Server=THINKPAD-THINK;UID=sa;PWD=;database=登录" 
Set obj = Server.CreateObject("LyfUpload.UploadFile")
txt=obj.request("")
txt1=obj.request("textfield")
txt2=obj.request("textfield2")
txt3=obj.request("textfield3")
txt4=obj.request("file")
kk="C:\Users\ThinkPad\Desktop\site\userimage"
ss=obj.savefile("file11",kk,true)
'kk1="userimage/"&ss 
if ss="" then
response.Write("文件上传失败")
else
if ss="0" then
response.Write("文件过大")
else
rs.addnew
set rs=server.CreateObject("adodb.recordset")
sql="select * from 用户商品中心区"
rs.open sql,conn,3,2
rs.addnew
rs("用户名")=trim(txt)
rs("上传商品名称")=trim(txt1)
rs("上传商品价格")=trim(txt2)
rs("上传商品时间")=trim(txt3)
rs("上传商品图片")=trim(txt4)
'rs("")=trim(txt1)
rs.update
set conn=nothing
conn.end 
end if
end if
%> 
以下是设计页面的图片：