Avatar billede musicchart.dk Nybegynder
02. maj 2002 - 18:21 Der er 10 kommentarer og
1 løsning

Skrive i en dbase..

Hey

Jeg håber i kan hjælpe. Jeg har lavet en admin side hvor jeg vil kunne redigere, ved hjælp af en form, i en dbase i tabellen "Links"...

Min kode ser sådan ud:

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("/cgi-bin/database.mdb")
Conn.Open DSN

strSQL = "Insert into personer ("

strSQL = strSQL & "Fornavn, "
strSQL = strSQL & "Efternavn, "
strSQL = strSQL & "Telefon, "
strSQL = strSQL & "Foedselsdato) "

strSQL = strSQL & "values( "

strSQL = strSQL & " & Request.Form("linknavn"), "
strSQL = strSQL & " & Request.Form("adresse"), "
strSQL = strSQL & " & Request.Form("beskrivelse") ")"

Conn.Execute(strSQL)

Conn.Close
Set Conn = Nothing
%>

På forhånd Tak
/Bjarke
Avatar billede musicchart.dk Nybegynder
02. maj 2002 - 18:22 #1
... men den virker ikke.
Avatar billede musicchart.dk Nybegynder
02. maj 2002 - 18:23 #2
Den skriver at "slut på sætning var ventet"
strSQL = strSQL & " & Resquest.Form("linknavn"), "
Avatar billede keysersoze Ekspert
02. maj 2002 - 18:24 #3
du skriver ikke så meget hvad der går galt eller noget - men her er et forslag der burde virke hvis alle dine felter er tekstfelter;

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("/cgi-bin/database.mdb")
Conn.Open DSN

strSQL = "Insert into personer ("

strSQL = strSQL & "Fornavn, "
strSQL = strSQL & "Efternavn, "
strSQL = strSQL & "Telefon, "
strSQL = strSQL & "Foedselsdato) "

strSQL = strSQL & "values( "
strSQL = strSQL & "'" & Request.Form("fornavn") & "', "
strSQL = strSQL & "'" & Request.Form("efternavn") & "', "
strSQL = strSQL & "'" & Request.Form("telefon") & "', "
strSQL = strSQL & "'" & Request.Form("foedselsdato") & "')"

desuden skal du jo så sørge for at navnene stemmer overens med dine form-felter
Avatar billede canedo Nybegynder
02. maj 2002 - 18:26 #4
skal den sidste linie strSQL måske se sådan du:
strSQL = strSQL & " & Request.Form("beskrivelse") & ")"

.... bare måske
//
canedo
Avatar billede -master-d- Nybegynder
02. maj 2002 - 18:26 #5
Sådan her, du mangler et &-tegn og et ".
" & Request.Form("linknavn") & ", "

sådan skal de to andre også være
Avatar billede -master-d- Nybegynder
02. maj 2002 - 18:29 #6
det er keysersoze der har rigtigt, den virker. Min var lige en smutter.
Avatar billede musicchart.dk Nybegynder
02. maj 2002 - 18:31 #7
<< keysersoze >> hmmm... den siger at: "Der er en ugyldig SQ-sætning, "Delete","Insert","Procedure","select" eller "Update" var ventet.
Avatar billede keysersoze Ekspert
02. maj 2002 - 18:33 #8
så prøv lige før "Conn.Execute(strSQL)" at skriv

response.write strSQL

så jeg kan se hvordan linien ser ud
Avatar billede musicchart.dk Nybegynder
02. maj 2002 - 18:39 #9
<< keysersoze >> Linknavn,Adresse,Beskrivelse)values('mypage','http://www.mypage.dk','en god side')
Avatar billede musicchart.dk Nybegynder
02. maj 2002 - 18:43 #10
<< keysersoze >> har fået det til at virke... kan du ikke skrive et svar så du kan få dine point...

/Bjarke
Avatar billede keysersoze Ekspert
02. maj 2002 - 18:46 #11
jo - det kan jeg da godt :)
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