error 80004005

Collapse
This topic is closed.
X
X
 
  • Time
  • Show
Clear All
new posts
  • Christophe Cerbourg

    error 80004005

    hi,

    in an ASP page, I coonect to a MSACCESS database and the first load of the
    page is correct but, when I immediately refresh the same page, I get an
    80004005 error...

    Thanks for any idea...

    Here is the code :
    Set Conn = Server.CreateOb ject("ADODB.Con nection")
    str = "Driver={Micros oft Access Driver (*.mdb)}; DBQ=" & Server.MapPath( ".")
    &"\Ficli_data.m db"
    Conn.Open str

    Set rs2 = Server.CreateOb ject("ADODB.Rec ordset")
    SQL1 = "select * from TSites order by nom_int"
    rs2.Open SQL1, Conn
    continuer = 1
    nb = 0
    do while ((not rs2.eof) And (nb <= nbrep))
    nb = nb + 1
    if (nb=1) then response.write( "<b>")
    response.write( "<br>" & rs2("toto"))
    if (nb=1) then response.write( "</b>")
    rs2.movenext
    Loop
    rs2.close
    set rs2=nothing

    Conn.close
    set Conn=nothing






  • Ray at

    #2
    Re: error 80004005

    As most people probably do not have the error description memorized for each
    error number, it's generally best to include the actual error message when
    posting. Also indicate the line on which the error occurs. But here are
    the most common causes for an 80004005 error.



    Ray at home


    "Christophe Cerbourg" <someone@some.w here> wrote in message
    news:c0q9ed$iq6 $1@news-reader4.wanadoo .fr...[color=blue]
    > hi,
    >
    > in an ASP page, I coonect to a MSACCESS database and the first load of the
    > page is correct but, when I immediately refresh the same page, I get an
    > 80004005 error...
    >
    > Thanks for any idea...
    >
    > Here is the code :
    > Set Conn = Server.CreateOb ject("ADODB.Con nection")
    > str = "Driver={Micros oft Access Driver (*.mdb)}; DBQ=" &[/color]
    Server.MapPath( ".")[color=blue]
    > &"\Ficli_data.m db"
    > Conn.Open str
    >
    > Set rs2 = Server.CreateOb ject("ADODB.Rec ordset")
    > SQL1 = "select * from TSites order by nom_int"
    > rs2.Open SQL1, Conn
    > continuer = 1
    > nb = 0
    > do while ((not rs2.eof) And (nb <= nbrep))
    > nb = nb + 1
    > if (nb=1) then response.write( "<b>")
    > response.write( "<br>" & rs2("toto"))
    > if (nb=1) then response.write( "</b>")
    > rs2.movenext
    > Loop
    > rs2.close
    > set rs2=nothing
    >
    > Conn.close
    > set Conn=nothing
    >
    >
    >
    >
    >
    >[/color]


    Comment

    • Christophe Cerbourg

      #3
      Re: error 80004005

      sorry for I didn't give you enough informations.

      The exact message is :
      Provider (0x80004005)
      Erreur non spécifiée (which means "not specified error"
      /test/fdcli.asp, line 24 (the line of the CONNECT statement)

      also thanks for the FAQ but I've already check the permissions of IUSR... on
      the folder, the database is on my computer for test and I'm the only user.

      What I wonder is why it works the first time, then not work again if I
      refresh the page, then works again after about one minute ???

      Thanks for any help


      Comment

      • Bob Barrows

        #4
        Re: error 80004005

        Christophe Cerbourg wrote:[color=blue]
        > hi,
        >
        > in an ASP page, I coonect to a MSACCESS database and the first load
        > of the page is correct but, when I immediately refresh the same page,
        > I get an 80004005 error...
        >
        > Thanks for any idea...
        >
        > Here is the code :
        > Set Conn = Server.CreateOb ject("ADODB.Con nection")
        > str = "Driver={Micros oft Access Driver (*.mdb)}; DBQ=" &
        > Server.MapPath( ".") &"\Ficli_data.m db"
        > Conn.Open str
        >
        > Set rs2 = Server.CreateOb ject("ADODB.Rec ordset")
        > SQL1 = "select * from TSites order by nom_int"
        > rs2.Open SQL1, Conn
        > continuer = 1
        > nb = 0
        > do while ((not rs2.eof) And (nb <= nbrep))
        > nb = nb + 1
        > if (nb=1) then response.write( "<b>")
        > response.write( "<br>" & rs2("toto"))
        > if (nb=1) then response.write( "</b>")
        > rs2.movenext
        > Loop
        > rs2.close
        > set rs2=nothing
        >
        > Conn.close
        > set Conn=nothing[/color]
        Since you say you have already verified IUSR permissions to the folder
        containing the database, I suggest you switch to the native Jet OLEDB
        Provider instead of using the obsolete ODBC driver:

        str = "Provider=Micro soft.Jet.OLEDB. 4.0;" & _
        Data Source=" & Server.MapPath( ".\Ficli_data.m db")

        HTH,
        Bob Barrows
        --
        Microsoft MVP - ASP/ASP.NET
        Please reply to the newsgroup. This email account is my spam trap so I
        don't check it very often. If you must reply off-line, then remove the
        "NO SPAM"


        Comment

        • Christophe Cerbourg

          #5
          Re: error 80004005

          thanks Bob for answering.
          Is this driver already installed or should I look for it somewhere ?
          If so, thanks for any link.


          "Bob Barrows" <reb01501@NOyah oo.SPAMcom> a écrit dans le message de
          news:O8rrZwI9DH A.712@tk2msftng p13.phx.gbl...[color=blue]
          > Christophe Cerbourg wrote:[color=green]
          > > hi,
          > >
          > > in an ASP page, I coonect to a MSACCESS database and the first load
          > > of the page is correct but, when I immediately refresh the same page,
          > > I get an 80004005 error...
          > >
          > > Thanks for any idea...
          > >
          > > Here is the code :
          > > Set Conn = Server.CreateOb ject("ADODB.Con nection")
          > > str = "Driver={Micros oft Access Driver (*.mdb)}; DBQ=" &
          > > Server.MapPath( ".") &"\Ficli_data.m db"
          > > Conn.Open str
          > >
          > > Set rs2 = Server.CreateOb ject("ADODB.Rec ordset")
          > > SQL1 = "select * from TSites order by nom_int"
          > > rs2.Open SQL1, Conn
          > > continuer = 1
          > > nb = 0
          > > do while ((not rs2.eof) And (nb <= nbrep))
          > > nb = nb + 1
          > > if (nb=1) then response.write( "<b>")
          > > response.write( "<br>" & rs2("toto"))
          > > if (nb=1) then response.write( "</b>")
          > > rs2.movenext
          > > Loop
          > > rs2.close
          > > set rs2=nothing
          > >
          > > Conn.close
          > > set Conn=nothing[/color]
          > Since you say you have already verified IUSR permissions to the folder
          > containing the database, I suggest you switch to the native Jet OLEDB
          > Provider instead of using the obsolete ODBC driver:
          >
          > str = "Provider=Micro soft.Jet.OLEDB. 4.0;" & _
          > Data Source=" & Server.MapPath( ".\Ficli_data.m db")
          >
          > HTH,
          > Bob Barrows
          > --
          > Microsoft MVP - ASP/ASP.NET
          > Please reply to the newsgroup. This email account is my spam trap so I
          > don't check it very often. If you must reply off-line, then remove the
          > "NO SPAM"
          >
          >[/color]


          Comment

          • Bob Barrows

            #6
            Re: error 80004005

            Christophe Cerbourg wrote:[color=blue]
            > thanks Bob for answering.
            > Is this driver already installed or should I look for it somewhere ?
            > If so, thanks for any link.[/color]

            Yes, it is installed as part of the MDAC installation. If it fails on you,
            go to www.microsoft.com/data and get the separate Jet engine download.

            Bob Barrows
            --
            Microsoft MVP - ASP/ASP.NET
            Please reply to the newsgroup. This email account is my spam trap so I
            don't check it very often. If you must reply off-line, then remove the
            "NO SPAM"


            Comment

            Working...