Ver Mensaje Individual
  #1 (permalink)  
Antiguo 08/03/2007, 12:46
mary*
 
Fecha de Ingreso: septiembre-2006
Mensajes: 161
Antigüedad: 18 años, 7 meses
Puntos: 0
Pregunta Tiempo de espera agotado!!!

Hola a todos!!!...tengo una aplicacion en la cual debo mostrar una tabla que es el resultado de uan consulta entre 3 servidores...dichos servidores ya estan vinculados...el problema es que en ocasiones realizo la consulta y me marca tiempo de espera agotado o bien ni suqiera me muestra nada...ya probe en colocarle la instruccion de

<% Server.ScriptTimeOut = 1800 %>

pero sigo teniendo el mismo problema...de hecho si ejecuto la consulta en el enterprise manager de sql y si muestra el resultado, tambien lo hace en la aplicacion web...pero si no tampoco en la aplicacion web...lo raro es que si ejecuta sin problema todas las consultas en el query analizer...sugerencias para solucionar este problema??...hay manera de hacerlo mas eficiente???...agradezco de antemano la ayuda!!!

Parte del codigo que utilizo:

Código:
<% Server.ScriptTimeOut = 1800 %>
<%
	'ESTOS REQUEST.FORM SON LOS NOMBRES DE LOS CAMPOS DE FORM DE LA PAGINA ANTERIOR
	if not isdate(Request.Form("dia1")) and isdate(Request.Form("mes1")) and isdate(Request.Form("year1")) then 
	Response.Redirect "InicioA_SistemP_Diario.asp"
	end if

	vdia1= (Request.Form("dia1"))
	vmes1= (Request.Form("mes1"))
	vyear1= (Request.Form("year1"))
	
	vFecha1= vmes1 & "/" & vdia1 & "/" & vyear1 & " " & "00:00"
	vFecha2= vmes1 & "/" & vdia1 & "/" & vyear1 & " " & "23:59"
	
	
	'Conección con la BD
	sConnStr = "Driver={SQL Server};Server=SERV-AUT;Database=Rssql;UID=sa;Password=sa;"
	Set objConn = Server.CreateObject("ADODB.Connection") 
	objConn.Open sConnStr
	
	
	'Crear tabla temporal
	Set rsTest = Server.CreateObject("ADODB.Recordset")
	
	
	'Ligamos la tabla temporal a la vista de la BD
	strSQL_N = "SELECT dbo.E1.CODE, dbo.E1.DIGITO, MSap_1.Medida, MSap_1.Linea, dbo.CAT_TRADE.EQUIPO, dbo.CAT_TRADE.SIDEWALL AS SIDEWALL, AVG(dbo.E1.WEIGHT) AS PPROM, dbo.E1PESO.PESO AS PESTAND, COUNT(dbo.E1.CODE) AS CANTIDAD, dbo.ES1.WAREHOUSE, MIN(dbo.E1.FECHC) AS FECHMIN FROM dbo.CAT_TRADE INNER JOIN dbo.E1 ON dbo.CAT_TRADE.DIGITO = dbo.E1.DIGITO LEFT OUTER JOIN dbo.E1PESO ON dbo.E1.CODE = dbo.E1PESO.CODE RIGHT OUTER JOIN [SERV-BCODE].Rast.dbo.opUnicos opUnicos_1 LEFT OUTER JOIN SERV_MONITOREO.Monitoreo.dbo.MSAP MSap_1 ON opUnicos_1.CodigoC = MSap_1.CodigoC ON dbo.E1.IDETIQ = opUnicos_1.IdEtiq WHERE (dbo.E1.FECHC >='" & vFecha1 & "') AND (dbo.E1.FECHC <='" & vFecha2 & "') GROUP BY dbo.E1.CODE, MSap_1.Medida, dbo.E1.WAREHOUSE, MSap_1.Linea, dbo.E1.DIGITO, dbo.CAT_TRADE.EQUIPO, dbo.CAT_TRADE.SIDEWALL, dbo.E1PESO.PESO HAVING (dbo.E1.CODE > '0') AND (dbo.E1.WAREHOUSE = 1) ORDER BY dbo.E1.CODE, dbo.E1.DIGITO, MSap_1.Medida, MSap_1.Linea"
	
	'Abre tabla temporal
	rsTest.ActiveConnection = objConn
	rsTest.Open strSQL_N, objConn,2,2
	rsTest.Requery 
	
	
	'*** CANTIDAD TOTAL ***
	Set rsRecordsetNo2 = Server.CreateObject("ADODB.Recordset")
	strSQL_Nunmero2 = "SELECT COUNT(CODE) AS TOTAL FROM E1 WHERE FECHC >='" & vFecha1 & "' AND FECHC <='" & vFecha2 & "' AND (CODE > '0') AND (WAREHOUSE = 1)"
	
	'Abre tabla temporal
	rsRecordsetNo2.ActiveConnection = objConn
	rsRecordsetNo2.Open strSQL_Nunmero2, objConn,2,2
	rsRecordsetNo2.Requery

%>

	'Y muestro la tabla con los resultados:

    <% do while not rsTest.EOF%>
  <tr bgcolor="#F4F4F4">
    <td width="51" height="22" align="center" valign="middle"><div align="center" class="Estilo29"><%=rsTest("CODE")%></div></td>
    <td width="44"><div align="center" class="Estilo29"><%=rsTest("DIGITO")%></div></td>
    <td width="81"><div align="center" class="Estilo29"><%=rsTest("MEDIDA")%></div></td>
    <td width="69"><div align="center" class="Estilo29"><%=rsTest("LINEA")%></div></td>
    <td width="55"><div align="center" class="Estilo29"><%=rsTest("EQUIPMENT")%></div></td>
    <td width="66" bgcolor="#F4F4F4"><div align="center"><span class="Estilo29"><%=rsTest("SIDEWALL")%></span></div></td>
    <td width="95" bgcolor="#F4F4F4"><div align="center"><span class="Estilo29"><%=rsTest("PPROM")%></span></div></td>
    <td width="75" bgcolor="#F4F4F4"><div align="center"><span class="Estilo29"><%=rsTest("PESTAND")%></span></div></td>
    <td width="66" bgcolor="#F4F4F4"><div align="center" class="Estilo29"><%=rsTest("CANTIDAD") %> </div></td>
  </tr>
  <% rsTest.MoveNext 
   loop%>
</table>
<table width="665" border="0" align="center">
  <tr>
    <td class="Estilo19 Estilo4">&nbsp;</td>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
    <td width="138" align="right"><table width="138" border="1" bordercolor="#333333" bgcolor="#FFFFFF">
      <tr>
        <td width="138" bordercolor="#333333" bgcolor="#999999"><div align="justify"><strong>TOTAL</strong>:<span class="Estilo4">&nbsp;&nbsp;<%=rsRecordsetNo2("TOTAL")%></span></div></td>
      </tr>