Cannot use Request.Form collection after calling BinaryRead
Hej et alternativ til hvorda njeg kan få uploadet min fil og sammetidig få gem data i MySQL !?-----------------------------------------------------------
if mode="upload_fil" then
Set upload = Server.CreateObject("Chili.Upload.1")
cnt = 0
a = upload.SourceFileName
for n = 1 to len(a)
if mid(a, n, 1) = "\" then cnt = cnt +1
next
til_arr = split(a, "\" ,-1,1)
uploader = Replace(Trim(Request.form("uploader")), "'", "''")
beskrivelse = Replace(Trim(Request.form("beskrivelse")), "'", "''")
sti = til_arr(cnt)
upload.SaveToFile(Server.mapPath("/hh1b/upload/" & til_arr(cnt)))
SQL0000001 = "Insert Into hhb_upload (uploader, sti, beskrivelse) Values('"&uploader&"', '"&sti&"', '"&beskrivelse&"')"
objConn.Execute(SQL0000001)
end if %>
----------------------------------------------------------
_Martin
