Question : Changing from ASPSmartUpload to ASPUpload

My host recently migrated our site to a Win 2k8 Server, and since then we have had to modify almost everything on the site.
______________________________________
One issue we have is the error:

Server object error 'ASP 0177 : 800401f3'

Server.CreateObject Failed

/site1/admin/orderapp1.asp, line 16

800401f3
____________________________________

The line of code on line 16 is:

Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
_______________________________________________________________

I found out that the server we are hosted on has ASPUpload (not mysmartupload). So I have this section of code that does not work at all, but I am not a developer, so changing the code to refer to the proper application is a little beyond my abilities.

Here's what I need. I need the attached code to be modified to use ASPUpload instead of SmartUpload.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
Dim mySmartUpload
Dim file
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
mySmartUpload.MaxFileSize = 10000000
mySmartUpload.Upload
set rs = Server.CreateObject("ADODB.Recordset")
orderno = mySmartUpload.Form("orderno")
aofid = mySmartUpload.Form("aofid")
charge = mySmartUpload.Form("charge")
appval = mySmartUpload.Form("appval")
cstatus = mySmartUpload.Form("cstatus")
commt =  mySmartUpload.Form("commt")
cus_id  = mySmartUpload.Form("cus_id")
ee = mySmartUpload.Form("ee")
dt = now
dty = year(dt)
dtm = month(dt)
dtd = day(dt)
dt =  right(("20" & (dty)),4) & right(("00" & (dtm)),2) & right(("00" & (dtd)),2)



Comment = "Appraisal complete and uploaded [" & mySmartUpload.Files.Item(1).FileName & "]"

Answer : Changing from ASPSmartUpload to ASPUpload

I am pretty sure that the ASPUpload is going to be way different than the current ASPSmartUpload.

I can not really advice as to what needs to be done on the coding end of things, as I use a ASP.NET Custom script that I designed to do my uploads with.

The only thing that I can suggest, is to look at the link that I provided.
Choose the different [User Manual] options in the menu.
And try the code out as you go to help you debug what you run into.

I wish that I could be of more help, but I do not have it installed on nothing that I have (or) use.

Good Luck
Carrzkiss
Random Solutions  
 
programming4us programming4us