鱼C论坛

 找回密码
 立即注册
查看: 1503|回复: 5

[作品展示] qq自动发送消息(常规版)

[复制链接]
发表于 2020-5-20 00:14:10 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能^_^

您需要 登录 才可以下载或查看,没有账号?立即注册

x
本帖最后由 v.ki 于 2020-5-20 08:07 编辑

非原创,利用win32实现
简单的来说就是操作电脑剪切板

那么这么无聊的东西肯定满足不了广大绅士,于是我又写了绅士版[url=qq自动发送消息(绅士版) https://fishc.com.cn/thread-169638-1-1.html (出处: 鱼C论坛)]绅士版[/url]

  1. import random
  2. import win32gui as a
  3. import win32con as b
  4. import win32clipboard as c
  5. msg=[]
  6. print('qq自动发送消息使用方法   1:想发送人的单独窗口   2.设置为按下enter发送')
  7. n=int(input('你想发多少条消息:'))
  8. qq=int(input('多少条不同的内容:'))
  9. for j in range(qq):
  10.     m=input('消息内容:')
  11.     msg.append(m)
  12. name=input('对方昵称:')
  13. msg_len=len(msg)-1

  14. a_=0
  15. for i in range(n+1):
  16.     if a_<=msg_len:
  17.         num =random.randint(0,msg_len)
  18.         c.OpenClipboard()
  19.         c.EmptyClipboard()
  20.         c.SetClipboardData(b.CF_UNICODETEXT,msg[num])
  21.         a_+=1
  22.         c.CloseClipboard()
  23.         handle=a.FindWindow(None,name)
  24.         if handle != 0:
  25.             a.SendMessage(handle,770,0,0)
  26.             a.SendMessage(handle,b.WM_KEYDOWN,b.VK_RETURN,0)
  27.             print('发送成功!',i)
复制代码
小甲鱼最新课程 -> https://ilovefishc.com
回复

使用道具 举报

发表于 2020-5-20 07:13:18 | 显示全部楼层

回帖奖励 +40 鱼币

围观
小甲鱼最新课程 -> https://ilovefishc.com
回复

使用道具 举报

发表于 2020-5-20 07:14:20 | 显示全部楼层
楼主手这么滑的吗
小甲鱼最新课程 -> https://ilovefishc.com
回复 支持 1 反对 0

使用道具 举报

发表于 2020-5-20 08:05:19 | 显示全部楼层
小甲鱼最新课程 -> https://ilovefishc.com
回复 支持 反对

使用道具 举报

 楼主| 发表于 2020-5-20 08:06:17 | 显示全部楼层

当作福利吧
小甲鱼最新课程 -> https://ilovefishc.com
回复 支持 反对

使用道具 举报

发表于 2020-5-20 08:19:57 | 显示全部楼层

楼主你1L没了……
小甲鱼最新课程 -> https://ilovefishc.com
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Archiver|鱼C工作室 ( 粤ICP备18085999号-1 | 粤公网安备 44051102000585号)

GMT+8, 2025-6-19 19:48

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表