nombre del ekipo

[Guachalin]

resulta ke en un modulo tengo la conexion a la base de datos para ke funcione mi programa, esta es la siguiente:

Cnn.ConnectionString = "driver={SQL Server};server=guachalin;uid=sa;pwd=;database=mari na"

donde el nombre del ekipo es "Guachalin" y la base de datos "marina"

resulta ke tengo problemas al instalarlo en varios ekipos, me gustaria saber si hay alguna forma de programar esta linea para ke se detecte automaticamente el nombre del ekipo


desde ya muchas gracias

[Guachalin]

bueno puedes algo ya pille, es un codigo ke al hacer click en el boton te dice el nombre del computador:

Private Declare Function GetComputerName _
Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As _
Long) As Long
'esto va en el evento click del boton
Private Sub Command1_Click()
Dim sEquipo As String * 255
GetComputerName sEquipo, 255
MsgBox sEquipo
End Sub

bueno aludiendo a lo ke pedia yo:

Cnn.ConnectionString = "driver={SQL Server};server=guachalin;uid=sa;pwd=;database=mari na"

de ke forma tengo ke asignarle la variable "sEquipo" a server en la linea ke puse anteriormente....

una manito porfas