Problema para acceder al ejecutable desde otra pc
Hola expertos, estoy super complicada y necesito que me ayuden por favor, resulta que tengo un programa en vb6 con bd en sql 2000, lo instalé en el servidor en una carpeta compartida e instale el instalador en dos pc clientes, pero al tratar de ejecutar el programa desde estos aparece el siguiente error:
Error(Microsoft)(ODBC SQLServer Driver)(SQLServer)
Error de inicio de sesión del usuario"nombre base de datos/nombre usuario pc cliente"
Error al abrir el archivo
Luego aparece otro mensaje de error:
Error "3709" en tiempo de ejecución
Operación no permitida en un objeto que hace referencia a una conexión cerrada o no valida
El sql esta instalado en el servidor, el código que llama a la bd de datos sql en el servidor es:
Function SerVerOpen() As Integer
On Error GoTo ErrorServerOpen
Set db = New ADODB.Connection
db.ConnectionString = "driver={SQL Server};server=SERVIDOR;database=basedatos"
db.Open
Exit Function
ErrorServerOpen:
If Err.Number = -2147217900 Then
Resume Next
End If
MsgBox "Error." & Err.Description & Chr(10) & " Error al abrir el archivo " & sql, vbCritical
SerVerOpen = False
Exit Function
Resume
End Function
Cuya función se llama al cargar cada form: call SerVerOpen
me han dicho que me falta crear un id de usuario y password para la bd y que debo indicarlos en el código de conexión a la bd, también me dicen que debo mandar la ip del servidor, pero no me han explicado bien cómo debo hacerlo. ¿Podrían uds indicarme paso a paso y en detalle que debo hacer para resolver este problema?, ¿O mejor dicho los pasos a seguir para que el programa pueda ser accesado desde todos los pcs de la red? Les estaría infinitamente agradecida ya que debo tener el programa corriendo en los pcs de la red lo más luego posible, y me imagino que a uds les debe haber tocado hacer esto muchas veces. Bueno sin más que agregar les agradezco por la ayuda que me puedan brindar. Muchas Gracias y hasta la próxima.
Error(Microsoft)(ODBC SQLServer Driver)(SQLServer)
Error de inicio de sesión del usuario"nombre base de datos/nombre usuario pc cliente"
Error al abrir el archivo
Luego aparece otro mensaje de error:
Error "3709" en tiempo de ejecución
Operación no permitida en un objeto que hace referencia a una conexión cerrada o no valida
El sql esta instalado en el servidor, el código que llama a la bd de datos sql en el servidor es:
Function SerVerOpen() As Integer
On Error GoTo ErrorServerOpen
Set db = New ADODB.Connection
db.ConnectionString = "driver={SQL Server};server=SERVIDOR;database=basedatos"
db.Open
Exit Function
ErrorServerOpen:
If Err.Number = -2147217900 Then
Resume Next
End If
MsgBox "Error." & Err.Description & Chr(10) & " Error al abrir el archivo " & sql, vbCritical
SerVerOpen = False
Exit Function
Resume
End Function
Cuya función se llama al cargar cada form: call SerVerOpen
me han dicho que me falta crear un id de usuario y password para la bd y que debo indicarlos en el código de conexión a la bd, también me dicen que debo mandar la ip del servidor, pero no me han explicado bien cómo debo hacerlo. ¿Podrían uds indicarme paso a paso y en detalle que debo hacer para resolver este problema?, ¿O mejor dicho los pasos a seguir para que el programa pueda ser accesado desde todos los pcs de la red? Les estaría infinitamente agradecida ya que debo tener el programa corriendo en los pcs de la red lo más luego posible, y me imagino que a uds les debe haber tocado hacer esto muchas veces. Bueno sin más que agregar les agradezco por la ayuda que me puedan brindar. Muchas Gracias y hasta la próxima.
1 respuesta
Respuesta de zaratustra88
1