zoukankan      html  css  js  c++  java
  • python3企业微信群组报警

    公司提出一个需求需要做一个企业微信的一个消息推送,需要将消息发送到聊天群里详细信息如下。

    如何创建应用请阅读我的上篇文章:https://www.cnblogs.com/wangyajunblog/p/9996308.html

    # -*- coding: UTF-8 -*-  
    import requests
    import urllib.request
    import json
    
    def get_token(url, corpid, corpsecret):
        token_url = '%s/cgi-bin/gettoken?corpid=%s&corpsecret=%s' % (url, corpid, corpsecret)
        token = json.loads(urllib.request.urlopen(token_url).read().decode())['access_token']
        return token
    
    #获取成员信息
    corpid = 'ww****************' # 我的企业的id
    corpsecret = 'sGUmNQWa*************************************' #应用的Secret
    url = 'https://qyapi.weixin.qq.com'
    token=get_token(url, corpid, corpsecret)
    url="https://qyapi.weixin.qq.com/cgi-bin/department/list?access_token="+token
    r=requests.get(url)
    department=r.json()['department'][1]['id']
    url='https://qyapi.weixin.qq.com/cgi-bin/user/simplelist?access_token='+token+'&department_id='+str(department)
    r=requests.get(url)
    #print(r.json()) <--------输出成员信息 (可以注释)
    
    userid="*************************" #我的企业微信的账号
    userid_list=["********************","*******************88"] #群内的人的账号#下面是获取list
    #userlist=r.json()['userlist']
    #for user in userlist:
    #    userid_list.append(user['userid'])
    
    #下面是建群
    '''url='https://qyapi.weixin.qq.com/cgi-bin/appchat/create?access_token='+token
    print(userid_list)
    data={"name":"测试","owner":userid,"userlist":userid_list}
    data=json.dumps(data)
    r=requests.post(url,data=data)
    chatid=r.json()["chatid"]
    print(chatid)'''
    
    url="https://qyapi.weixin.qq.com/cgi-bin/appchat/send?access_token="+token
    data={"chatid":"*********************","msgtype":"text","text":{"content":"自定义"},"safe":0}   #chatid值是群组的id
    data=json.dumps(data)
    r=requests.post(url,data=data)
    #print(r.json())   <-----这条的意识是输出群的id信息 (可以注释)
    

     

  • 相关阅读:
    Delphi通过调用COM对象实现更改桌面壁纸
    Delphi之TDrawGrid绘制
    Delphi中的消息截获(六种方法:Hook,SubClass,Override WndProc,Message Handler,RTTI,Form1.WindowProc:=@myfun)good
    从一般管理原则看微软的重组
    Delphi使用Windows API函数AnimateWindow实现窗体特效
    Delphi下URL汉字编码解码的两个函数
    Delphi2007下CIS的clHttp使用
    Delphi使用XmlHttp获取时间
    提升进程权限为DEBUG权限
    VS 2012 单元测试简单配置
  • 原文地址:https://www.cnblogs.com/wangyajunblog/p/10001398.html
Copyright © 2011-2022 走看看