IIS7 and ASP Timeout issues

Hello,

I wonder if anybody can assist. I have a WEB site which I moved from a
machine running XP Sp2 to Vista. I had several issues around allowing ASP
code to run which I have resolved. My only outstanding issue is that when I
go to one page I get the error below:

Active Server Pages error 'ASP 0113'

Script timed out

/xxxxxx/xxxxx/xxxxxxx - V2.asp

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.

The database it is trying to read is about 1Mb in size and has about 500
records (very small). On the XP machine it takes 2 seconds to load and do
all of the cals. The code that generates the error is:

<%Response.Buffer = True
Response.Expires = 0
Response.ExpiresAbsolute = now() -1
Response.CacheControl = "no-cache"
Dim RY54_Start_06_07
Dim RY54_End_06_07
DSN = "DRIVER={Microsoft Access Driver (*.mdb, *.accdb)};DBQ=" &
("\\xxxxx\xxxxx$\xxxxx.mdb") & ";"
Set OBJdbConnection = Server.CreateObject("ADODB.Connection")
OBJdbConnection.Open(DSN)
Set SQLStmt = Server.CreateObject("ADODB.Command")
Set RS = Server.CreateObject ("ADODB.Recordset")
SQLStmt.CommandText = " SELECT Start_xxxx, End_xxxxx FROM xxxx_Totals
WHERE Year = '2006-2007'; "
SQLStmt.CommandType = 1
Set SQLStmt.ActiveConnection = OBJdbConnection
RS.Open SQLStmt
RY54_Start_06_07 = 0
RY54_End_06_07 = 0
do while not RS.EOF %>

I'm pulling my hair out over this one and would like some advise on what has
changed to prevent the DNS from working.

Thanks

Ian

What is the rest of the code?

Cheers
Ken

--
My IIS Blog: www.adOpenStatic.com/cs/blogs/ken

"Ian" wrote in message

> Hello,
>
> I wonder if anybody can assist. I have a WEB site which I moved from a
> machine running XP Sp2 to Vista. I had several issues around allowing ASP
> code to run which I have resolved. My only outstanding issue is that when
> I
> go to one page I get the error below:
>
> Active Server Pages error 'ASP 0113'
>
> Script timed out
>
> /xxxxxx/xxxxx/xxxxxxx - V2.asp
>
> 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.
>
> The database it is trying to read is about 1Mb in size and has about 500
> records (very small). On the XP machine it takes 2 seconds to load and do
> all of the cals. The code that generates the error is:
>
> <%Response.Buffer = True
> Response.Expires = 0
> Response.ExpiresAbsolute = now() -1
> Response.CacheControl = "no-cache"
> Dim RY54_Start_06_07
> Dim RY54_End_06_07
> DSN = "DRIVER={Microsoft Access Driver (*.mdb, *.accdb)};DBQ=" &
> ("\\xxxxx\xxxxx$\xxxxx.mdb") & ";"
> Set OBJdbConnection = Server.CreateObject("ADODB.Connection")
> OBJdbConnection.Open(DSN)
> Set SQLStmt = Server.CreateObject("ADODB.Command")
> Set RS = Server.CreateObject ("ADODB.Recordset")
> SQLStmt.CommandText = " SELECT Start_xxxx, End_xxxxx FROM xxxx_Totals
> WHERE Year = '2006-2007'; "
> SQLStmt.CommandType = 1
> Set SQLStmt.ActiveConnection = OBJdbConnection
> RS.Open SQLStmt
> RY54_Start_06_07 = 0
> RY54_End_06_07 = 0
> do while not RS.EOF %>
>
> I'm pulling my hair out over this one and would like some advise on what
> has
> changed to prevent the DNS from working.
>
> Thanks
>
> Ian