Avatar billede s Nybegynder
13. august 2001 - 19:21 Der er 5 kommentarer og
2 løsninger

Haster meget: databaseupdate

Når jeg kører dette script kommer der en fejl. Fejlen lyder:

Microsoft OLE DB Provider for ODBC Drivers error \'80004005\'

[Microsoft][ODBC Microsoft Access Driver] Operation must use an updateable query.

/tilfojexecute.asp, line 35



Databasen ligger OK, og er ikke skrivebeskyttet eller noget.


Her er scriptet:

<%
Response.Expires = 0

Response.AddHeader \"PRAGMA\", \"NO-CACHE\"

Response.Buffer = True

if not Session(\"Inde\") = True then response.redirect \"login.html\"

for each x in request.form
if request.form(x) = \"\" then
ikkeok = True
end if
next

if ikkeok then
%>
<html>
<body onload=\"java script:history.go(-1)\">
</body>
</html>
<%
else

Connection = \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.Mappath(\"priser.mdb\")

Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.open Connection

SYS = replace(request.form(\"SYS\"), \",\", \".\")
Patient = replace(request.form(\"Patient\"), \",\", \".\")

Sql = \"INSERT INTO priser (Overskrift, Behandling, SYS, Patient) VALUES(\'\" & Request.form(\"Overskrift\") & \"\', \'\" & request.form(\"Behandling\") & \"\', \" & SYS & \", \" & Patient & \")\"

Conn.execute( Sql )

Conn.close
Set Conn = Nothing

response.redirect \"admin.asp\"

end if
%>




Feltet Overskrift er af typen tekst
Feltet Behandling er af typen notat
Felterne SYS og Patient er af typen tal
ID er af typen autonummerering



Jeg håber stærkt der er nogle der kan hjælpe mig.
Avatar billede stig3 Mester
13. august 2001 - 19:27 #1
Prøv at lukke databasen når du kører scriptet.
Avatar billede slash Nybegynder
13. august 2001 - 19:30 #2
mangler du ik cint omk. dine tal, altså:
Sql = \"INSERT INTO priser (Overskrift, Behandling, SYS, Patient) VALUES(\'\" & Request.form(\"Overskrift\") & \"\', \'\" & request.form(\"Behandling\") & \"\', \" & cint(SYS) & \", \" & cint(Patient) & \")\"
Avatar billede ldn Nybegynder
13. august 2001 - 19:33 #3
Prøv lige at tjekke om databasen ikke er skrivebeskyttet (højreklik og se egenskaberne for filen)
Avatar billede prof2 Nybegynder
13. august 2001 - 20:43 #4
Se om databasen, måske ligger i en mappe der ikke er skrive adgang til. Sprøg de web-server udbyder.

Prøv eller at skriv til databasen sådan her:



Set Conn = Server.CreateObject(\"ADODB.Connection\")
Set RS = Server.CreateObject(\"ADODB.RecordSet\")
Conn.open Connection

SYS = replace(request.form(\"SYS\"), \",\", \".\")
Patient = replace(request.form(\"Patient\"), \",\", \".\")

rs.open \"Select * from [priser]\",dataconn,1,3
rs.addnew
rs(\"overskrift\") = request.form(\"overskrift\")
rs(\"behandling\") = request.form(\"behandling\")
rs(\"sys\") = sys
rs(\"patient\") = patient
rs.update

rs.close
Conn.close
Set Conn = Nothing
set rs = nothing
Avatar billede netsrac Praktikant
14. august 2001 - 01:11 #5
Avatar billede prof2 Nybegynder
14. august 2001 - 14:55 #6
netsrac> Det har jeg også skrevet. :) Bare ikke lige med link og det hele.

Så jeg skal også have points :)
Avatar billede prof2 Nybegynder
14. august 2001 - 19:24 #7
HALLO ??? FÅ DA LUKKET DET HER SPØRGSMÅL!!!!!
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester