Hi group,
I am trying to build a page that allows uploading
My ISP only supports Smartupload
I am testing on a small hubbed local network, with PWS
Any help is appreciated.
---------------------
'rqstupl.asp contents
<HTML>
<BODY BGCOLOR="white" >
<FORM METHOD="POST" ENCTYPE="multip art/form-data" ACTION="txtupl. asp">
<INPUT TYPE="FILE" NAME="FILE1" SIZE="50"><br>
<INPUT TYPE="SUBMIT" VALUE="Upload">
</FORM>
</BODY>
</HTML>
-------------
input in form = usblog.txt
-------------
'txtupl.asp contents
<%
response.write "txtupl<br> "
Dim myUpload 'declare the component
Dim intCount ' count the number of uploaded files
Dim File 'declare the file to upload
dim item, fic, i
intCount=0 'initialize the counter
' error managment
'On Error Resume Next
'component creation
Set myUpload = Server.CreateOb ject("aspSmartU pload.SmartUplo ad")
'limit the file size to 50 Kb
myUpload.MaxFil eSize = 50000
' limit the file extensions to pictures files
myUpload.allowe dFilesList="txt ,gif,jpg"
'Select files on the user computer
myUpload.Upload
Response.Write( "Number of files =" & myUpload.Files. count&"<BR>")
' checking all the files
For each file In myUpload.Files
Response.Write( "Name =" & File.FileName&" <BR>")
Response.Write( "Size =" & File.Size&"<BR> ")
' presence test
If not File.IsMissing then
' ---------------here sits the trouble
'
i = Server.MapPath( "database/msgs/") & file.FileName
response.write (i) & "<br>"
file.SaveAs( i )
' -----------------------------
'
If Err.Number=0 then
direction="save d"
Else
direction="erro r: " & Err.description
End if
end if
Next
Set myUpload=nothin g
' error managment
' redirect to the result display
Response.write direction
%>
------------------
'response output screen
txtupl
Number of files =1
Name =usblog.txt
Size =89
D:\Inetpub\wwwr oot\database\ms gsusblog.txt
saved
-----------
I have been trying to modify the "save" line to any construction to no aval.
Everything works, I can access all the properties of "file."
I have no error responses or script aborts.
Asp handling works, vbscript and jscript works
The destination folder is writable, I have another asp testing page that creates and modifies a file on that folder.
--------- The one thing that doesnt work: there is no file created! --------------
I am using Win98SE, PWS installed, testing application on a second pc, locally hubbed.
What am I missing?
Thanks in advance
--
Windows98 links to solutions http://jake98.no-ip.info
Replies in the same thread please
Regards Jake
