文件命令以*.vbs
脚本如下:(修改脚本中id and password即可)
password = "123456" 'Notes密码
name = "lkf" '名字拼音
id = "123456" '工号
set ws = createobject("wscript.shell")
if Not ws.appactivate(name) then
' ws.appactivate id
' ws.appactivate "Work"
' ws.appactivate "Notes"
' ws.appactivate "Logout"
ws.sendkeys "%"
if Not ws.appactivate("Lotus Notes") then
' ws.popup "No",1
createobject("InternetExplorer.application").navigate("mailto:")
end if
wscript.sleep 50
' delaysendkeys "{enter}"
delaysendkeys password
delaysendkeys "{enter}"
end if
function delaysendkeys(s)
ws.sendkeys s
wscript.sleep 50
end function
脚本如下:(修改脚本中id and password即可)
password = "123456" 'Notes密码
name = "lkf" '名字拼音
id = "123456" '工号
set ws = createobject("wscript.shell")
if Not ws.appactivate(name) then
' ws.appactivate id
' ws.appactivate "Work"
' ws.appactivate "Notes"
' ws.appactivate "Logout"
ws.sendkeys "%"
if Not ws.appactivate("Lotus Notes") then
' ws.popup "No",1
createobject("InternetExplorer.application").navigate("mailto:")
end if
wscript.sleep 50
' delaysendkeys "{enter}"
delaysendkeys password
delaysendkeys "{enter}"
end if
function delaysendkeys(s)
ws.sendkeys s
wscript.sleep 50
end function
本文介绍了一段VBS脚本代码,该脚本用于自动登录Lotus Notes客户端,并包含了用户名、密码及工号等参数。通过创建WScript.Shell对象实现应用程序激活与按键输入模拟。
1719

被折叠的 条评论
为什么被折叠?



