Visual Basic - Red y ADO

Tengo dos ordenadores conectados en red que ejecutan un programa instalado en uno de ellos.

Necesito que el programa pueda identificar cada ordenador para que responda de manera diferente a los eventos que provoquen.

Gracias.

No se exactamente que es lo que quieres hacer pero puedes tomar el nombre de la máquina con:

Private Const MAX_COMPUTERNAME_LENGTH As Long = 31
Private Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long

Dim dwLen As Long
Dim strString As String
dwLen = MAX_COMPUTERNAME_LENGTH + 1
strString = String(dwLen, "X")
GetComputerName strString, dwLen
strString = Left(strString, dwLen)
MsgBox strString

Y en base a eso ejecutar las acciones que necesites.

Gracias, eso puede servir.

Quiero crear un programa para una tienda con dos empleados, cada empleado despacha distintos articulos que deben registrarse en la base de datos correspondiente a cada empleado.

Si las dos bases de datos residen en el ordenador donde esta instalado el programa, este debe de poder distinguir que empleado esta despachando para escribir en su correspondiente base de datos.

¿No crees más conveniente utilizar una sola base de datos y colocar un código de usuario para cada uno y éste lo grabas en cada tabla?