ASPUpload Help

[twoolums]

Trying to get ASPUpload working on win13 just can't get it to do anything. Here is my code

<%
Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.OverwriteFiles = False
Upload.SetMaxSize 5242880	' Limit files to 5MB
Upload.Save("D:\hshome\<username>\<domain.com>\<directory>")
Set File = Upload.Files("txtEventSignUp")
If Not File Is Nothing Then
	strFile = File.Filename
	Response.Write("<font color=red>Uploading " & strFile & ".</font><br>")
End If
Set Upload = Nothing
%>



<table>
<form method="post" name="frmUpload" ENCTYPE="multipart/form-data" action="browse_new.asp?mode=upload"> 
<tr><Td>Upload Sign Up Form:</td><td><input type="file" name="txtEventSignUp"></td></tr> 
<tr><td><input type="submit" value="Upload"></td></tr> 
</form></table>

Any ideas are apprecaited.
Thanks

 

[Stephen]

Try Upload.SaveAs

The ASPUpload shared hosting settings are in place in the registry on the servers some it will report and error or otherwise not function if you just using .Save

 

[twoolums]

That didn't work either, hmmm

 

[Stephen]

err?
Doh, it is actually wrong, my mistake.
SaveVirtual is the command

http://aspupload.com/manual_share.html

 

[twoolums]

Hmm same result.

 

[twoolums]

and no I don't see any type of error. Just proceses but doesn't actually do anything.

 

[Stephen]

Please send me an email of PM with the url and where I can test I will see if any errors showing in logs

 

[twoolums]

PM sent. Thanks for helping.

 

[twoolums]

Got it

	Set Upload = Server.CreateObject("Persits.Upload")
	Upload.OverwriteFiles = False
	Upload.SetMaxSize 5242880	' Limit files to 5MB
	Upload.SaveVirtual("/signupforms")
	Set File = Upload.Files("txtEventSignUp")
	If Not File Is Nothing Then
		strFile = File.Filename
		Response.Write("<font color=red>Uploading " & strFile & ".</font><br>")
	End If
	Set Upload = Nothing