hvor er fejlen i Aspupload koden
<% Response.Buffer = True %><html>
<title>site</title>
<head>
</head>
<body>
<%
Dim RSnyvare__MMColParam
RSnyvare__MMColParam = "1"
If (Request.QueryString("id") <> "") Then
RSnyvare__MMColParam = Request.QueryString("id")
End If
%>
<%
Set Upload = Server.CreateObject("Persits.Upload")
Count = Upload.SaveVirtual ("/images/varerimages")
' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("/db/antik.mdb")
Conn.Open DSN
'Tilføjer brugeren til databasen
Set rs = Server.CreateObject("ADODB.Recordset")
strSQL = "update varer set billede = '"& file.FileName &"' WHERE id = " & Replace(RSnyvare__MMColParam, "'", "''")
rs.Open strsql, conn, 1, 3
response.Redirect("../intern/nyvare4.asp?=id")
%>
</body>
</html>
Jeg får hele tiden denne fejl når jeg prøver at opdatere en post i min db. Fejlen kommer, når jeg vil uploade et nyt billede...
Object required: ''
Fejlen refererer til denne linje:
strSQL = "update varer set billede = '"& file.FileName &"' WHERE id = " & Replace(RSnyvare__MMColParam, "'", "''")
'"& file.FileName &"' bruges normalt til SmartAspUpload, og muligvis er det denne der skal skiftes ud, kender bare ikke til AspUpload, så ved ikke med hvad.
Er der nogen der kan lokalisere fejlen?
