Min udbyder bruger ikke samme upload plugin
er der nogen der ved hvordan hulen jeg kan få nedestående kode til at virke sammen med ASP SAupload, jeg har fået et link fra min udbyder, men jeg forstår hverken hoved eller hale i det materiale.<%
Set Upload = Server.CreateObject("SoftArtisans.FileUp")
' Limit file size to 50000 bytes, throw an exception if file is larger
Upload.SetMaxSize 100000, True
' Undgå samme filnavn på to billeder
Upload.OverwriteFiles = False
' Perform upload
Count = Upload.SaveVirtual("../log/")
If Err then
' 8 is the number of "File too large" exception
If Err.Number = 8 Then
Response.Write "Billedet er over 100kb. <br><br> <a href=""uploadpic.asp"">Prøv et andet billede.</a>"
Else
If Err <> 0 Then
Response.Write "Der opstod en fejl " & Err.Description
Response.Write "<br><br> <a href=""uploadpic.asp"">Prøv igen.</a>"
end if
end if
else
Set myConn = Server.CreateObject("ADODB.Connection")
myConn.open = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=d:\usr\databaser\db\roskilde.mdb;"
' Billedestien indsættes i PersonTabel
for each file in Upload.Files
strSQL = "Update PersonTabel SET Sti = '" & File.ExtractFileName & "' WHERE PersonID LIKE '" & Session("ID") & "'"
myConn.Execute(strSQL)
next
personSQL = "UPDATE PersonTabel Set Billede = 'Ja' WHERE PersonID =" & Session("ID") & ""
myConn.Execute(personSQL)
response.redirect("billedevalg.asp")
end if
%>
ovenstående er scriptet til udførsel af upload og tilføjelse af billedelink i databasen.
nedenstående er linket til min udbyders upload plugin information.
http://support.softartisans.com/docs/FileUpV4/
håber der er nogen som forstår det bedre end mig.
Duno :-)
