Hallo Stephan,
ich verstehe nicht warum das bei dir nicht geklappt hat.
Ich habe es getestet und es klappt ohne Probleme
Hier das Formular (form.asp)
<%
With Response
.Write("<FORM METHOD='POST' ACTION='upload.asp'
ENCTYPE=""multipart/form-data"">")
.Write("<b><u><font face='Arial' size='2'>Name:<br><INPUT TYPE='text'
name='name' value='" & Session("name") & "'
size='25'></font></u></b><br>")
.Write("<b><u><font face='Arial' size='2'>Alter:<br><INPUT TYPE='text'
name='alter' value='" & Session("alter") & "'
size='2'></font></u></b><br>")
.Write("<b><u><font face='Arial' size='2'>Hobbys:<br><Textarea
name='hobby' cols='20' rows='10'>" & Session("hobby") &
"</textarea></font></u></b><br>")
.Write("<b><u><font face='Arial' size='2'>Sternzeichen:<br><INPUT
TYPE='text' name='sternzeichen' value='" & Session("sternzeichen") & "'
size='10'></font></u></b><br>")
.Write("<b><u><font face='Arial' size='2'>Lieblingsfilm:<br><INPUT
TYPE='text' name='film' value='" & Session("film") & "'
size='25'></font></u></b><br>")
.Write("<b><u><font face='Arial' size='2'>Warum:<br><TEXTAREA
name='warum' value='' cols='20' rows='10'>" & Session("warum") &
"</TEXTAREA></font></u></b><br>")
.Write("<INPUT TYPE='hidden' NAME=""id""
value="""&Request.QueryString("id")&""">")
.Write("<INPUT TYPE='FILE' NAME='FILE1' SIZE='50'>")
.Write("<INPUT TYPE=""SUBMIT"" Value=""Letz do it""
name=""Button""> <Input type=""reset"">")
.Write("</FORM>")
End With
%>
Und hier die Auswertung der Daten (upload.asp)
<%
response.write("<HTML>")
response.write("<BODY>")
response.write("<H1>TEST</H1>")
response.write("<HR>")
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
mySmartUpload.Upload
intCount = mySmartUpload.Save(Server.Mappath("/tester/"))
Response.Write("<font size=""2"" face=""Arial"">"&intCount & "
Datei(en) hochgeladen")
Response.Write("<BR><STRONG>Files Collection</STRONG><BR>")
Response.Write("Gesamt bytes der Datei(en) =" &
mySmartUpload.Files.TotalBytes &"<BR>")
For each file In mySmartUpload.Files
Response.Write(file.FileName & " (" & file.Size & "bytes)<BR>")
Next
Response.Write("<BR><STRONG>Form Collection</STRONG><BR>")
For each item In mySmartUpload.Form
For each value In mySmartUpload.Form(item)
Response.Write(item & " = " & value & "<BR>")
Next
Next
response.write("</BODY>")
response.write("</HTML>")
%>
Herzlichen Gru� aus dem sch�nen Nordhessen
Sven-Christian Hupfeld
-gesch�ftsf�hrender Gesellschafter-
hsw.datendienstleistungen GmbH
Gudensberg, Kassel
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
