I am trying to allow our users to upload files to our WEB site
I found out Persits thing only works if you have access to the C:\drive or the WEB site
In other words you host your own site.
I added the COMDLG32.OCX to my Front page form and
when I click the command button nothing happens
here is my code
-------------------------
<body>
<script Language="VBScript">
Sub Browse_OnClick
CommonDialog1.Action = 1
End Sub
</script>
<form method="POST" action="--WEBBOT-SELF--">
<!--webbot bot="SaveResults" startspan
U-File=" S-Format="TEXT/CSV" S-Label-Fields="TRUE" --><input TYPE="hidden" NAME="VTI-GROUP" VALUE="0"><!--webbot
bot="SaveResults" endspan --><p><input type="text" name="T1" size="34">
<input type="button" value="Browse (your computer)" name="Browse">
<object classid="clsid:F9043C85-F6F2-101A-A3C9-08002B2F49FB" id="CommonDialog1" width="32" height="32">
<param name="_ExtentX" value="847">
<param name="_ExtentY" value="847">
<param name="_Version" value="393216">
<param name="CancelError" value="0">
<param name="Color" value="0">
<param name="Copies" value="1">
<param name="DefaultExt" value="*.jpg">
<param name="DialogTitle" value="Upload File">
<param name="FileName" value>
<param name="Filter" value>
<param name="FilterIndex" value="0">
<param name="Flags" value="0">
<param name="FontBold" value="0">
<param name="FontItalic" value="0">
<param name="FontName" value>
<param name="FontSize" value="8">
<param name="FontStrikeThru" value="0">
<param name="FontUnderLine" value="0">
<param name="FromPage" value="0">
<param name="HelpCommand" value="0">
<param name="HelpContext" value="0">
<param name="HelpFile" value>
<param name="HelpKey" value>
<param name="InitDir" value="c:\">
<param name="Max" value="0">
<param name="Min" value="0">
<param name="MaxFileSize" value="260">
<param name="PrinterDefault" value="1">
<param name="ToPage" value="0">
<param name="Orientation" value="1">
</object>
</p>
<p><input type="submit" value="Submit (file to Universal)" name="Submit">
<input type="reset" value="Reset" name="B2"></p>
</form>
<p> </p>
</body>
-----------------------------
TIA DougP, MCP
Visit my WEB site to see how Bar-codes can help you be more productive
I found out Persits thing only works if you have access to the C:\drive or the WEB site
In other words you host your own site.
I added the COMDLG32.OCX to my Front page form and
when I click the command button nothing happens
here is my code
-------------------------
<body>
<script Language="VBScript">
Sub Browse_OnClick
CommonDialog1.Action = 1
End Sub
</script>
<form method="POST" action="--WEBBOT-SELF--">
<!--webbot bot="SaveResults" startspan
U-File=" S-Format="TEXT/CSV" S-Label-Fields="TRUE" --><input TYPE="hidden" NAME="VTI-GROUP" VALUE="0"><!--webbot
bot="SaveResults" endspan --><p><input type="text" name="T1" size="34">
<input type="button" value="Browse (your computer)" name="Browse">
<object classid="clsid:F9043C85-F6F2-101A-A3C9-08002B2F49FB" id="CommonDialog1" width="32" height="32">
<param name="_ExtentX" value="847">
<param name="_ExtentY" value="847">
<param name="_Version" value="393216">
<param name="CancelError" value="0">
<param name="Color" value="0">
<param name="Copies" value="1">
<param name="DefaultExt" value="*.jpg">
<param name="DialogTitle" value="Upload File">
<param name="FileName" value>
<param name="Filter" value>
<param name="FilterIndex" value="0">
<param name="Flags" value="0">
<param name="FontBold" value="0">
<param name="FontItalic" value="0">
<param name="FontName" value>
<param name="FontSize" value="8">
<param name="FontStrikeThru" value="0">
<param name="FontUnderLine" value="0">
<param name="FromPage" value="0">
<param name="HelpCommand" value="0">
<param name="HelpContext" value="0">
<param name="HelpFile" value>
<param name="HelpKey" value>
<param name="InitDir" value="c:\">
<param name="Max" value="0">
<param name="Min" value="0">
<param name="MaxFileSize" value="260">
<param name="PrinterDefault" value="1">
<param name="ToPage" value="0">
<param name="Orientation" value="1">
</object>
</p>
<p><input type="submit" value="Submit (file to Universal)" name="Submit">
<input type="reset" value="Reset" name="B2"></p>
</form>
<p> </p>
</body>
-----------------------------
TIA DougP, MCP
Visit my WEB site to see how Bar-codes can help you be more productive