| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]能够实现字段调用QQ聊天窗口？？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=33654) |
| -- 作者：智友软件工作室 -- 发布时间：2013/5/22 11:36:00 -- [求助]能够实现字段调用QQ聊天窗口？？ 假如我有一个客户表，其中有一个姓名的字段。 姓名字段中有“张三” 能否实现点击张三之后去调用QQ程序，打开QQ好友为张三的聊天窗口呢？然后自动在聊天窗口中写上“你好张三”
|
| -- 作者：XYT -- 发布时间：2013/5/22 11:42:00 -- 使用QQ的URL协议吧. Dim Proc As New Process
Proc.File = "tencent://Message/?menu=yes&exe=&uin=12345678"
Proc.Start()
看下这个可以不 |
| -- 作者：Bin -- 发布时间：2013/5/22 11:42:00 -- 不能根据QQ名称 只能根据QQ号码 (根据QQ名称不科学的,重复名称怎么处理?) 利用QQ提供的URL协议 Dim Proc As New Process Proc.File = "tencent://Message/?menu=yes&exe=&uin=13231462" \'红色部分为QQ号 Proc.Start() |
| -- 作者：智友软件工作室 -- 发布时间：2013/5/22 11:52:00 -- 感谢大侠吗？我现在就去测试去 |
| -- 作者：智友软件工作室 -- 发布时间：2013/5/22 11:54:00 -- 对了打开聊天窗口之后，如何自动在聊天窗口中输入“你好张三呢” |
| -- 作者：智友软件工作室 -- 发布时间：2013/5/22 11:57:00 -- 上述代码测试可以，但是要打开QQ软件，如果QQ软件已经打开能够直接弹出聊天窗口呢？ |
| -- 作者：Bin -- 发布时间：2013/5/22 11:59:00 -- Dim Proc As New Process Proc.File = "tencent://Message/?menu=yes&exe=&uin=13231462" \'红色部分为QQ号 Proc.Start() System.Threading.Thread.Sleep(2000) \'等候几秒 Sendkeys.Send("信息")
|
| -- 作者：XYT -- 发布时间：2013/5/22 12:03:00 -- 可以弹出红色那部分的QQ的聊天窗口，但必须是好友。 |
| -- 作者：智友软件工作室 -- 发布时间：2013/5/22 12:36:00 -- 这样有个问题啊，即使QQ登录了也要再次登录QQ的，如果已经登陆了QQ能否直接打开呢？ |
| -- 作者：Bin -- 发布时间：2013/5/22 12:53:00 -- 不用啊,你装的是什么ＱＱ？ |