> ><html> > ><head> ><meta http-equiv="Content-Type" content="text/html; charset=windows-1252"> ><title>Select File</title> ></head> > ><body> ><form enctype="multipart/form-data" runat="server"> ><table border="1" width="100%"> > <tr> > <td colspan="2"> ><input type="file" id="MyFileInput" accept="image/*" runat="server" name="F1" size="106" style="float: right" />Select File:</td> > </tr> > <tr> > <td> ><input type="button" id="SubmitButton" value="Upload" >runat="server" onserverclick="UploadFile" /></td> > <td> </td> > </tr> ></table> ><p> </p> > > ></form> ><div id="outError" runat="server" /> > ><script language="VB" runat="server"> > >Sub UploadFile(objSource As Object, objArgs As EventArgs) > If Not (MyFileInput.PostedFile Is Nothing) Then > Try > MyFileInput.PostedFile.SaveAs("C:\temp\myfile.txt") > Catch objError As Exception > outError.InnerHtml = "Error saving file " & objError.Message > End Try > End If >End Sub > ></script> > ></body> > ></html> > >>