Visual Basic Foro

Programación => Bases de Datos => Mensaje iniciado por: TECNOSOFT en Abril 14, 2011, 10:19:05 pm

Título: LA FORMA MAS ESTABLE DE CONECTARSE A SQL SERVER 2000 CON VB6
Publicado por: TECNOSOFT en Abril 14, 2011, 10:19:05 pm

Hola comunidad.. actualmente estoy trabajando en un sistema de que conecta 3 terminales todo con windows xp , sql server 2000 y vb 6. el problema viene cuando esos terminales exigen recursos . uno de ellos se cae. y van rotandose .. hay alguna forma de hacer un buena conexion con sql server. actualmente trabajo con adodb With cnn
.ConnectionString = "driver={SQL Server};server=SERVER;uid=sa;pwd=;database=Sistema"
.CursorLocation = adUseClient
.Open
End With
With cmd
.ActiveConnection = cnn
.CommandType = adCmdText
End With

Título: Re:LA FORMA MAS ESTABLE DE CONECTARSE A SQL SERVER 2000 CON VB6
Publicado por: YAcosta en Abril 15, 2011, 01:43:37 am

Inicialmente creo que el problema pasa por el fierro. ¿Checaste bien tu red? esta estable? el router trabaja bien?

Título: Re:LA FORMA MAS ESTABLE DE CONECTARSE A SQL SERVER 2000 CON VB6
Publicado por: wolf_kof en Abril 20, 2011, 08:23:30 pm

Una conexion que te puede ayudar seria esta

Código: [Seleccionar]

Option Explicit
Dim Cn as New Adodb.Connection

Sub Main
on error goto err1
Cn.Open "Provider=sqloledb;Data Source=192.168.1.2;Initial Catalog=DBPrueba;User Id=Abner;Password=pass001;"
exit sub
err1:
     msgbox err.description
end sub