复制代码
- set s = WScript.CreateObject("WScript.Shell")
- app=s.Run ("C:\windows\notepad.exe")
- code1="biweilun"
- code2="woaini"
- code3="hehe wo ai ni a "
- code4="bu xiang suib shuoahfad "
- code5="hha shuang ba3"
- code6=" wo xiang wo bu ying gai ma ren le "
- code7=" shi de "
- WScript.Sleep 1000
- s.AppActivate app
- s.SendKeys code1&code2&code3&code4&code5&code6&code7
- Wscript.quit
| 欢迎光临 批处理之家 (http://bbs.bathome.net/) | Powered by Discuz! 7.2 |