标题: [问题求助] 求大哥们帮忙,怎么写一个复制粘贴的VBS代码? [打印本页]
作者: 列虚子 时间: 2021-1-3 20:05 标题: 求大哥们帮忙,怎么写一个复制粘贴的VBS代码?
- On Error Resume Next
- str="这里是你想说的话str1"
- Set Wshshell=WScript.CreateObject("WScript.Shell")
- WshShell.run"mshta vbscript:clipboardData.SetData("+""""+"text"+""""+","+""""&str&""""+")(close)",0,true
- WshShell.run"这里是你要发送到对方QQ的快捷方式str2"
- WScript.Sleep 1000
- WshShell.SendKeys"^v"
- WScript.Sleep 1000
- WshShell.SendKeys "%s"
- WScript.Sleep 1000
- WshShell.SendKeys"%{F4}"
复制代码
我照着这个代码,想把它改成,运行该vbs后,复制某个指定目录的文件,到QQ对话框然后发送。
比如复制C:111.exe 我是个门外汉,自己搞了一下午头都快大了,求大家帮帮我吧!
作者: 列虚子 时间: 2021-1-3 20:06
后面那些我都看得懂,就是不知道怎么改成复制某个文件
欢迎光临 批处理之家 (http://bathome.net./) |
Powered by Discuz! 7.2 |