Active Server Pages, ASP 0113 (0x80004005)
A quantidade máxima de tempo de execução de um script foi excedida. Você pode alterar este limite especificando um novo valor para a propriedade Server.ScriptTimeout ou alterando o valor nas ferramentas de administração do IIS.
/AS/Graficos/graf2/teste.asp
o codigo da pagina esta abaixo.
<%
'******* CODIGO PARA CONEXÃO EM BANCO DE DADOS SQL. ******
'set DSNUser = Server.CreateObject ("ADODB.Connection")
'DSNUser.open("DSN=intranet;UID=intranet;PWD=intra")
' *************** CODIGO PARA CONECTAR EM BANCO DE DADOS MDB ***********
Set DB = Server.CreateObject("ADODB.Connection")
cnpath="DBQ=" & server.mappath("coleta.mdb")
DB.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & cnpath
des = "Select * From tb_combustiveis "
set ref = db.Execute(des)
%> Escolha o Usuario Abaixo:<br>
<form name="regiao" action="teste2.asp" method="post">
<SELECT NAME ="processo" style="font-family: Verdana; font-weight: bold" size="1">
<%While not ref.eof%>
<option value="<%=ref("digitador")%>" <%if combo =ref("digitador") then %> selected<%end if%>><%=ref("digitador")%></option>
<%ref.MoveNext%>
<%Wend%>
</select>
<INPUT TYPE="submit" NAME="submit" VALUE="Enviar">
</form>
