Sendkeys "variable"

Question

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 

これを行う方法はありますか？

Answer 1

確かに、この小さなスクリプトをコマンドラインで試してみると "test"と表示されます。

Set WshShell = WScript.CreateObject("WScript.Shell") 
keys = "test" 
WshShell.SendKeys keys