Avatar billede caroc Praktikant
12. marts 2003 - 20:11 Der er 2 kommentarer og
1 løsning

Skrive til Access

Jeg har lavet denne kode:
<%
' 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("../../Database/Nyheder.mdb")
Conn.Open DSN

strSQL = "Insert into Nyheder (Forfatter) values('" & Request.Form("Forfatter") & "')"
strSQL = "Insert into Nyheder (Overskrift) values('" & Request.Form("Overskrift") & "')"
strSQL = "Insert into Nyheder (Dato) values('" & Request.Form("Dato") & "')"
strSQL = "Insert into Nyheder (Indhold) values('" & Request.Form("Indhold") & "')"

' SQL sætning eksekveres
Conn.Execute(strSQL)

' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>

Som gerne skulle skrive til min database men det er kun feltet "indhold" der bliver udfyldt - hvorfor?
Avatar billede cesil Nybegynder
12. marts 2003 - 20:22 #1
strSQL = "Insert into Nyheder (Forfatter,Overskrift,Dato,Indhold) values('" & Request.Form("Forfatter") & "','" & Request.Form("Overskrift") & "','" & Request.Form("Dato") & "','" & Request.Form("Indhold") & "')"
Avatar billede oasen Nybegynder
13. marts 2003 - 10:41 #2
Som cesil skriver kan du indsætte det hele via en enkelt SQL.
I dit eget eksempel bruger du fire. Disse overskriver hinanden, så den SQL, der bliver udført er den sidste:

strSQL = "Insert into Nyheder (Indhold) values('" & Request.Form("Indhold") & "')"
Avatar billede snuseren.dk Nybegynder
15. marts 2003 - 19:50 #3
Prøv det her:

<%
' 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("../../Database/Nyheder.mdb")
Conn.Open DSN

strSQL = "Insert into Nyheder ("Forfatter", "Overskrift", "Dato", "Indhold") values('" & Request.Form("Forfatter") & "', "'" & Request.Form("Overskrift") & "'", "'" & Request.Form("Dato") & "'", "'" & Request.Form("Indhold") & "'")"

' SQL sætning eksekveres
Conn.Execute(strSQL)

' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>


Der bliver der kun brugt én sql sætning, så det dku virke :)


MVH
Anders
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