Imprimir Página - Necesito cambiar el nombre del host

Hola
Estoy creando una aplicacion que permita cambiar el nombre del host de mi maquina local. uso esto pero no me cambia nada ni reiniciando.

Código:

Public Declare Function SetComputerName Lib "kernel32" Alias "SetComputerNameA" ( _
ByVal lpComputerName As String) As Long
Public Function CambiarNombreOrdenador(NombreOrdenador As String) As Boolean
    Dim lResult As Long
    Dim fRV As Boolean
    lResult = SetComputerName(NombreOrdenador)
    If lResult <> 0 Then
        fRV = True
    Else
        fRV = False
    End If
    CambiarNombreOrdenador = fRV
End Function

No se si esta bien hecho o hay otra forma. :rolleyes:

Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: David Vans en 10 Agosto 2006, 00:17 am