SAFileUp, create object prob.plz

gavray · Aug 1, 2000

Hi, can anyone enlighten me please? I have placed a safileup.dll on the root of the web server, as was instructed from the help menu. I don't see how that relates to Set up1 =Server.CreateObject("SoftArtisans.FileUp&quot

This is the error message I get: Server object error 'ASP 0177 : 800401f3' Server.CreateObject Failed /upload.asp, line 14 800401f3 here's my form & .asp page, I'm using microsoft personal webserver *FORM* <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <html> <head> <title>Untitled</title> </head> <body> <form method="post" action="upload.asp" enctype="multipart/form-data"> Email Address: <input type="text" name="email" size="50" maxlength="100"> image:<input type="file" name="myfile"> <input type="submit" value="upload" name="B1"> </form> </body> </html> *ASP* <% dim status, email, image, rs, cn, strSQL, f1, newpath, cstring cstring = "dsn=profile;" ' ** The status variable is used to determine whether ' ** Everything was successfull or not status = " " '** create the file upload object Set up1 = Server.CreateObject("SoftArtisans.FileUp&quot

'** Check to make sure that it is a JPEG file. This application requires '** a JPEG file with a ".jpg" extension. This may or may not be necessary. '** However, it is important in any case to the file type, which '** can.be derived form the file extension. if TRIM(upl.UserFileName) <> "" then if InStr(LCase(up1.UserFileName), ".jpg&quot

= 0 then status = "photo file is incorrect format. It must be .jpg format." end if end if '** check to make sure that a file was uploaded if up1.Form("myfile&quot

.IsEmpty then status = "photo was not uploaded" end if '** check to make sure an email address was supplied if up1.Form("email&quot

.IsEmpty then status = "no email address was supplied" end if '** if everything is in order save the image and record the file name in the database if status = " " then '** get the path to the image location of the profile database profile images f1 = server.MapPath("_private/images/&quot

'** add the file name to the path newpath = f1 & up1.UserFileName '** update the redcord containing the new image with the file name set cn = Server.CreateObject("adodb.Connection&quot

cn.Open csstring strSQL = "UPDATE profile set image = '" & up1.UserFileName & "' where email" & _ "like '" & email & "'" cn.Execute(strSQL) cn.Close Set cn = Nothing '** save the file to the correct location up1.SaveAs newpath status = "Your photo has been uploaded." else '** clear the file form memory on the server up1.Flush session ("message&quot

= status end if Set up1 = Nothing %> <html> <head> <title>Untitled</title> </head> <body> profile image update  <%=status%> </body> </html> i'd be gratefull for some hints Gavin

wduty · Aug 1, 2000

Here's what it says in the soft artisans documentation regarding this: What does this error mean: "Server object error 'ASP 0177:80040154' Server.CreateObject Failed" That is a "Class not registered" error. Try running regsvr32 on the DLL once again and see if any errors appear during registration. You can also check the Registry manually. Look for: HKEY_CLASSES_ROOT\SoftArtisans.FileUp\CLSID which should have a value of FB3F89EF. If the error persists, even after you have checked the registry, check the NTFS permissions on the SAFILEUP.DLL file. IIS, which typically executes as IUSR_machinename, must have read and execute permission to both this file and the directory where it is located. If the CreateObject fails, SA-FileUp can't return any diagnostic information. If you have the Win32 SDK, errors such as 8nnnnnnn can be found in include\winerror.h. --Will Duty <a href=mailto:wduty@radicalfringe.com>wduty@radicalfringe.com</a> <a href= > </a>

Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

SAFileUp, create object prob.plz

gavray

Programmer

wduty

Programmer

Similar threads

Part and Inventory Search

Sponsor