Hur skriver jag om koden nedan så att jag kan uppdatera istället för att lägga till ?Updatera med ASPUpload ?
====================================================
Set Upload = Server.CreateObject("Persits.Upload")
Upload.SetMaxSize 100000, True
Count = Upload.Save
Set File = Upload.Files("FResultat")
If Not File Is Nothing Then
Connect = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath(".\databas\wbbas.mdb")
Set rs = Server.CreateObject("adodb.recordset")
Hash = File.MD5Hash
rs.Open "SELECT * from Mall WHERE Hash='" & Hash & "'", Connect, 2, 3
If Not rs.EOF Then
Response.Write "This file already exists in the database."
Response.End
End If
rs.Close
rs.Open "Mall", Connect, 3, 3
rs.AddNew
rs("SmId") = Upload.Form("SmId")
rs("FBlob") = File.Binary
rs("FNamn") = File.FileName
rs("FStor") = File.Size
rs("hash") = Hash
rs("SmNamn") = Upload.Form("SmNamn")
rs("SmDatum") = Upload.Form("SmDatum")
rs("SmJour") = Upload.Form("SmJour")
rs("SmForm") = Upload.Form("SmForm")
rs("SmAnsv") = Upload.Form("SmAnsv")
rs("SmAnm") = Upload.Form("SmAnm")
rs.Update
Response.Redirect("Mall.asp")
Else
====================================================
ID för det som ska uppdateras är redan bestämt. Så det är någon form av SQL = "UPDATE tabell SET kod kod WHERE Id = " & Request.Form("Id") Jag behöver. Jag vet inte hur man gör det med ASPUpload.