Upload af 3 filer + gem i database
Jeg bruger denne kode pt:<%
set conn = Server.CreateObject("ADODB.Connection")
Session("MyConn") = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.Mappath("mohaadk_database.mdb") & ";"
Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.OverwriteFiles = false
Upload.SetMaxSize 1000000, True
Upload.SaveVirtual ("/grenades/")
For Each File in Upload.Files
File.ToDatabase Session("MyConn"), "insert into T_GRENADES(M_GRENADE_PICTURE, M_GRENADE_INFO, M_AUTHOR, M_GRENADE_KAT, M_GRENADE_TITEL, M_DATE) " &_
"values('"& File.ExtractFileName & "', '" & Upload.Form("info") & "', '" & Upload.Form("nickname") & "', '" & Upload.Form("kat") & "', '" & Upload.Form("titel") & "', Date())"
if Err <> 0 Then
Response.Write "<font class=""maintekst"">Der er sket en fejl! : " & Err.Description
Else
Response.Write "<font class=""maintekst"">Tilføjet...</font>"
End If
Next
%>
Jeg vil gerne have lavet så jeg kan uploade op til 3 billeder ad gangen... Da jeg ikke ved meget om upload scriptet vil jeg utrolig gerne have hjælp til det. 150 points deles ud for hurtig besvarelse :-)
