<% Dim upl, NewFileName Set upl = Server.CreateObject("ASPSimpleUpload.Upload") If Len(upl.Form("File1")) > 0 Then NewFileName = "" & upl.ExtractFileName(upl.Form("File1")) If upl.SaveToWeb("File1", NewFileName) Then Response.Write("File successfully written to disk.") Else Response.Write("There was an error saving the file to disk.") End If End If %> <html><head><title>ASP Simple Upload Example #1</title></head></title> <body> <form method="POST" action="upld.Asp" enctype="multipart/form-data"> Select a file to upload: <input type="file" name="File1" size="30"> <input type="submit" name="submit" value="Upload Now"> </form> </body> </html>This doesn't meet your requirements litterally, and possibly it is too dumn (i.e. obviously known to you already). However, it does scan the local machine and it does provide for upload to the server. You can even copy files from server to server (the source being the server's path).
<a href ="http://YourDomain/YourUploadDir/upld.asp" target="AnyFrame">Upload</a>Note : In order to get the above sample code in here, I replaced all < into & lt. At the reload in the HTML editor these will be gone again, therefor you won't be able to reply to this message without first removing the original sample-code. Very sorry for this inconvenience. BTW, how do we deal with this formally ?