当前位置 博文首页 > SendKeys clip.exe 发送中文的代码

    SendKeys clip.exe 发送中文的代码

    作者:admin 时间:2021-02-18 18:01

    复制代码 代码如下:

    Set WshShell=CreateObject("WScript.Shell")
    code="让SendKeys可以发送中文"
    WshShell.Run "cmd.exe /c echo " & code & "| clip.exe", vbHide
    app=WshShell.Run ("notepad")
    WScript.Sleep 1000
    WshShell.AppActivate app
    WshShell.SendKeys "^v{BS}"
    Wscript.Quit

    js