Problem med request.form
Jeg har følgende html kode:<%Set rs = Conn.execute("SELECT * FROM Info_Meetings WHERE id ="& request("MId") &";")%>
<table class="text" width="518" align="center" border="1" class="text">
<form method="POST" action="main.asp?mode=saveEditMeeting" enctype="multipart/form-data" name="test">
<input type="hidden" name="id" value="<%=rs("id")%>">
<tr>
<td width="316">
Region:
<select size="1" name="region">
<option <%if rs("region") = "sjaelland" then response.write("selected")%> value="sjaelland">Sjælland</option>
<option <%if rs("region") = "jylland" then response.write("selected")%> value="jylland">Jylland og Fyn</option>
</select>
<b><br>
Destination: </b><input type="text" name="dest" size="20" value="<%=rs("Destination")%>"><br>
<b>Text DK</b><br>
<textarea rows="4" name="textDK" cols="36"><%=rs("TextDK")%></textarea><br>
<b>Text EN:</b><br>
<textarea rows="4" name="textEN" cols="36"><%=rs("TextEN")%></textarea>
</td>
<td width="188">
<img src="../../billeder/<%=rs("picture")%>" width="130"><br>
<b>Upload nyt billede</b><br>
<input type="file" name="file" size="20">
</td>
</tr>
<tr>
<td vAlign="top" width="316">
</td>
<td width="188">
<b>Sted, Tid og varighed</b>
<p><b>DK:</b><textarea rows="4" name="NoteDK" cols="19"><%=rs("NoteDK")%></textarea></p>
<p><b>EN:</b><textarea rows="4" name="NoteEN" cols="19"><%=rs("NoteEN")%></textarea></p>
</td>
</tr>
<tr>
<td vAlign="top" align="right" width="316">
<input type="submit" value="Gem" name="B1"><input type="reset" value="Slet" name="B2">
</td>
<td width="188"></td>
</tr>
</form>
</table>
jeg gemmer indholdet ved hjælp af følgende kode, der er includet i toppen af min fil:
if strMode = "saveEditMeeting" AND bolWasPosted Then
If Request.Form("picture") > "" Then
Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.OverwriteFiles = False
Set Rs = conn.Execute("SELECT picture FROM Info_meetings WHERE Id ="& Upload.Form("id") &";")
Set fso = Server.CreateObject("Scripting.FileSystemObject")
fso.DeleteFile Server.MapPath("../../billeder/"& rs("picture")), True
Set fso = Nothing
Upload.SaveToMemory
Set file = Upload.Files(1)
filename = StrGenerator() &"_"& file.FileName
file.SaveAs (Server.mapPath("../../billeder/" & filename))
strSQL = "UPDATE DISTINCTROW Info_Meetings SET Destination = '" & Upload.form("dest") & "', Region = '" & Upload.form("region") & "',TextDK = '" & Upload.form("TextDK") & "',Picture = '" & Upload.form("picture") & "',NoteDK = '" & Upload.form("NoteDK") & "',TextEN = '" & Upload.form("TextEN") & "',NoteEN = '" & Upload.form("NoteEN") & "' WHERE Id = " & Upload.form("id")
conn.Execute(strSQL)
else
strSQL = "UPDATE DISTINCTROW Info_Meetings SET Destination = '" & Request.form("dest") & "', Region = '" & Request.form("region") & "', TextDK = '" & Request.form("TextDK") & "', NoteDK = '" & Request.form("NoteDK") & "', TextEN = '" & Request.form("TextEN") & "', NoteEN = '" & Request.form("NoteEN") & "' WHERE Id ="& Request.Form("id") &";"
conn.Execute(strSQL)
end if
Set upload = nothing
Set file = nothing
response.redirect("main.asp?mode=informationmeetings")
End if
Problemet er at jeg ikke får overfør noget i mine request.form
