[ASP] Checkbox insert Datatype Mismatch

[Verwijderd]

hoi ..
Ik weet dat je als je maar lang genoeg zoekt deze fout kan vinden maar ik ben al twee dagen bezig....
so will somebody please help me... (als ik van mijn checkboxes gewoone tekstvelden maak doet ie het wel.)

<%
If actie = "nieuw" Then
id = request.Form("id")
bdatum = request.Form("maandvan")&"-"&request.Form("dagvan")&"-"&request.Form("jaarvan")
edatum = request.Form("maandtot")&"-"&request.Form("dagtot")&"-"&request.Form("jaartot")
btijd = request.Form("tijdvan")
etijd = request.Form("tijdtot")
cam1 = request.Form("cam1")
If cam1 = "" Then
cam1 = "False"
Else
Cam1 = "True"
End If
cam2 = request.Form("cam2")
If cam2 = "" Then
cam2 = "False"
Else
Cam2 = "True"
End If
beamer = request.Form("beamer")
If beamer = "" Then
beamer = "False"
Else
beamer = "True"
End If
laptop = request.Form("laptop")
If laptop = "" Then
laptop = "False"
Else
laptop = "True"
End If
dvd = request.Form("dvd")
If dvd = "" Then
dvd = "False"
Else
dvd = "True"
End If
video = request.Form("video")
If video = "" Then
video = "False"
Else
video = "True"
End If
overhead = request.Form("overhead")
If overhead = "" Then
overhead = "False"
Else
overhead = "True"
End If
whiteboard = request.Form("whiteboard")
If whiteboard = "" Then
whiteboard = "False"
Else
whiteboard = "True"
End If
scherm = request.Form("scherm")
If scherm = "" Then
scherm = "False"
Else
scherm = "True"
End If
auto = request.Form("auto")
If auto = "" Then
auto = "False"
Else
auto = "True"
End If
reserveerder = request.Form("reserveerder")
lokatie = request.Form("lokatie")
opmerking = request.Form("opmerking")
Invoerder = request.Form("G_Naam")

set nieuw = Server.CreateObject("ADODB.Command")
nieuw.ActiveConnection = MM_connAlgemeen_STRING
nieuw.CommandText = "INSERT INTO Reservering (Begin_Datum, Eind_Datum, Begin_Tijd, Eind_Tijd, Camera1, Camera2, Beamer, Laptop, DVD_speler, Video_recorder, Overheadprojector, whiteboard, Scherm, Auto, Gebruiker, Locatie, Opmerking, Invoerder) VALUES ('"&bdatum&"', '"&edatum&"', '"&btijd&"', '"&etijd&"', '"&cam1&"', '"&cam2&"', '"&beamer&"', '"&laptop&"', '"&dvd&"', '"&video&"', '"&overhead&"', '"&whiteboard&"', '"&scherm&"', '"&auto&"', '"&Replace(reserveerder, "'", "''")&"', '"&Replace(lokatie, "'", "''")&"', '"&Replace(opmerking, "'", "''")&"', '"&invoerder&"')"
nieuw.CommandType = 1
nieuw.CommandTimeout = 0
nieuw.Prepared = true
nieuw.Execute()
response.Redirect("reservering.asp")

End If
%>

bij voorbaad dank

[gorgi_19]

D'r is hier volledig geen wijs uit te worden zo.

Zie Wat de FAQ over deze fout zegt.

Daarnaast, wat er mist:

1. Geen foutmelding (Datatype mismatch is een onvolledige foutmelding)
2. Geen regelnummer
3. Geen relevante code
4. Geen schermoutput
5. Geen code-tags
6. Wat heb je zelf geprobeerd? Foutmelding al in Google gegooid? ASP-Debug stappenplan gevolgd?

Oftewel: Zet je query op het scherm, voer deze uit tegen de database en je krijgt weer een foutmelding. Los deze op (Hint: True != 'True' en verder geef je dat afaik normaliter aan met 0 en 1) en pas vervolgens je applicatie aan.

[ Voor 89% gewijzigd door gorgi_19 op 24-07-2003 10:52 ]

[Glimi]

Je bent al etterlijke malen op de P&W faq gelezen.
Waarom gebruik je dan voor de 10x de quickstart niet?

[Batsies]

Uit de post wordt ik niet veel wijs, lees eerst is door wat gorgi_19 opschrijft en glimi. Dan de code, je request alles per onderdeel, dit kan je ook centraliseren bovenaan, je kijkt of iets leeg is dan is het "false" en anders "true", dit kan je ook me boolean doen. "False" dient volgens mij ook niet tussen "" te zitten. Oja en danken onder je post hoeft niet