是否可以使用SendKeys
类型变量中的字符。
例如,我将字符存储在变量firstname = Regie
这是我的代码。
On Error Resume Next
Dim objSysInfo, objUser
Set objSysInfo = CreateObject("ADSystemInfo")
Set objUser = GetObject("LDAP://" & objSysInfo.UserName)
firstname = objUser.givenName
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.AppActivate "Notepad"
WScript.Sleep 400
WshShell.SendKeys "{& objUser.givenName}"
WScript.Sleep 250
或者有什么方法可以实现这一目标吗?
答案 0 :(得分:1)
当然可以,在命令行上尝试这个小脚本,它会打印" test"。
Set WshShell = WScript.CreateObject("WScript.Shell")
keys = "test"
WshShell.SendKeys keys