Perdida de conexion con sql server

08/06/2007 - 18:56 por Nahuel Garcia | Informe spam
Realmente no tengo mucha experiencia con sql server y me ocurre lo
siguiente:
Tengo dos equipos el equipo 1 es un P4 de 3.0 GHz y 512 ram con windows
XP
El equipo2 es un P4 de 1.5 GHz y 512 ram con windows 2000
Ambos corren el mismo aplicativo y cuando hacen un proceso largo el primero
pierde la conexion con el servidor y tira el error "-214767259 [DBNETLIB]
ConnectionOpen (Connect) No existe el servidor SQL Server o se ha denegado
el acceso al mismo." y el segundo nunca da error. Me ha resultado muy
dificil encontrar una respuesta. Me pueden dar una mano? Otra cosa que he
probado es esperar un segundo para cada 20 registros que computa y esto
enlentecio el proceso pero le permitió terminarlo sin error. Los procesos
son de 4000 registros generalmente.
Se agradece.

Preguntas similare

Leer las respuestas

#6 Gustavo Larriera (MVP)
09/06/2007 - 01:07 | Informe spam
Si el problema sucede al azar y no es fácilmente reproducible, lo mejor
es que trates de atrapar el error en tiempo de ejecución.

Tal vez deberias usar un On Error para capturar posibles problemas de
falla de conexión a la base de datos cuando ejecutas la SELECT.


Gustavo Larriera, Microsoft MVP
https://mvp.support.microsoft.com/p...o.Larriera
Este mensaje se proporciona tal como es, sin garantías de ninguna clase.

In article <#$,
says...
No me es posible saber exactamente donde se cae ya que pasa en un cliente y
no he podido reproducir el error. Puse un equipo como servidor en la empresa
(Celeron 500) para ver si podia reproducir el error y no pude. Se que se cae
en ese proceso y es cuando se conecta a la base.
Te pego el código

Do While Not rsMovAux.EOF And Not mal And seguir
seguir = frmProgreso.progreso(rsMovAux.PercentPosition, fMain,
"Controlando movimientos")
If Not LineaVacia(rsMovAux) Then
If ControlaFila(rsMovAux) Then
CargaConceptosAuxiliares rsMovAnaLin, _
rsMovAux!MxCuentaPrincipal, _
Format(rsMovAux!MxFecha,
"mm/yyyy"), _
rsMovAux!MxTipoAsiento, _
rsMovAux!MxCorrelativo, _
rsMovAux!MxDia

CargaDatosAuxiliaresDeLaLinea rsMovAnaLin, _
rsMovAux!MxFecha, _
rsMovAux!MxTipoAsiento, _
rsMovAux!MxCorrelativo, _
rsMovAux!MxDia

If Not ControlaAnalisis(rsMovAnaLin, rsMovAux!MxFecha,
bytProceso) Then
mal = True
End If
Else
mal = True
End If

'controla que la cuenta no esté marcada con análisis, si el
módulo de análisis no está registrado
If Not RgEstaInstalado(modulosHabilitados, MODULO_ANALISIS) Then
strSQL = "SELECT * FROM CuentasAnalisis WHERE CtaNro='" &
Trim(rsMovAux!MxCuentaPrincipal) & "'"
Set rsCtaAna = New adodb.Recordset
rsCtaAna.CursorLocation = adUseClient
rsCtaAna.Open strSQL, cnnEmpresa, adOpenForwardOnly
If Not rsCtaAna.EOF Then
MsgBox "La cuenta " & Trim(rsMovAux!MxCuenta) & " tiene
marca de análisis y el módulo de análisis no está instalado", vbCritical,
App.Title
mal = True
End If
rsCtaAna.Close
Set rsCtaAna = Nothing
End If
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una pregunta AnteriorRespuesta Tengo una respuesta
Search Busqueda sugerida