Salut,

Je traville sur une bdd sqlserver, voici la page ASP qui n'affiche rien et la table conteint 4.000.000 records environ.
Il me dit

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.

Mais j'ai mis le parameter time out à 0 donc illimitée.

Est-ce que on doit peut utilisre Movefirst et MoveNext pour parcourir le recordset ?

Car des que je retire le code de la boucle je peux bien lire par exemple le contenu du premier record en utilisant
Response.write RS("champs1") & "<br>"
Response.write RS("champs2") & "<br>"
......
Response.write RS("champs8") & "<br>"


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
 
<%OPTION EXPLICIT%>
<!--#include file="conf/adovbs.inc" -->
<!-- #include file="conf/info.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>GEO</title>
 
</head>
 
<body>
 <%
        Dim SQL_query, str_boek
        Dim i
        on error resume next
		err.clear
		'call sub to open database
	    Call OpenDatabase() 'see in map conf/info.asp
 
		if err then
				Response.Write "<br>failed open databse in: index.asp <br> objConn=" & _
				objConn & "<br>Error number=" & err.number & "<br>Error description:" & err.description
				'Reset server objects
				Call CloseDatabase()'see in map conf/info.asp
		else
 
		  SQL_query = "SELECT * FROM T_Result"
					'Response.Write "<br>" & SQL_query 
		  Set RS = objConn.Execute(SQL_query)
	str_boek="<TABLE WIDTH=75% BORDER=1 CELLSPACING=1 CELLPADDING=1>" 		
	RS.MoveFirst
	i = 0 
	do  while not RS.eof 
	if i mod 2  = 0 then
	rowcolor = "#990066"
	else
	rowcolor = "#055369"
	end if
	str_boek = str_boek & "<tr style bgcolor ='" & rowcolor & "'>" & _
	"<td>" & RS("ACC_ID") & "</td>" & _
	"<td>" & RS("ACC_FMC") & "</td>" & _
	"<td>" & RS("C_Date") & "</td>" & _
	"<td>" & RS("WkDay") & "</td>" & _
	"<td>" & RS("CMonth") & "</td>" & _
	"<td>" & RS("Chour") & "</td>" & _
	"<td>" & RS("Street") & "</td>" & _
	"</tr>"
	RS.movenext
	i = i+1
	loop
	str_boek = str_boek & "</table>"
	Call CloseDatabase()' see in map conf/info.asp
	Response.Write str_boek
  end if	
  %>
 
  </body>
</html>
Je ne vois pas le probleme.

Merci d'avance pour vos idées.