本帖最后由 mshuking 于 2014-12-13 12:15 编辑 $admin = InputBox("修改密码", "请输入新密码:", "", "*",200,120,-1,-1)
IniWrite("pwd.dat","pwd","password",$admin)
If $admin = 0 Then MsgBox(16, '提示', '密码不能为空')
If $admin = $input Then MsgBox(64, '提示', '密码修改成功 ')
修改密码 两种情况
判断
输入密码修改成功
没有输入密码 不能为空
谢谢二楼 已解决Local $admin = ''
Do
$admin = InputBox("修改密码", "请输入新密码:", "", "*", 250, 150)
;If @error Then Exit
If $admin == '' Then MsgBox(16, '提示', '密码不能为空')
Until $admin <> ''
IniWrite("pwd.dat", "pwd", "password", $admin)
MsgBox(64, '提示', '密码修改成功 ')
|