Avatar billede club-p Nybegynder
10. november 2004 - 21:54 Der er 9 kommentarer og
1 løsning

Asp der ikke virker

hvorfor virker dette ikke www.stenladen.dk

Du kan hente en fil her med alle 3 filer www.stenladen.dk/test.zip
Avatar billede club-p Nybegynder
10. november 2004 - 21:55 #1
Avatar billede cpufan Juniormester
10. november 2004 - 21:59 #2
<html>
<title>Indsætte data i databasen</title>
<head>
</head>
<body>
<%
' 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("/db/database1.mdb")
Conn.Open DSN

    strFornavn    = Request.Form("Fornavn")
    strEfternavn    = Request.Form("Efternavn")   
    strAdresse    = Request.Form("Adresse")
    strPostnummer    = Request.Form("Postnummer")
    strBy        = Request.Form("By")
    strFoedselsdag     = Request.Form("Foedselsdag")   
    strEmail    = Request.Form("Email")
    strTelefon    = Request.Form("Telefon")






' SQL sætning opbygges

strSQL = "INSERT INTO personer(Fornavn,Efternavn,Adresse,Postnummer,By,Foedselsdag,Email,Telefon) values('" & strFornavn & "','" & strEfternavn & "','" & strAdresse & "','" & strPostnummer & "','" & strBy & "','" & strFoedselsdag & "','" & strEmail & "','" & strTelefon & "')"




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

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

<h1>Databasen er opdateret!</h1>
</body>
</html>
Avatar billede club-p Nybegynder
10. november 2004 - 22:05 #3
hvad havde jeg gjordt galt
har ændret det den virker stadigvæk ikke
Avatar billede club-p Nybegynder
10. november 2004 - 22:11 #4
har opdateret xip fil
Avatar billede club-p Nybegynder
10. november 2004 - 22:21 #5
ups der skulle stå zip filen
Avatar billede erikjacobsen Ekspert
10. november 2004 - 22:39 #6
Fejlmeddelelsen på siden lige nu sige bar at du skal skrive
  strFornavn        = Request.Form("Fornavn") strFornavn = Replace(strTekst, "'", "''")
på to linier.

Dernæst kommer et problem med "by" i din SQL. Du kan:

strSQL = "INSERT INTO personer(Fornavn,Efternavn,Adresse,Postnummer,[By],Foedselsdag,Email,Telefon) values('" & strFornavn & "','" & strEfternavn & "','" & strAdresse & "','" & strPostnummer & "','" & strBy & "','" & strFoedselsdag & "','" & strEmail & "','" & strTelefon & "')"
Avatar billede cpufan Juniormester
10. november 2004 - 22:45 #7
åhja, den havde jeg sgu overset "by"

ved ikke lige hvor det der strFornavn = Replace(strTekst, "'", "''") kommer fra
det findes slet ikke i ovenstående kode
Avatar billede cpufan Juniormester
10. november 2004 - 22:48 #8
men hvis det er for at undgå ' i dine navne så gør sådan:

strFornavn    = replace(Request.Form("Fornavn"),"'","''")

for hver enkelt
Avatar billede erikjacobsen Ekspert
10. november 2004 - 22:53 #9
Der havde jeg overset noget. Hvis spørgeren vil bevare de 2 linier, skal de
i hvert fald rettes til

strFornavn        = Request.Form("Fornavn")
strFornavn = Replace(strFornavn, "'", "''")

Men man kan som just vist nøjes med een linie.
Avatar billede club-p Nybegynder
22. oktober 2005 - 20:53 #10
Da ingen har lagt et svar tager jeg pointene selv... hvis i vil have point må i lige skrive så får i dem
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