So ändern Sie die Windowsanmeldung in XP mit VB

Das Microsoft NET Framework bietet, zwar keine Low-Level Zugriff auf den Systemspeicher oder das Betriebssystem es verfügt über eine leistungsfähige Funktion, die es ausmacht: ein Programmierer kann Importfunktionen von Low-Level-Code in dynamisch gelinkte Bibliotheken, auch genannt DLLs kompiliert und rufen diese Funktionen aus in ein NET-Programm, wie man in Visual Basic geschrieben. Auf diese Weise kann ein Programmierer zugreifen, viele Windows-Funktionen, z. B. Ändern des Kennworts eines Benutzers auf dem Computer sonst verborgen.

Anweisungen

1 Kopieren Sie und fügen Sie die folgende Imports-Anweisung in der Spitze Ihrer Klasse VB:

Imports System.Runtime.InteropServices

2 Kopieren Sie und fügen Sie die folgende Funktion in VB-Projekt:

< DllImport ("netapi32.dll", CallingConvention:=CallingConvention.StdCall, CharSet:=CharSet.Unicode) > Public Shared Function NetUserChangePassword)

< MarshalAs(UnmanagedType.LPWStr) > ByVal Domäne wie String, < MarshalAs(UnmanagedType.LPWStr) > ByVal Benutzer als String,

< MarshalAs(UnmanagedType.LPWStr) > ByVal OldPass As String, ByVal-NewPass < MarshalAs(UnmanagedType.LPWStr) > als String) als Integer

EndFunction

3 Rufen Sie vielleicht der neuen Funktion innerhalb einer Funktion oder eines Ereignisses in der Klasse, wie die Schaltfläche "Kennwort ändern":

NetUserChangePassword ("lokal", "Joe", "joe5pass", "newpa55")

Tipps & Warnungen

• Die NetUserChangePassword-Funktion gibt 0 zurück, wenn das Kennwort erfolgreich geändert wurde.