
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"> </td>
<td> </td>
<td> </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"> <%=rsRecordsetNo2("TOTAL")%></span></div></td>
</tr>