本帖最后由 gxlove 于 2013-11-14 20:14 编辑
发一个QQ聊天工具的源码,不用加对方好友就可以和对方QQ聊天的工具
- 空间 QQ聊天
- 变量 QQ号码,线程句柄
- 功能 临时聊天()
- 控件.创建("浏览器","浏览器"&QQ号码,"",1,1,1,1,"","")
- 网页.转到("浏览器"&QQ号码,"http://wpa.qq.com/msgrd?v=3&uin="&QQ号码&"&site=qq&menu=yes")
- 辅助.等待(1000)
- 线程.关闭(线程句柄)
- 功能结束
- 功能 开始_点击()
- 线程句柄=线程.开启("QQ聊天.临时聊天","")
- 功能结束
- 功能 退出_点击()
- 辅助.退出()
- 功能结束
- 功能 编辑框0_内容改变()
- QQ号码=编辑框.获得文本("编辑框0")
- 功能结束
- 空间结束
复制代码
|