Board logo

标题: VBS的sendkeys发送按键实例 [打印本页]

作者: lixiaodaoaaa    时间: 2009-2-12 04:27     标题: VBS的sendkeys发送按键实例

  1. set s = WScript.CreateObject("WScript.Shell")
  2. app=s.Run ("C:\windows\notepad.exe")
  3. code1="biweilun"
  4. code2="woaini"
  5. code3="hehe  wo  ai ni  a  "
  6. code4="bu xiang suib  shuoahfad "
  7. code5="hha shuang ba3"
  8. code6=" wo xiang wo bu ying gai ma ren le "
  9. code7=" shi de "
  10. WScript.Sleep 1000
  11. s.AppActivate app
  12. s.SendKeys code1&code2&code3&code4&code5&code6&code7
  13. Wscript.quit
复制代码



[ 本帖最后由 lixiaodaoaaa 于 2009-2-17 04:02 编辑 ]




欢迎光临 批处理之家 (http://bbs.bathome.net/) Powered by Discuz! 7.2