Slettet bruger
17. februar 2005 - 00:06
Der er
6 kommentarer og 1 løsning
lav obligatoriske felter
Nogen der kan hjælpe med at gøre felterne Navn/Besked obligatoriske, resten skal være valgfrit. <% ' 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.mdb") Conn.Open DSN ' SQL sætning opbygges strSQL = "Insert into gaestebogen (Navn, Email, Hjemmeside, Besked) values('"& Request.Form("Navn") &"','"& Request.Form("Email") &"','"& Request.Form("Hjemmeside") &"','"& Request.Form("Besked") &"')" Conn.Execute(strSQL) Conn.Close Set Conn = Nothing %>
Annonceindlæg tema
Cloud & AI
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
17. februar 2005 - 11:23
#1
if Request.Form("Navn") = "" or Request.Form("Besked") = "" then Response.Write("Data mangler") else ' 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.mdb") Conn.Open DSN ' SQL sætning opbygges strSQL = "Insert into gaestebogen (Navn, Email, Hjemmeside, Besked) values ('"& Request.Form("Navn") &"','"& Request.Form("Email") &"','"& Request.Form("Hjemmeside") &"','"& Request.Form("Besked") &"')" Conn.Execute(strSQL) Conn.Close Set Conn = Nothing end if %> Men jeg har en fornemmelse af at det ikke er nok :o)
Slettet bruger
17. februar 2005 - 15:25
#2
Udfylder man navn/besked og ikke E-mail og HP, så får man fejlen Microsoft OLE DB Provider for ODBC Drivers error '80004005' [Microsoft][ODBC Microsoft Access Driver] Field 'gaestebogen.Email' cannot be a zero-length string. /gaestebog/skriv_ok.asp, line 25 I linie 25 står der Conn.Execute(strSQL)
17. februar 2005 - 15:42
#3
Ja. Email er tom og du har lavet databasen så feltet ikke må være tomt. Hvis du vil tillade tomt Email, så skal du ændre det i databasen. Åbn tabellen i Design, marker Email-kolonnen, og sæt options nederst i vinduet
17. februar 2005 - 20:45
#4
Man kunne også bare udvide if-sætningen if Request.Form("Navn") = "" or Request.Form("Besked") = "" ... :-)
Slettet bruger
19. september 2005 - 10:54
#5
lukker
19. september 2005 - 11:13
#6
Kunne du ikke bruge nogt af det?
Slettet bruger
19. september 2005 - 12:44
#7
Fik i hvertfald intet til at virke.
Kurser inden for grundlæggende programmering