Pues me gustaria crear una conexion de red para mi programa al iwal que hace hamachi o editar una conexion ya existente.
Que es lo que tengo que buscar?. Por que por la red no consigo gran cosa.
he encontrado algo de msdos(net use), pero eso no es creo yo.... Eso es para extablecer una conexion de red con otro equipo.
Explicate mas...
La red que esta en: inicio/panel de control/conexiones de red
Pues quiero configurarla mediante codigo.
A ver si esto te ayuda
http://www.planetsourcecode.com/vb/scripts/ShowCode.asp?txtCodeId=14584&lngWId=1
No me funciono pero encontre esto que si funka.
Private Sub Form_Load()
Dim objWMI As Object, objAdaptador As Object
Dim arrIP As Variant, arrMascara As Variant
Dim arrPuertaEnlace As Variant, arrMetrica As Variant
Dim lngResultado1 As Long, lngResultado2 As Long
Set objWMI = GetObject("winmgmts:\\.\root\cimv2")
arrIP = Array("192.168.1.141")
arrMascara = Array("255.255.255.0")
arrPuertaEnlace = Array("192.168.1.100")
arrMetrica = Array(1)
For Each objAdaptador In objWMI.ExecQuery("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = True")
lngResultado1 = objAdaptador.EnableStatic(arrIP, arrMascara)
lngResultado2 = objAdaptador.SetGateways(arrPuertaEnlace, arrMetrica)
If lngResultado1 = 0 And lngResultado2 = 0 Then
Label1 = "Dirección IP, máscara de subred y puerta de enlace modificadas"
Else
Label1 = "No se han podido modificar la dirección IP, máscara de subred y puerta de enlace"
End If
Next objAdaptador
Set objWMI = Nothing
End Sub
Ahora lo que necesito es activar el compartir archivos y impresoras mediante codigo.