- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 能不能复制文件到QQ的对话框 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=70677)
-- 发布时间：2015/6/26 11:08:00
-- 能不能复制文件到QQ的对话框
复制代码如何将文本框内容的文件复制到指定QQ的对话框
此主题相关图片如下：q1.png
-- 发布时间：2015/6/26 11:09:00
--
做，不到。
-- 发布时间：2015/6/26 11:17:00
--
如果是发送内容，取巧
Dim a As String = "8888888"
If a IsNot Nothing Then
Dim Proc As New Process
\'tencent://Message/?puin=朋友的QQ&Uin=你的QQ
Proc.File = "tencent://message/?uin=" & a
Proc.Start()
Dim str As String = FileSys.ReadAllText(ProjectPath & "搜狗词库.txt")
System.Threading.Thread.Sleep(3000)
Sendkeys.SendWait(str)
Sendkeys.SendWait("^~")
End If
-- 发布时间：2015/6/26 11:24:00
--
哦