我在.hta应用程序中运行了一些vbscript,提示用户键入用户名和密码,然后将这些详细信息添加到Windows凭据管理器。
现在代码工作正常,但是它运行它总是提示我下载.hta文件,之后我不想这样做。
我在hta中运行vbs的原因是这是我可以获得屏蔽密码提示的唯一方法。
这是我正在运行的代码。
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252" />
<title>Windows Credentials</title>
<script type="text/vbscript">
Function LoginForm_OnSubmit
strUser = LoginForm.UserName.Value
strPass = LoginForm.Password.Value
strServer1 = "*.server.com"
strServer2 = "*.server2.com"
strCommand = "cmd /c cmdkey /add:" & strServer1 & " /user:" & "domain\" & strUser & " /pass:" & strPass
strCommand = "cmd /c cmdkey /add:" & strServer2 & " /user:" & "domain\" & strUser & " /pass:" & strPass
Set objShell = CreateObject("WScript.Shell")
objShell.Run strCommand, 0, True
MsgBox strUser & " has been added to the credentials list."
End Function
</script>
</head>
<body>
<form id="LoginForm">
Enter Your Emila Username: <input type="textbox" id="UserName"/><br />
Enter Your Email Password: <input type="password" id="Password"/><br />
<input type="submit" value="Login"/>
</form>
</body>
</html>
提前致谢。
克里斯