Help needed : error in "INSERT INTO"

Discussion in 'ASP General' started by Luc Dal, Mar 1, 2005.

  1. Luc Dal

    Luc Dal Guest

    Hello,

    I've serious problem using ASP under WindowsXP sp2.
    I get the following reply (sorry it's in french)
    Erreur de compilation Microsoft VBScript error '800a0401'

    Fin d'instruction attendue

    /iisHelp/common/500-100.asp, line 11

    Dim objASPError, blnErrorWritten, strServername, strServerIP, strRemoteIP
    Dim strMethod, lngPos, datNow, strQueryString, strURL
    --------------------------------------------------------------------------^Microsoft
    JET Database Engine error '80040e14'

    Erreur de syntaxe dans l'instruction INSERT INTO.

    /cytiserw/Include/commun.asp, line 49

    Here are the instructions in vbscript :

    '=====================================================
    Public sub OuvreConnexion(nomcomplet,strMotdePasse)
    Dim Connstr
    Set Conn = Server.CreateObject("ADODB.Connection")
    Set Comm = Server.CreateObject("ADODB.Command")
    Connstr = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
    "Data Source=" & nomcomplet &";" & _
    "Jet OLEDB:Database Password=" & strMotdePasse
    Response.Write(Connstr)
    Conn.Open Connstr
    Set Comm.ActiveConnection = Conn
    end sub
    '=====================================================
    Public Sub FermeConnexion()
    Set Rec_Set = Nothing
    Set Comm = Nothing
    Conn.Close
    Set Conn = Nothing
    End Sub
    '=====================================================
    Public Sub MAJ_BaseIP()
    dim ip,str,sql
    str=""
    call OuvreConnexion(session("chemin")&Utilisateurs,MotdePasseBdd)
    ip=Request.ServerVariables("REMOTE_ADDR")
    Response.Write(ip)
    sql="insert numIP into visites Values('"&ip&"')"
    conn.execute sql
    call FermeConnexion
    end sub
    ********************************************************************************

    It worked perfectly well before sp2.

    Where's the bug (if any) in my lines ?
    Thanks for your help.

    Lu
    Luc Dal, Mar 1, 2005
    #1
    1. Advertising

  2. Luc Dal

    Luc Dal Guest

    Sorry

    Hre's ethe good line :

    sql="insert into visites (numIP) Values('"&ip&"')"



    "Luc Dal" <> a écrit dans le message de news:
    d020am$l48$...
    > Hello,
    >
    > I've serious problem using ASP under WindowsXP sp2.
    > I get the following reply (sorry it's in french)
    > Erreur de compilation Microsoft VBScript error '800a0401'
    >
    > Fin d'instruction attendue
    >
    > /iisHelp/common/500-100.asp, line 11
    >
    > Dim objASPError, blnErrorWritten, strServername, strServerIP, strRemoteIP
    > Dim strMethod, lngPos, datNow, strQueryString, strURL
    > --------------------------------------------------------------------------^Microsoft
    > JET Database Engine error '80040e14'
    >
    > Erreur de syntaxe dans l'instruction INSERT INTO.
    >
    > /cytiserw/Include/commun.asp, line 49
    >
    > Here are the instructions in vbscript :
    >
    > '=====================================================
    > Public sub OuvreConnexion(nomcomplet,strMotdePasse)
    > Dim Connstr
    > Set Conn = Server.CreateObject("ADODB.Connection")
    > Set Comm = Server.CreateObject("ADODB.Command")
    > Connstr = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
    > "Data Source=" & nomcomplet &";" & _
    > "Jet OLEDB:Database Password=" & strMotdePasse
    > Response.Write(Connstr)
    > Conn.Open Connstr
    > Set Comm.ActiveConnection = Conn
    > end sub
    > '=====================================================
    > Public Sub FermeConnexion()
    > Set Rec_Set = Nothing
    > Set Comm = Nothing
    > Conn.Close
    > Set Conn = Nothing
    > End Sub
    > '=====================================================
    > Public Sub MAJ_BaseIP()
    > dim ip,str,sql
    > str=""
    > call OuvreConnexion(session("chemin")&Utilisateurs,MotdePasseBdd)
    > ip=Request.ServerVariables("REMOTE_ADDR")
    > Response.Write(ip)
    > sql="insert numIP into visites Values('"&ip&"')"
    > conn.execute sql
    > call FermeConnexion
    > end sub
    > ********************************************************************************
    >
    > It worked perfectly well before sp2.
    >
    > Where's the bug (if any) in my lines ?
    > Thanks for your help.
    >
    > Lu
    >
    >
    Luc Dal, Mar 1, 2005
    #2
    1. Advertising

  3. Luc Dal

    Steven Burn Guest

    Article #2400 Why do I get 80040E14 errors?
    http://aspfaq.com/show.asp?id=2400

    --
    Regards

    Steven Burn
    Ur I.T. Mate Group
    www.it-mate.co.uk

    Keeping it FREE!

    "Luc Dal" <> wrote in message news:d0217o$l91$...
    > Sorry
    >
    > Hre's ethe good line :
    >
    > sql="insert into visites (numIP) Values('"&ip&"')"
    >
    >
    >
    > "Luc Dal" <> a écrit dans le message de news:
    > d020am$l48$...
    > > Hello,
    > >
    > > I've serious problem using ASP under WindowsXP sp2.
    > > I get the following reply (sorry it's in french)
    > > Erreur de compilation Microsoft VBScript error '800a0401'
    > >
    > > Fin d'instruction attendue
    > >
    > > /iisHelp/common/500-100.asp, line 11
    > >
    > > Dim objASPError, blnErrorWritten, strServername, strServerIP, strRemoteIP
    > > Dim strMethod, lngPos, datNow, strQueryString, strURL
    > > --------------------------------------------------------------------------^Microsoft
    > > JET Database Engine error '80040e14'
    > >
    > > Erreur de syntaxe dans l'instruction INSERT INTO.
    > >
    > > /cytiserw/Include/commun.asp, line 49
    > >
    > > Here are the instructions in vbscript :
    > >
    > > '=====================================================
    > > Public sub OuvreConnexion(nomcomplet,strMotdePasse)
    > > Dim Connstr
    > > Set Conn = Server.CreateObject("ADODB.Connection")
    > > Set Comm = Server.CreateObject("ADODB.Command")
    > > Connstr = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
    > > "Data Source=" & nomcomplet &";" & _
    > > "Jet OLEDB:Database Password=" & strMotdePasse
    > > Response.Write(Connstr)
    > > Conn.Open Connstr
    > > Set Comm.ActiveConnection = Conn
    > > end sub
    > > '=====================================================
    > > Public Sub FermeConnexion()
    > > Set Rec_Set = Nothing
    > > Set Comm = Nothing
    > > Conn.Close
    > > Set Conn = Nothing
    > > End Sub
    > > '=====================================================
    > > Public Sub MAJ_BaseIP()
    > > dim ip,str,sql
    > > str=""
    > > call OuvreConnexion(session("chemin")&Utilisateurs,MotdePasseBdd)
    > > ip=Request.ServerVariables("REMOTE_ADDR")
    > > Response.Write(ip)
    > > sql="insert numIP into visites Values('"&ip&"')"
    > > conn.execute sql
    > > call FermeConnexion
    > > end sub
    > > ********************************************************************************
    > >
    > > It worked perfectly well before sp2.
    > >
    > > Where's the bug (if any) in my lines ?
    > > Thanks for your help.
    > >
    > > Lu
    > >
    > >

    >
    >
    >
    Steven Burn, Mar 1, 2005
    #3
  4. Luc Dal

    Luc Dal Guest

    Thanks,
    But now i've the following error: (sorry, it' in french)


    Erreur de compilation Microsoft VBScript error '800a0401'

    Fin d'instruction attendue

    /iisHelp/common/500-100.asp, line 16

    If Response.Buffer Then Response.Clear Response.Status = "500 Erreur interne
    du serveur" Response.ContentType = "text/html" Response.Expires = 0 End If
    -----------------------------------------------------------------------------------------^Microsoft
    JET Database Engine error '80004005'

    L'opération doit utiliser une requête qui peut être mise à jour.

    /cytiserw/Include/commun.asp, line 49



    ***********************************************************************

    "Steven Burn" <> a écrit dans le message de news:
    ...
    Article #2400 Why do I get 80040E14 errors?
    http://aspfaq.com/show.asp?id=2400

    --
    Regards

    Steven Burn
    Ur I.T. Mate Group
    www.it-mate.co.uk

    Keeping it FREE!

    "Luc Dal" <> wrote in message
    news:d0217o$l91$...
    > Sorry
    >
    > Hre's ethe good line :
    >
    > sql="insert into visites (numIP) Values('"&ip&"')"
    >
    >
    >
    > "Luc Dal" <> a écrit dans le message de news:
    > d020am$l48$...
    > > Hello,
    > >
    > > I've serious problem using ASP under WindowsXP sp2.
    > > I get the following reply (sorry it's in french)
    > > Erreur de compilation Microsoft VBScript error '800a0401'
    > >
    > > Fin d'instruction attendue
    > >
    > > /iisHelp/common/500-100.asp, line 11
    > >
    > > Dim objASPError, blnErrorWritten, strServername, strServerIP,
    > > strRemoteIP
    > > Dim strMethod, lngPos, datNow, strQueryString, strURL
    > > --------------------------------------------------------------------------^Microsoft
    > > JET Database Engine error '80040e14'
    > >
    > > Erreur de syntaxe dans l'instruction INSERT INTO.
    > >
    > > /cytiserw/Include/commun.asp, line 49
    > >
    > > Here are the instructions in vbscript :
    > >
    > > '=====================================================
    > > Public sub OuvreConnexion(nomcomplet,strMotdePasse)
    > > Dim Connstr
    > > Set Conn = Server.CreateObject("ADODB.Connection")
    > > Set Comm = Server.CreateObject("ADODB.Command")
    > > Connstr = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
    > > "Data Source=" & nomcomplet &";" & _
    > > "Jet OLEDB:Database Password=" & strMotdePasse
    > > Response.Write(Connstr)
    > > Conn.Open Connstr
    > > Set Comm.ActiveConnection = Conn
    > > end sub
    > > '=====================================================
    > > Public Sub FermeConnexion()
    > > Set Rec_Set = Nothing
    > > Set Comm = Nothing
    > > Conn.Close
    > > Set Conn = Nothing
    > > End Sub
    > > '=====================================================
    > > Public Sub MAJ_BaseIP()
    > > dim ip,str,sql
    > > str=""
    > > call OuvreConnexion(session("chemin")&Utilisateurs,MotdePasseBdd)
    > > ip=Request.ServerVariables("REMOTE_ADDR")
    > > Response.Write(ip)
    > > sql="insert numIP into visites Values('"&ip&"')"
    > > conn.execute sql
    > > call FermeConnexion
    > > end sub
    > > ********************************************************************************
    > >
    > > It worked perfectly well before sp2.
    > >
    > > Where's the bug (if any) in my lines ?
    > > Thanks for your help.
    > >
    > > Lu
    > >
    > >

    >
    >
    >
    Luc Dal, Mar 1, 2005
    #4
  5. Luc Dal

    Mark Schupp Guest

    sql="insert into visites (numIP) Values('"&ip&"')"
    response.write sql
    response.end

    do you get what you expected?

    --
    --Mark Schupp
    Head of Development
    Integrity eLearning
    www.ielearning.com

    "Luc Dal" <> wrote in message
    news:d0217o$l91$...
    > Sorry
    >
    > Hre's ethe good line :
    >
    > sql="insert into visites (numIP) Values('"&ip&"')"
    >
    >
    >
    > "Luc Dal" <> a écrit dans le message de news:
    > d020am$l48$...
    >> Hello,
    >>
    >> I've serious problem using ASP under WindowsXP sp2.
    >> I get the following reply (sorry it's in french)
    >> Erreur de compilation Microsoft VBScript error '800a0401'
    >>
    >> Fin d'instruction attendue
    >>
    >> /iisHelp/common/500-100.asp, line 11
    >>
    >> Dim objASPError, blnErrorWritten, strServername, strServerIP, strRemoteIP
    >> Dim strMethod, lngPos, datNow, strQueryString, strURL
    >> --------------------------------------------------------------------------^Microsoft
    >> JET Database Engine error '80040e14'
    >>
    >> Erreur de syntaxe dans l'instruction INSERT INTO.
    >>
    >> /cytiserw/Include/commun.asp, line 49
    >>
    >> Here are the instructions in vbscript :
    >>
    >> '=====================================================
    >> Public sub OuvreConnexion(nomcomplet,strMotdePasse)
    >> Dim Connstr
    >> Set Conn = Server.CreateObject("ADODB.Connection")
    >> Set Comm = Server.CreateObject("ADODB.Command")
    >> Connstr = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
    >> "Data Source=" & nomcomplet &";" & _
    >> "Jet OLEDB:Database Password=" & strMotdePasse
    >> Response.Write(Connstr)
    >> Conn.Open Connstr
    >> Set Comm.ActiveConnection = Conn
    >> end sub
    >> '=====================================================
    >> Public Sub FermeConnexion()
    >> Set Rec_Set = Nothing
    >> Set Comm = Nothing
    >> Conn.Close
    >> Set Conn = Nothing
    >> End Sub
    >> '=====================================================
    >> Public Sub MAJ_BaseIP()
    >> dim ip,str,sql
    >> str=""
    >> call OuvreConnexion(session("chemin")&Utilisateurs,MotdePasseBdd)
    >> ip=Request.ServerVariables("REMOTE_ADDR")
    >> Response.Write(ip)
    >> sql="insert numIP into visites Values('"&ip&"')"
    >> conn.execute sql
    >> call FermeConnexion
    >> end sub
    >> ********************************************************************************
    >>
    >> It worked perfectly well before sp2.
    >>
    >> Where's the bug (if any) in my lines ?
    >> Thanks for your help.
    >>
    >> Lu
    >>
    >>

    >
    >
    >
    Mark Schupp, Mar 1, 2005
    #5
  6. Luc Dal

    Steven Burn Guest

    For the first one;

    http://aspfaq.com/show.asp?id=2363
    http://aspfaq.com/show.asp?id=2414

    ........ and for the second (a very common but mis-interpreted error)

    http://aspfaq.com/search.asp?q=80004005&type=ALL&category=0&numDays=0&order=1

    Apologies for not being more helpful (my French is somewhat lacking... hopefully if the above does not help, one of the experts will come along and help (Bob, Aaron... where the heck are ya!))

    --
    Regards

    Steven Burn
    Ur I.T. Mate Group
    www.it-mate.co.uk

    Keeping it FREE!

    "Luc Dal" <> wrote in message news:d0230a$lmi$...
    > Thanks,
    > But now i've the following error: (sorry, it' in french)
    >
    >
    > Erreur de compilation Microsoft VBScript error '800a0401'
    >
    > Fin d'instruction attendue
    >
    > /iisHelp/common/500-100.asp, line 16
    >
    > If Response.Buffer Then Response.Clear Response.Status = "500 Erreur interne
    > du serveur" Response.ContentType = "text/html" Response.Expires = 0 End If
    > -----------------------------------------------------------------------------------------^Microsoft
    > JET Database Engine error '80004005'
    >
    > L'opération doit utiliser une requête qui peut être mise à jour.
    >
    > /cytiserw/Include/commun.asp, line 49
    >
    >
    >
    > ***********************************************************************
    >
    > "Steven Burn" <> a écrit dans le message de news:
    > ...
    > Article #2400 Why do I get 80040E14 errors?
    > http://aspfaq.com/show.asp?id=2400
    >
    > --
    > Regards
    >
    > Steven Burn
    > Ur I.T. Mate Group
    > www.it-mate.co.uk
    >
    > Keeping it FREE!
    >
    > "Luc Dal" <> wrote in message
    > news:d0217o$l91$...
    > > Sorry
    > >
    > > Hre's ethe good line :
    > >
    > > sql="insert into visites (numIP) Values('"&ip&"')"
    > >
    > >
    > >
    > > "Luc Dal" <> a écrit dans le message de news:
    > > d020am$l48$...
    > > > Hello,
    > > >
    > > > I've serious problem using ASP under WindowsXP sp2.
    > > > I get the following reply (sorry it's in french)
    > > > Erreur de compilation Microsoft VBScript error '800a0401'
    > > >
    > > > Fin d'instruction attendue
    > > >
    > > > /iisHelp/common/500-100.asp, line 11
    > > >
    > > > Dim objASPError, blnErrorWritten, strServername, strServerIP,
    > > > strRemoteIP
    > > > Dim strMethod, lngPos, datNow, strQueryString, strURL
    > > > --------------------------------------------------------------------------^Microsoft
    > > > JET Database Engine error '80040e14'
    > > >
    > > > Erreur de syntaxe dans l'instruction INSERT INTO.
    > > >
    > > > /cytiserw/Include/commun.asp, line 49
    > > >
    > > > Here are the instructions in vbscript :
    > > >
    > > > '=====================================================
    > > > Public sub OuvreConnexion(nomcomplet,strMotdePasse)
    > > > Dim Connstr
    > > > Set Conn = Server.CreateObject("ADODB.Connection")
    > > > Set Comm = Server.CreateObject("ADODB.Command")
    > > > Connstr = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
    > > > "Data Source=" & nomcomplet &";" & _
    > > > "Jet OLEDB:Database Password=" & strMotdePasse
    > > > Response.Write(Connstr)
    > > > Conn.Open Connstr
    > > > Set Comm.ActiveConnection = Conn
    > > > end sub
    > > > '=====================================================
    > > > Public Sub FermeConnexion()
    > > > Set Rec_Set = Nothing
    > > > Set Comm = Nothing
    > > > Conn.Close
    > > > Set Conn = Nothing
    > > > End Sub
    > > > '=====================================================
    > > > Public Sub MAJ_BaseIP()
    > > > dim ip,str,sql
    > > > str=""
    > > > call OuvreConnexion(session("chemin")&Utilisateurs,MotdePasseBdd)
    > > > ip=Request.ServerVariables("REMOTE_ADDR")
    > > > Response.Write(ip)
    > > > sql="insert numIP into visites Values('"&ip&"')"
    > > > conn.execute sql
    > > > call FermeConnexion
    > > > end sub
    > > > ********************************************************************************
    > > >
    > > > It worked perfectly well before sp2.
    > > >
    > > > Where's the bug (if any) in my lines ?
    > > > Thanks for your help.
    > > >
    > > > Lu
    > > >
    > > >

    > >
    > >
    > >

    >
    >
    Steven Burn, Mar 1, 2005
    #6
  7. Luc Dal

    Luc Dal Guest

    Yes but what I want it to execute the lines :

    sql="insert into visites([numIP]) Values('"&cstr(ip)&"')"
    conn.execute(sql)

    And i get always the same reply (in french, sorry)
    L'opération doit utiliser une requête qui peut être mise à jour.

    I don't understand why (it worked well before the sp2)

    Luc


    "Mark Schupp" <> a écrit dans le message de news:
    ...
    > sql="insert into visites (numIP) Values('"&ip&"')"
    > response.write sql
    > response.end
    >
    > do you get what you expected?
    >
    > --
    > --Mark Schupp
    > Head of Development
    > Integrity eLearning
    > www.ielearning.com
    >
    > "Luc Dal" <> wrote in message
    > news:d0217o$l91$...
    >> Sorry
    >>
    >> Hre's ethe good line :
    >>
    >> sql="insert into visites (numIP) Values('"&ip&"')"
    >>
    >>
    >>
    >> "Luc Dal" <> a écrit dans le message de news:
    >> d020am$l48$...
    >>> Hello,
    >>>
    >>> I've serious problem using ASP under WindowsXP sp2.
    >>> I get the following reply (sorry it's in french)
    >>> Erreur de compilation Microsoft VBScript error '800a0401'
    >>>
    >>> Fin d'instruction attendue
    >>>
    >>> /iisHelp/common/500-100.asp, line 11
    >>>
    >>> Dim objASPError, blnErrorWritten, strServername, strServerIP,
    >>> strRemoteIP
    >>> Dim strMethod, lngPos, datNow, strQueryString, strURL
    >>> --------------------------------------------------------------------------^Microsoft
    >>> JET Database Engine error '80040e14'
    >>>
    >>> Erreur de syntaxe dans l'instruction INSERT INTO.
    >>>
    >>> /cytiserw/Include/commun.asp, line 49
    >>>
    >>> Here are the instructions in vbscript :
    >>>
    >>> '=====================================================
    >>> Public sub OuvreConnexion(nomcomplet,strMotdePasse)
    >>> Dim Connstr
    >>> Set Conn = Server.CreateObject("ADODB.Connection")
    >>> Set Comm = Server.CreateObject("ADODB.Command")
    >>> Connstr = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
    >>> "Data Source=" & nomcomplet &";" & _
    >>> "Jet OLEDB:Database Password=" & strMotdePasse
    >>> Response.Write(Connstr)
    >>> Conn.Open Connstr
    >>> Set Comm.ActiveConnection = Conn
    >>> end sub
    >>> '=====================================================
    >>> Public Sub FermeConnexion()
    >>> Set Rec_Set = Nothing
    >>> Set Comm = Nothing
    >>> Conn.Close
    >>> Set Conn = Nothing
    >>> End Sub
    >>> '=====================================================
    >>> Public Sub MAJ_BaseIP()
    >>> dim ip,str,sql
    >>> str=""
    >>> call OuvreConnexion(session("chemin")&Utilisateurs,MotdePasseBdd)
    >>> ip=Request.ServerVariables("REMOTE_ADDR")
    >>> Response.Write(ip)
    >>> sql="insert numIP into visites Values('"&ip&"')"
    >>> conn.execute sql
    >>> call FermeConnexion
    >>> end sub
    >>> ********************************************************************************
    >>>
    >>> It worked perfectly well before sp2.
    >>>
    >>> Where's the bug (if any) in my lines ?
    >>> Thanks for your help.
    >>>
    >>> Lu
    >>>
    >>>

    >>
    >>
    >>

    >
    >
    Luc Dal, Mar 1, 2005
    #7
  8. Luc Dal

    Luc Dal Guest

    Thanks for your assistance, but unfortunaltely, it does'nt help me ...:)

    Luc


    "Steven Burn" <> a écrit dans le message de news:
    ...
    For the first one;

    http://aspfaq.com/show.asp?id=2363
    http://aspfaq.com/show.asp?id=2414

    ........ and for the second (a very common but mis-interpreted error)

    http://aspfaq.com/search.asp?q=80004005&type=ALL&category=0&numDays=0&order=1

    Apologies for not being more helpful (my French is somewhat lacking...
    hopefully if the above does not help, one of the experts will come along and
    help (Bob, Aaron... where the heck are ya!))

    --
    Regards

    Steven Burn
    Ur I.T. Mate Group
    www.it-mate.co.uk

    Keeping it FREE!

    "Luc Dal" <> wrote in message
    news:d0230a$lmi$...
    > Thanks,
    > But now i've the following error: (sorry, it' in french)
    >
    >
    > Erreur de compilation Microsoft VBScript error '800a0401'
    >
    > Fin d'instruction attendue
    >
    > /iisHelp/common/500-100.asp, line 16
    >
    > If Response.Buffer Then Response.Clear Response.Status = "500 Erreur
    > interne
    > du serveur" Response.ContentType = "text/html" Response.Expires = 0 End If
    > -----------------------------------------------------------------------------------------^Microsoft
    > JET Database Engine error '80004005'
    >
    > L'opération doit utiliser une requête qui peut être mise à jour.
    >
    > /cytiserw/Include/commun.asp, line 49
    >
    >
    >
    > ***********************************************************************
    >
    > "Steven Burn" <> a écrit dans le message de news:
    > ...
    > Article #2400 Why do I get 80040E14 errors?
    > http://aspfaq.com/show.asp?id=2400
    >
    > --
    > Regards
    >
    > Steven Burn
    > Ur I.T. Mate Group
    > www.it-mate.co.uk
    >
    > Keeping it FREE!
    >
    > "Luc Dal" <> wrote in message
    > news:d0217o$l91$...
    > > Sorry
    > >
    > > Hre's ethe good line :
    > >
    > > sql="insert into visites (numIP) Values('"&ip&"')"
    > >
    > >
    > >
    > > "Luc Dal" <> a écrit dans le message de news:
    > > d020am$l48$...
    > > > Hello,
    > > >
    > > > I've serious problem using ASP under WindowsXP sp2.
    > > > I get the following reply (sorry it's in french)
    > > > Erreur de compilation Microsoft VBScript error '800a0401'
    > > >
    > > > Fin d'instruction attendue
    > > >
    > > > /iisHelp/common/500-100.asp, line 11
    > > >
    > > > Dim objASPError, blnErrorWritten, strServername, strServerIP,
    > > > strRemoteIP
    > > > Dim strMethod, lngPos, datNow, strQueryString, strURL
    > > > --------------------------------------------------------------------------^Microsoft
    > > > JET Database Engine error '80040e14'
    > > >
    > > > Erreur de syntaxe dans l'instruction INSERT INTO.
    > > >
    > > > /cytiserw/Include/commun.asp, line 49
    > > >
    > > > Here are the instructions in vbscript :
    > > >
    > > > '=====================================================
    > > > Public sub OuvreConnexion(nomcomplet,strMotdePasse)
    > > > Dim Connstr
    > > > Set Conn = Server.CreateObject("ADODB.Connection")
    > > > Set Comm = Server.CreateObject("ADODB.Command")
    > > > Connstr = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
    > > > "Data Source=" & nomcomplet &";" & _
    > > > "Jet OLEDB:Database Password=" & strMotdePasse
    > > > Response.Write(Connstr)
    > > > Conn.Open Connstr
    > > > Set Comm.ActiveConnection = Conn
    > > > end sub
    > > > '=====================================================
    > > > Public Sub FermeConnexion()
    > > > Set Rec_Set = Nothing
    > > > Set Comm = Nothing
    > > > Conn.Close
    > > > Set Conn = Nothing
    > > > End Sub
    > > > '=====================================================
    > > > Public Sub MAJ_BaseIP()
    > > > dim ip,str,sql
    > > > str=""
    > > > call OuvreConnexion(session("chemin")&Utilisateurs,MotdePasseBdd)
    > > > ip=Request.ServerVariables("REMOTE_ADDR")
    > > > Response.Write(ip)
    > > > sql="insert numIP into visites Values('"&ip&"')"
    > > > conn.execute sql
    > > > call FermeConnexion
    > > > end sub
    > > > ********************************************************************************
    > > >
    > > > It worked perfectly well before sp2.
    > > >
    > > > Where's the bug (if any) in my lines ?
    > > > Thanks for your help.
    > > >
    > > > Lu
    > > >
    > > >

    > >
    > >
    > >

    >
    >
    Luc Dal, Mar 1, 2005
    #8
  9. http://www.aspfaq.com/show.asp?id=2062

    You definitely have a permissions problem. You IUSR account must have Change
    (Modify) permissions on the folder containing your database.

    Luc Dal wrote:
    > Yes but what I want it to execute the lines :
    >
    > sql="insert into visites([numIP]) Values('"&cstr(ip)&"')"
    > conn.execute(sql)
    >
    > And i get always the same reply (in french, sorry)
    > L'opération doit utiliser une requête qui peut être mise à jour.
    >
    > I don't understand why (it worked well before the sp2)
    >
    > Luc
    >
    >
    > "Mark Schupp" <> a écrit dans le message de news:
    > ...
    >> sql="insert into visites (numIP) Values('"&ip&"')"
    >> response.write sql
    >> response.end
    >>
    >> do you get what you expected?
    >>
    >> --
    >> --Mark Schupp
    >> Head of Development
    >> Integrity eLearning
    >> www.ielearning.com
    >>
    >> "Luc Dal" <> wrote in message
    >> news:d0217o$l91$...
    >>> Sorry
    >>>
    >>> Hre's ethe good line :
    >>>
    >>> sql="insert into visites (numIP) Values('"&ip&"')"
    >>>
    >>>
    >>>
    >>> "Luc Dal" <> a écrit dans le message de news:
    >>> d020am$l48$...
    >>>> Hello,
    >>>>
    >>>> I've serious problem using ASP under WindowsXP sp2.
    >>>> I get the following reply (sorry it's in french)
    >>>> Erreur de compilation Microsoft VBScript error '800a0401'
    >>>>
    >>>> Fin d'instruction attendue
    >>>>
    >>>> /iisHelp/common/500-100.asp, line 11
    >>>>
    >>>> Dim objASPError, blnErrorWritten, strServername, strServerIP,
    >>>> strRemoteIP
    >>>> Dim strMethod, lngPos, datNow, strQueryString, strURL
    >>>> -----------------------------------------------------------------------

    ---^Microsoft
    >>>> JET Database Engine error '80040e14'
    >>>>
    >>>> Erreur de syntaxe dans l'instruction INSERT INTO.
    >>>>
    >>>> /cytiserw/Include/commun.asp, line 49
    >>>>
    >>>> Here are the instructions in vbscript :
    >>>>
    >>>> '=====================================================
    >>>> Public sub OuvreConnexion(nomcomplet,strMotdePasse)
    >>>> Dim Connstr
    >>>> Set Conn = Server.CreateObject("ADODB.Connection")
    >>>> Set Comm = Server.CreateObject("ADODB.Command")
    >>>> Connstr = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
    >>>> "Data Source=" & nomcomplet &";" & _
    >>>> "Jet OLEDB:Database Password=" & strMotdePasse
    >>>> Response.Write(Connstr)
    >>>> Conn.Open Connstr
    >>>> Set Comm.ActiveConnection = Conn
    >>>> end sub
    >>>> '=====================================================
    >>>> Public Sub FermeConnexion()
    >>>> Set Rec_Set = Nothing
    >>>> Set Comm = Nothing
    >>>> Conn.Close
    >>>> Set Conn = Nothing
    >>>> End Sub
    >>>> '=====================================================
    >>>> Public Sub MAJ_BaseIP()
    >>>> dim ip,str,sql
    >>>> str=""
    >>>> call OuvreConnexion(session("chemin")&Utilisateurs,MotdePasseBdd)
    >>>> ip=Request.ServerVariables("REMOTE_ADDR")
    >>>> Response.Write(ip)
    >>>> sql="insert numIP into visites Values('"&ip&"')"
    >>>> conn.execute sql
    >>>> call FermeConnexion
    >>>> end sub
    >>>>

    ****************************************************************************
    ****
    >>>>
    >>>> It worked perfectly well before sp2.
    >>>>
    >>>> Where's the bug (if any) in my lines ?
    >>>> Thanks for your help.
    >>>>
    >>>> Lu


    --
    Microsoft MVP -- ASP/ASP.NET
    Please reply to the newsgroup. The email account listed in my From
    header is my spam trap, so I don't check it very often. You will get a
    quicker response by posting to the newsgroup.
    Bob Barrows [MVP], Mar 1, 2005
    #9
  10. Luc Dal

    Luc Dal Guest

    Thanks a lot !
    I could solve my problem using the link you gave me !!!!

    Luc


    "Bob Barrows [MVP]" <> a écrit dans le message de
    news: OIU%...
    > http://www.aspfaq.com/show.asp?id=2062
    >
    > You definitely have a permissions problem. You IUSR account must have
    > Change
    > (Modify) permissions on the folder containing your database.
    >
    > Luc Dal wrote:
    >> Yes but what I want it to execute the lines :
    >>
    >> sql="insert into visites([numIP]) Values('"&cstr(ip)&"')"
    >> conn.execute(sql)
    >>
    >> And i get always the same reply (in french, sorry)
    >> L'opération doit utiliser une requête qui peut être mise à jour.
    >>
    >> I don't understand why (it worked well before the sp2)
    >>
    >> Luc
    >>
    >>
    >> "Mark Schupp" <> a écrit dans le message de news:
    >> ...
    >>> sql="insert into visites (numIP) Values('"&ip&"')"
    >>> response.write sql
    >>> response.end
    >>>
    >>> do you get what you expected?
    >>>
    >>> --
    >>> --Mark Schupp
    >>> Head of Development
    >>> Integrity eLearning
    >>> www.ielearning.com
    >>>
    >>> "Luc Dal" <> wrote in message
    >>> news:d0217o$l91$...
    >>>> Sorry
    >>>>
    >>>> Hre's ethe good line :
    >>>>
    >>>> sql="insert into visites (numIP) Values('"&ip&"')"
    >>>>
    >>>>
    >>>>
    >>>> "Luc Dal" <> a écrit dans le message de news:
    >>>> d020am$l48$...
    >>>>> Hello,
    >>>>>
    >>>>> I've serious problem using ASP under WindowsXP sp2.
    >>>>> I get the following reply (sorry it's in french)
    >>>>> Erreur de compilation Microsoft VBScript error '800a0401'
    >>>>>
    >>>>> Fin d'instruction attendue
    >>>>>
    >>>>> /iisHelp/common/500-100.asp, line 11
    >>>>>
    >>>>> Dim objASPError, blnErrorWritten, strServername, strServerIP,
    >>>>> strRemoteIP
    >>>>> Dim strMethod, lngPos, datNow, strQueryString, strURL
    >>>>> -----------------------------------------------------------------------

    > ---^Microsoft
    >>>>> JET Database Engine error '80040e14'
    >>>>>
    >>>>> Erreur de syntaxe dans l'instruction INSERT INTO.
    >>>>>
    >>>>> /cytiserw/Include/commun.asp, line 49
    >>>>>
    >>>>> Here are the instructions in vbscript :
    >>>>>
    >>>>> '=====================================================
    >>>>> Public sub OuvreConnexion(nomcomplet,strMotdePasse)
    >>>>> Dim Connstr
    >>>>> Set Conn = Server.CreateObject("ADODB.Connection")
    >>>>> Set Comm = Server.CreateObject("ADODB.Command")
    >>>>> Connstr = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
    >>>>> "Data Source=" & nomcomplet &";" & _
    >>>>> "Jet OLEDB:Database Password=" & strMotdePasse
    >>>>> Response.Write(Connstr)
    >>>>> Conn.Open Connstr
    >>>>> Set Comm.ActiveConnection = Conn
    >>>>> end sub
    >>>>> '=====================================================
    >>>>> Public Sub FermeConnexion()
    >>>>> Set Rec_Set = Nothing
    >>>>> Set Comm = Nothing
    >>>>> Conn.Close
    >>>>> Set Conn = Nothing
    >>>>> End Sub
    >>>>> '=====================================================
    >>>>> Public Sub MAJ_BaseIP()
    >>>>> dim ip,str,sql
    >>>>> str=""
    >>>>> call OuvreConnexion(session("chemin")&Utilisateurs,MotdePasseBdd)
    >>>>> ip=Request.ServerVariables("REMOTE_ADDR")
    >>>>> Response.Write(ip)
    >>>>> sql="insert numIP into visites Values('"&ip&"')"
    >>>>> conn.execute sql
    >>>>> call FermeConnexion
    >>>>> end sub
    >>>>>

    > ****************************************************************************
    > ****
    >>>>>
    >>>>> It worked perfectly well before sp2.
    >>>>>
    >>>>> Where's the bug (if any) in my lines ?
    >>>>> Thanks for your help.
    >>>>>
    >>>>> Lu

    >
    > --
    > Microsoft MVP -- ASP/ASP.NET
    > Please reply to the newsgroup. The email account listed in my From
    > header is my spam trap, so I don't check it very often. You will get a
    > quicker response by posting to the newsgroup.
    >
    >
    Luc Dal, Mar 2, 2005
    #10
    1. Advertising

Want to reply to this thread or ask your own question?

It takes just 2 minutes to sign up (and it's free!). Just click the sign up button to choose a username and then you can ask your own questions on the forum.
Similar Threads
  1. compuglobalhypermeganetz0r

    adapter update problem Syntax error in INSERT INTO statement.

    compuglobalhypermeganetz0r, Dec 8, 2003, in forum: ASP .Net
    Replies:
    0
    Views:
    810
    compuglobalhypermeganetz0r
    Dec 8, 2003
  2. Saber
    Replies:
    5
    Views:
    509
    Jo Inferis
    Jul 20, 2004
  3. impulse()
    Replies:
    0
    Views:
    2,527
    impulse()
    Oct 13, 2006
  4. Replies:
    5
    Views:
    246
  5. Sergio del Amo
    Replies:
    4
    Views:
    226
Loading...

Share This Page