Found a few old ASP scripts on my harddrive, decided to share.
this one allows you to upload a file to your server via ASP.
<HTML>
<BODY BGCOLOR="#FFFFFF">
<%
t = lcase(left(Request.ServerVariables("CONTENT_TYPE"), 19))
if t = "multipart/form-data" then
Set Upload = Server.CreateObject("Persits.Upload.1")
pathname = "\\premfs2\sites\premium6\darksat\database\" 'Change this as per the connection string FAQ
Upload.save pathname
response.write "Upload successful!"
end if
%>
<FORM METHOD="POST" ENCTYPE="multipart/form-data">
<INPUT TYPE="FILE" SIZE="40" NAME="FILE1"><BR>
<INPUT TYPE=SUBMIT VALUE="Upload!">
</FORM>
</BODY>
</HTML>