VBS怎样打开文本文件，并复制其内容？

hello70

1. dim Wshell
   
2. 
   
3. Set WshShell = CreateObject("WScript.Shell")
   
4. 
   
5. WshShell.run """H:\操作平台\打印\打印清除执行.bat""",,True
   
6. 
   
7. WScript.Sleep 10
   
8. 
   
9. WshShell.run """H:\操作平台\打印\dayin.txt""",5,True
   
10. 
    
11. WScript.Sleep 10
    
12. WshShell.SendKeys "%e"
    
13. 
    
14. WScript.Sleep 10
    
15. WshShell.SendKeys "^a"
    
16. 
    
17. 
    
18. WScript.Sleep 10
    
19. WshShell.SendKeys "^c"

复制代码

我想在电脑桌面上打开dayin文本文件，并且选中任务栏中的“编辑”，再选中编辑中的“全选”，然后复制

问题是：文本打开后，在桌面显示，却不能执行后面的内容，请高手指点！

slore

FSO 直接OpenTextFile ReadAll读文本

hello70

用ReadAll读文本，不能模仿右快捷键粘贴在文本中的动作，因为不在剪贴版的内存中，哪位高手指点？

是不是按键激发的问题？

Batcher

批处理、VBS剪贴板操作专题
http://www.bathome.net/thread-8329-1-1.html