<<
file_name="uploadedfile.txt"
>>
<html>
<title>Upload File</title>
<body bgcolor=white>
<<
IF err_msg != "ERROR" THEN
DISPLAY err_msg + "<br>" /DISPLAY
err_msg = "ERROR"
/IF
>>
<form method=post enctype="multipart/form-data" action=upit><br>
File: <input type=file size=30 name=<<"F"+USERNUM+".txt">> >
<input type=submit value="Upload Now">
</form>
</body>
</html>
<<OVERLAY upit
# H2O places uploaded files in the /upload folder.
# The uploaded file is given the same name as the
# variable in the <input type=file> statement.
/#
uploadfile_name="/upload/F"+USERNUM+".txt"
void=FILEINFO(uploadfile_name)
IF void[2] != "" AND void[2] > 2 THEN
FILEMOVE(uploadfile_name,file_name)
err_msg="Upload Successful"
ELSE
FILEREMOVE(uploadfile_name)
err_msg="<font color=red>Upload Not Successful</font>"
/IF
GOTO PAGE
>>