dnvplj 发表于 2014-11-12 22:53:43

[已解决]如何调出XP密码设置对话框

本帖最后由 dnvplj 于 2014-11-14 09:20 编辑

请问各位朋友，如何调出XP密码设置对话框，当前用户为：Administrator,多谢了。

austere 发表于 2014-11-13 08:02:04

为嘛要用这个？ 难道你不会用命令吗？net user administrator “新的密码”

dnvplj 发表于 2014-11-13 08:41:28

回复 2# austere
这个我是知道地，我想调用这个对话框，你懂的。

austere 发表于 2014-11-13 08:48:24

回复 3# dnvplj


   你是想达成什么目的呢？如果就是为了修改密码....那你还是可以用命令..... 至于这个界面吗..
你可以高仿一个出来，不是一样的吗？

dnvplj 发表于 2014-11-13 09:39:44

本帖最后由 dnvplj 于 2014-11-13 09:40 编辑

回复 4# austere
朋友非常感谢你的回复，你说对了，我是想设置密码，自己不会写带窗体的，就想出了这个办法，用命令调用出这个对话框设置。用命令方便，但不直观，每次都得打开输入密码，没有这个方便。

lin6051 发表于 2014-11-13 10:43:48

本帖最后由 lin6051 于 2014-11-13 10:45 编辑

回复 1# dnvplj


开始-运行输入control userpasswords2试试

dnvplj 发表于 2014-11-13 11:01:50

回复 6# lin6051
调出了“用户帐户“对话框

lin6051 发表于 2014-11-13 11:51:00

回复 7# dnvplj


    把钩去掉 确定 就可以输入用户名密码了啊

dnvplj 发表于 2014-11-13 12:25:17

回复 8# lin6051
这个”勾“一去掉，什么都不可选了，你给的不是我要的那个对话框。

austere 发表于 2014-11-13 13:23:14

本帖最后由 austere 于 2014-11-13 20:10 编辑

回复 1# dnvplj #include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Process.au3>

$Form1 = GUICreate("更改密码", 382, 284, -1, -1, $ws_popup)
$Pic1 = GUICtrlCreatePic("123.jpg", 0, 0, 382, 284, $SS_CENTERIMAGE)
$ss1 = GUICtrlCreateLabel("为 " & @UserName & " 设置密码", 0, 0, 355, 28, "", $GUI_WS_EX_PARENTDRAG)
GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif")
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
GUICtrlSetColor(-1, 0xffffff)
$ss2 = GUICtrlCreateLabel("", 355, 0, 27, 28)
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
$input1 = GUICtrlCreateInput("", 140, 38, 230, 24)
GUICtrlSetFont(-1, 14, 400)
$input2 = GUICtrlCreateInput("", 140, 68, 230, 24)
GUICtrlSetFont(-1, 14, 400)
$ss3 = GUICtrlCreateLabel("", 195, 247, 75, 25)
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
$ss4 = GUICtrlCreateLabel("", 112, 247, 75, 25)
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)

GUISetState(@SW_SHOW)
While 1
      $nMsg = GUIGetMsg()
      Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $ss2
                        Exit
                Case $ss3
                        Exit
                Case $ss4
                        If GUICtrlRead($input1) == GUICtrlRead($input2) Then
                              GUISetState(@SW_HIDE)
                              _RunDOS("net user " & @UserName & " " & GUICtrlRead($input1))
                              Exit(MsgBox(64 + 0,"提示","密码修改成功！"))
                        Else
                              MsgBox(64 + 0, "错误提示", "两次输入的密码不一致，请重新输入！")
                        EndIf
      EndSwitch
WEnd需要的123.jpg，如图，自己下载~

dnvplj 发表于 2014-11-13 18:05:38

回复 10# austere
朋友您好，设置密码后提示成功，但启动后进入登录界面输入密码后，提示”没有记住密码“，开始认为是我输错了，我又试了3次，还是提示”没有记住密码“。3次密码设置的是123456.

netegg 发表于 2014-11-13 18:45:22

回复 11# dnvplj
那个玩意本来就不是用来保存密码的，调出来也没用

chamlien 发表于 2014-11-13 18:59:20

回复 10# austere

哇，图片运用得很好啊，收藏了

austere 发表于 2014-11-13 19:09:25

本帖最后由 austere 于 2014-11-13 19:29 编辑

回复 11# dnvplj


源码有点错误，已经修正了~你再重新试下~

chamlien 发表于 2014-11-13 19:24:49

回复 10# austere

思路居然是这样的，标签为空，刚好放在确定和取消上，学习了！
页: [1] 2
查看完整版本: [已解决]如何调出XP密码设置对话框