Jag har kört den hö uppdaten i över ett år, och inte fått något fel, men nu... Felet var mitt eget, jag hade råkat lämna "Rubrik" tomt.Fel i rad??
<code>
Dim connection
Dim rst
Const adOpenKeyset = 1
Const adLockOptimistic = 3
Set rst = Server.CreateObject("ADODB.Recordset")
rst.Open "SELECT * FROM t_hemsida", connection, adOpenKeyset, adLockOptimistic
rst.AddNew
If NOT rst.EOF THEN
rst("Forening") = sForening
rst("Namn") = sNamn
rst("Rubrik") = sRubrik
If LEN(sEpost)=0 Then
rst("Epost") = "Ingen"
Else
rst("Epost") = sEpost
End If
If LEN(sHemsida)=0 Then
rst("Hemsida") = "Ingen"
Else
rst("Hemsida") = sHemsida
End If
rst("Datumet") = sDatum
rst("Beskrivning")= sBeskrivning
if err.number <> 0 then
response.write "Fel: " & err.number & " " & err.desciption
else
rst.Update
end if
End If
</code>
Jag får följande fel error:
<code>
Feltyp:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][Drivrutin för ODBC Microsoft Access]Fel i rad
/Hemsidor/GlobalaForeningen/Admin/EditHemsida/Addcust1.ASP, line 57
</code>
Där line 57 är rst.Update.
Någon som kan se/lista ut var felet ligger?Sv: Fel i rad??
Nu vet jag inte vilken drivis du har, men om du kör Access så kan du testa att byta till Jet istället.
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source= "& server.MapPath("database.mdb")
/Anna-KarinSv: Fel i rad??
Jag skall felåtgärda detta med en gång.