Results 1 to 3 of 3
  1. #1
    Join Date
    Sep 2003
    Location
    Malaysia
    Posts
    7

    Question Unanswered: server running slow

    PLz help me, i m new here. I need someone to help me check this coding and see wht the actual problem.Coz when i click submit the page will come out a error msg writing :-
    Error Type:
    Active Server Pages, ASP 0113 (0x80004005)
    The maximum amount of time for a script to execute was exceeded. You can change this limit by specifying a new value for the property Server.ScriptTimeout or by changing the value in the IIS administration tools.
    /demo/display.asp

    and below is my coding
    <%
    dim rsSex
    set rsSex=server.CreateObject("adodb.connection")
    set rsSex=server.CreateObject("adodb.recordset")
    rsSex.open "c:/Host/demo/demo.mdb"

    rsSex = "SELECT * FROM tblUsers "
    do while not rsSex.EOF
    response.Write"<td>" & rsSex("Gender"& err.description)&"</td>"
    rsSex.movenext
    loop
    rssex.close
    set rssex=nothing
    %>

    p/s: i already set the timeout time to 5second..but still nothing display.
    Thanks

  2. #2
    Join Date
    Sep 2003
    Location
    Newark, Vermont
    Posts
    20
    I see several problems...

    1. rsSex is used to name the connection string and the recordset string.
    2. When opening the recordset, you must add the recordset parameters: connection, cursor type, lock type and option

    Hope this helps...

  3. #3
    Join Date
    Oct 2003
    Location
    India, West Bengal, Calcutta(Kolkata)
    Posts
    1

    Re: server running slow

    Try using diff variables for diff purpose,

    <%
    dim oConn, oRs, sSQL, rsSex

    set oConn=server.CreateObject("adodb.connection")
    set oRs=server.CreateObject("adodb.recordset")

    oConn.open "c:/Host/demo/demo.mdb"
    sSQL = "SELECT * FROM tblUsers "
    oRs = oConn.Execute(sSQL)
    Response.Write("<table>")
    do while not oRS.EOF
    '...........................
    'write ur statements here
    Response.Write("<tr><td>")
    Response.Write(oRS("_ColName_").value)
    Response.Write("</td></tr>")
    '..........................
    oRS.movenext
    loop
    Response.Write("</table>")
    rssex.close
    set oRs=nothing
    set oConn = nothing
    set sSQL = nothing

    %>
    Last edited by rajivlodha; 10-09-03 at 04:23.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •