Avatar billede ducks Nybegynder
11. december 2002 - 13:20 Der er 3 kommentarer og
1 løsning

Åbne database forb. med skriverettigheder

Lige nu åbner jeg forbindelsen til databasen sådan her:

Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("database.mdb")
Conn.Open DSN
strSQL1 = "Select * From Skema Where id='1'"
Set rs1 = Conn.Execute(strSQL1)

Men når jeg vil indsætte noget i databasen, siger den:

Fejltype:
ADODB.Recordset (0x800A0CB3)
Det aktuelle postsæt understøtter ikke opdatering. Det kan skyldes en begrænsing af provideren eller den markerede låsetype.

Jeg går ud fra, at det er fordi der ikke er åbnet med skriverettigheder, men hvordan er det nu man gør det? Det er noget med 3, 3
Avatar billede medions Nybegynder
11. december 2002 - 13:22 #1
Du kan ikke åbne din database med skriverettigheder, eller jo det kan du godt, men det er ikke det der er galt i dette tilfælde!

-hvis du kører IIS på din egen maskine, så find din databasefil, højreklik på den, -> Propperties -> Fjern hak i Read-Only -> Security -> Add -> IUSR_MASHINNAME -> Add -> Ok.. nu skulle det gerne virke!

//>Rune
Avatar billede medions Nybegynder
11. december 2002 - 13:23 #2
Men ellers prøv med dette ;o)

Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("database.mdb")
Conn.Open Conn, DNS, 1, 2
strSQL1 = "Select * From Skema Where id=1"
Set rs1 = Conn.Execute(strSQL1)

//>Rune
Avatar billede ducks Nybegynder
11. december 2002 - 13:36 #3
Databasen er ikke skrivebeskyttet, og det virker ikke på diverse domæner - det virker heller ikke at skrive Conn.Open Conn, DNS, 1, 2.
Avatar billede hossein Nybegynder
11. december 2002 - 22:40 #4
jeg tror du anvender AddNew methoden for at inserte (tilføje) noget i din tabel (performance i jet.oledb er bedre):
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath ("database.mdb")
strSQL = "Select * From Skema Where id=1"
Set rst = Server.CreateObject("ADODB.Recordset")
rst.Open strSQL, Conn, 3, 3 (3 fordi ellers er den readonly)
rst.addnew (resten skal være din egen)
rst.fields("navn") = navn
rst.fields("tlfnr") = tlfnr
rst.update

rst.Close
conn.close
%>
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