Make your own free website on

[an error occurred while processing this directive]
Private Declare Function PwdChangePassword Lib "mpr" Alias "PwdChangePasswordA" (ByVal lpcRegkeyname As String, ByVal hwnd As Long, ByVal uiReserved1 As Long, ByVal uiReserved2 As Long) As Long
Private Sub Form_Load()
    'KPD-Team 2000
    PwdChangePassword "SCRSAVE", Me.hwnd, 0, 0
End Sub

Copyright © 1998-2000, The KPD-Team.
Send mail to with comments about this web site.
This site is located at