eksempel på multipleupload med smartupload

ps: har tjekket aspsmartuploads side, men kan ikke få det til at fungere, så I beøver ikke smide links til denne

Jeg går ud fra du selv har lavet en form med 8 input felter til at vælge filerne. Husk

Her er koden som gemmer filerne og stier i databasen. Husk dag at rette connection stirng og kolonnenavn. Samt stien til hvor billederne skal gemmes.


<%
strSti = "/images/"

intCount=0
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("/db/db.mdb")

mySmartUpload.Upload

For each file In mySmartUpload.Files
  If not file.IsMissing Then
    filNavn = strSti & file.FileName
    file.SaveAs(filNavn)
    SQL = "INSERT INTO tabelnavn (sti) VALUES ('" & filnavn & "')"
    Conn.Execute(SQL)
  End If
Next

Response.Write "Filerne er uploaded"

Conn.Close
Set Conn = Nothing
Set mySmartUpload = Nothing
%>

jeg prøver den senere i dag eller i morgen ... thanx

endelig (!) kommer jeg videre med denne opgave..
eagleeye: Jeg forstår ikke helt - jeg har 2 spørgsmål:
1. Jeg får p.t. følgende fejl:
Request object error 'ASP 0206 : 80004005'

Cannot call BinaryRead

/sagsadministration.asp, line 25

Cannot call BinaryRead after using Request.Form collection.

2. min kode (eller uploaddelen af den ser således ud:
sagsnr = upload.form("sagsnr")

For each file In mySmartUpload.Files
  If not file.IsMissing Then
    filNavn = strSti & file.FileName
    file.SaveAs(filNavn)
    SQL = "INSERT INTO fotos (sagsnr, Mainfoto, Xtraphoto1, Xtraphoto2, Xtraphoto3, Xtraphoto4, Xtraphoto5, Xtraphoto6, Xtraphoto7, Xtraphoto8) VALUES (sagsnr, '" & filnavn & "')"
    ConnUpload.Execute(SQL)
  End If
Next

Jeg har på fornemmelsen at det ikke er korrekt ... med hensyn til values altså

fandt ud af det med aspsmartupload istedet :)
Svar og vi deler

Ok så får du lige et svar fra mig, du må havde en god jul ;)