ASP中上传图片（这段代码为什么上传不上啊）

dim rs_basin1,ssql_basin1
set rs_basin1=server.CreateObject("ADODB.recordset")
dim f1,str_type,up_image,up_file
set f1=server.CreateObject("Scripting.FileSystemObject")
Set objUpload = Server.CreateObject("LKOAAspcn.upload")

'设置文件大小，覆盖方式，文件存储绝对路径
objupload.MaxSize = 100000000
objupload.Path=server.MapPath("../gsjj/AtthFile") & "\"
objUpload.upload
old_image=objUpload.Form("oldimage")
old_file=objUpload.Form("oldfile")
xh=objUpload.Form("id")
str_type=objUpload.Form("savetype") '保存操作类型（新增和修改）

asp无组件上传的代码,网上很多的.

与其花大量时间调试有问题的,

不如找一个直接可用的.

1、先看看这个组件LKOAAspcn.upload （控件 我不知道名字.dll）在服务器那里注册了没有

没注册的话是上传不成功的

2、把这个组件LKOAAspcn.upload相关的说明清楚，如何调用

那如果是这段代码 ！！！该怎么去修改