国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > 易語言 > 正文

易語言通過模擬的方式實現對微信的視頻圖片消息發送的代碼

2024-07-21 23:02:46
字體:
來源:轉載
供稿:網友

微信后臺視頻圖片消息發送的代碼

此功能需要加載精易模塊5.6

.版本 2.支持庫 spec.支持庫 internet.程序集 程序集1.子程序 _啟動子程序, 整數型, , 請在本子程序中放置動態鏈接庫初始化代碼_臨時子程序 ()返回 (0).子程序 _臨時子程序.局部變量 handle, 整數型, , "0".局部變量 i, 整數型' 本名稱子程序用作測試程序用,僅在開發及調試環境中有效,編譯發布程序前將被系統自動清空,請將所有用作測試的臨時代碼放在本子程序中。 注意不要修改本子程序的名稱、參數及返回值類型。窗口_模糊遍歷窗口 (, “ChatWnd”, , handle)' 請打開微信群 不要合并.計次循環首 (取數組成員數 (handle), i)  調試輸出 (窗口_取標題 (handle [i]))  sendfile (窗口_取標題 (handle [i]), “C:/Documents and Settings/Administrator/桌面/2.mp4”) ' 視頻  sendimg (窗口_取標題 (handle [i]), “C:/Documents and Settings/Administrator/桌面/1.jpg”) ' 圖片  sendtext (窗口_取標題 (handle [i]), “www.survivalescaperooms.com”) ' 消息.計次循環尾 ()調試輸出 (getwechatgroup ()).子程序 sendfile, , 公開.參數 name, 文本型.參數 file, 文本型.局部變量 a, 文本型, , "0".局部變量 handle, 整數型.如果真 (文件是否存在 (file) = 假)  返回 ().如果真結束handle = 昵稱取句柄 (name)窗口_強制顯示 (handle, 真)鼠標_單擊 (handle, 10, 580, 1)加入成員 (a, file)剪輯板_置文件 (a)鍵盤_單擊 (#Ctrl鍵, 1)程序_延時 (1000)鍵盤_消息 (handle, #V鍵, 5, 假)鍵盤_單擊 (#Ctrl鍵, 2)程序_延時 (1000)PostMessageA (handle, 256, #回車鍵, 0)窗口_最小化 (handle).子程序 昵稱取句柄, 整數型.參數 name, 文本型.局部變量 handle, 整數型, , "0".局部變量 i, 整數型窗口_模糊遍歷窗口 (, “ChatWnd”, , handle).計次循環首 (取數組成員數 (handle), i)  .如果真 (窗口_取標題 (handle [i]) = name)    返回 (handle [i])  .如果真結束.計次循環尾 ()返回 (0).子程序 sendimg, , 公開.參數 name, 文本型.參數 file, 文本型.局部變量 handle, 整數型.局部變量 img, 字節集.如果真 (file = “”)  返回 ().如果真結束.如果真 (尋找文本 (file, “http”, , 假) = -1)  .如果真 (文件是否存在 (file) = 假)    返回 ()  .如果真結束.如果真結束handle = 昵稱取句柄 (name)窗口_強制顯示 (handle, 真)鼠標_單擊 (handle, 10, 580, 1).如果 (尋找文本 (file, “http”, , 假) ≠ -1)  img = HTTP讀文件 (file).否則  img = 讀入文件 (file).如果結束剪輯板_置圖片 (img)鍵盤_單擊 (#Ctrl鍵, 1)程序_延時 (1000)鍵盤_消息 (handle, #V鍵, 5, 假)鍵盤_單擊 (#Ctrl鍵, 2)程序_延時 (1000)PostMessageA (handle, 256, #回車鍵, 0)窗口_最小化 (handle).子程序 sendtext, , 公開.參數 name, 文本型.參數 text, 文本型.局部變量 handle, 整數型.如果真 (text = “”)  返回 ().如果真結束handle = 昵稱取句柄 (name)窗口_強制顯示 (handle, 真)鼠標_單擊 (handle, 10, 580, 1)剪輯板_置文本 (text).判斷循環首 (剪輯板_取文本 () = “”)  剪輯板_置文本 (text).判斷循環尾 ()鍵盤_單擊 (#Ctrl鍵, 1)程序_延時 (1000)鍵盤_消息 (handle, #V鍵, 5, 假)鍵盤_單擊 (#Ctrl鍵, 2)程序_延時 (1000)PostMessageA (handle, 256, #回車鍵, 0)窗口_最小化 (handle).子程序 getwechatgroup, 文本型, 公開.局部變量 handle, 整數型, , "0".局部變量 title, 文本型.局部變量 i, 整數型窗口_模糊遍歷窗口 (, “ChatWnd”, , handle).計次循環首 (取數組成員數 (handle), i)  .判斷開始 (title = “”)    title = 窗口_取標題 (handle [i])  .默認    title = title + #換行符 + 窗口_取標題 (handle [i])  .判斷結束.計次循環尾 ().如果真 (title = “”)  信息框 (“未檢測到群列表,如已登錄 請打開微信群 不要合并”, 0 + 64, , ).如果真結束返回 (title).子程序 version, 文本型, 公開返回 (“666”)

運行結果:

易語言,微信,后臺,發送,信息

總結

以上就是這篇文章的全部內容了,希望本文的內容對大家的學習或者工作具有一定的參考學習價值,謝謝大家對VeVb武林網的支持。


注:相關教程知識閱讀請移步到易語言教程頻道。
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 靖边县| 揭西县| 宜春市| 西安市| 高尔夫| 华亭县| 安丘市| 美姑县| 漳平市| 苗栗市| 泰安市| 井研县| 微山县| 平度市| 祁阳县| 临桂县| 六枝特区| 正宁县| 哈巴河县| 东乡族自治县| 甘肃省| 井研县| 泾源县| 汝南县| 吕梁市| 扎赉特旗| 方山县| 拉萨市| 芜湖县| 乌什县| 阿尔山市| 宁都县| 洛阳市| 招远市| 兴化市| 乌鲁木齐县| 米泉市| 东港市| 万盛区| 射阳县| 黎城县|