Fil upload med Chili.Upload.1
Jeg forsøger - med udgangspunkt i et tidligere spørgsmål her fra eksperten - at uploade en fil vha. Chili-Upload-1 som min udbyder anvender (en del af Chili!ASP).I filen 'side1.asp' vælger brugeren filen og angiver et navn:
-----------------side1.asp-----------------
<HTML>
<BODY BGCOLOR="white">
<HR>
<form action="side2.asp" method="post" enctype="multipart/form-data" name="PW" id="PW">
<table CELLSPACING="0" CELLPADDING="3" BORDER="1" WIDTH="474">
<!-- FILE -->
<tr>
<td><small><font face="Verdana">Billede </font></small></td>
<td><small><font face="Verdana"><input TYPE="file" name="FILE1"></font></small></td>
</tr>
<!-- TEXT -->
<tr>
<td width="150"><div align="left"><p><small><font face="Verdana">Nyt filnavn : </font></small></td>
<td width="324"><small><font face="Verdana"><input TYPE="TEXT" name="myText" value=""><br></font></small></td>
</tr>
<!-- TEXTAREA -->
<tr>
<td width="150"><div align="left"><p><small><font face="Verdana">Beskrivelse : </font></small></td>
<td width="324"><small><font face="Verdana"><textarea name="myTextArea" rows="4" value=""></textarea><br></font></small></td>
</tr>
</table>
<input type="button" name="upload" value="Upload" onClick="inputcheck(); ">
</form>
<script language="JavaScript">
function inputcheck(){
var file;
var newname;
var desc;
file = document.PW.FILE1.value;
newname = document.PW.myText.value;
desc = document.PW.myTextArea.value;
if (file.length < 1) {
alert("Der skal vælges en fil");
return false;
}
if (newname.length < 1) {
alert("Der skal indtastes nyt filnavn");
return false;
}
if (desc.length < 1) {
alert("Der skal indtastes en beskrivelse");
return false;
}
document.PW.submit();
}
</script>
</BODY>
</HTML>
------------------side1.asp SLUT------------------
I side2.asp skulle filen så gerne uploades:
------------side2.asp----------------------
<HTML>
<BODY BGCOLOR="white">
<HR>
<%
' Variables
' *********
Dim mySmartUpload
Dim item
Dim value
Dim file
dim nytfilnavn
' Object creation
' ***************
Set mySmartUpload = Server.CreateObject("Chili.Upload.1")
' Upload
' ******
' gem filen med det navn der blev angivet på side 1
nytfilnavn = mysmartUpload.form("mytext")
nytfilnavn = server.mappath(".") & "\" & nytfilnavn
ret = mysmartUpload.files.item(1).saveas ("" & nytfilnavn & "")
mySmartUpload.SaveToFile("nytfilnavn")
response.write "gemt som : " & nytfilnavn
response.write "<br>"
response.write "indtastet text:" & mysmartUpload.form("myTextArea")
%>
</BODY>
</HTML>
------------side2.asp SLUT----------------
Men det bliver den ikke.
Hvad er galt?
Den seneste fejlmeddelelse angiver at jeg ikke kan anvende .form
