Weird syntax error in my asp code?

zwanz · December 27th, 2004, 09:20 AM

i got the following code:

<%
    Dim Connection
    Dim Recordset
    Dim SQL
    Dim geregistreerdcheck
    Dim admincheck

    Set Recordset = Server.CreateObject("ADODB.Recordset")
    Set Connection = Server.CreateObject("ADODB.Connection")

        If Request.form("edtadmin") = "True" Then admincheck = 1
Else admincheck = 0
end if

geregistreerdcheck = 1

        Call Connection.Open("DRIVER={Microsoft Access Driver (*.mdb)};" & _
            "DBQ=" & Server.MapPath("HelpdeskI&A.mdb"))

    SQL = "INSERT INTO tbl_klanten(username, geregistreerd, admin, password) VALUES ('" _

     & Request ("edtusername") & "','" _
     & (geregistreerdcheck) & "','" _
     & (admincheck) & "','" _
     & Request ("edtpassword") & "')"

   Call Recordset.Open(SQL, Connection)

%>

i get the following error:

Syntaxerror
/Website/beheer_gebruiker_toevoegen.asp, line 16
Else admincheck = 0

whats wrong? :/

satishkumarj · December 27th, 2004, 09:57 AM

Hi,

U may have double quote in values which ur getting from the page...

Check the values .....

Satish Kumar J

zwanz · December 27th, 2004, 11:05 AM

what do u mean by double quotes?
i just got a checkbox which u can check or not check :o

Imar · December 27th, 2004, 12:32 PM

Hi zwanz,

You should put each If and Else block on separate lines:

Code:

If Request.form("edtadmin") = "True" Then 
  admincheck = 1
Else 
  admincheck = 0
End If

Cheers,

Imar

zwanz · December 28th, 2004, 03:50 AM

dank u ;)

Imar · December 28th, 2004, 05:23 PM

Graag gedaan ;)

Alvast een Gelukkig Nieuw Jaar!!

Imar
---------------------------------------
Imar Spaanjaars
Everyone is unique, except for me.