DIY

[完美解决]GK.RPA +Cjs ...

集团董事长[果猿] Rank: 1 果壳币: 9

发表于 2021-2-26 23:29:42 | 2 条回复 | 246 次浏览

Delay 1000
   if GK.RPA("text", "学习签退", 290, 468, 428, 535, true) or GK.RPA("text", "随机验证", 290, 468, 428, 535, true) or GK.RPA("text", "学习签到", 290, 468, 428, 535, true) then

            //调用验证码识别
        Call 验证码识别()                这样就报错
        
        
    End If

if 1 = 1 then
call 验证码识别()     这样也不会报错
then

//Call 验证码识别()           这样就不会


Sub 验证码识别

    If Dir.Exist(filepath) Then
        TracePrint "存在"
    Else
        TracePrint "不存在!"
    End If
    TracePrint filepath

    //滑块背景 路劲 filepathback
    Dim filepathback = GetSdcardDir() & "/yzm1.jpg"
    If Dir.Exist(filepathback) Then
        TracePrint "存在"
    Else
        TracePrint "不存在!"
    End If
    TracePrint filepathback

    //这段代码为【图片识别】的案例
    //json = ttddm.tt_SendVerCode(username, password, filepath, typeid, typename, angle, remark)

    //这段代码为【2张图滑块识别】的案例 filepath 是滑块 filepathback 是背景图
    //json = ttddm.tt_SendXYCode(username, password, filepath, filepathback)

    //这段代码为【点选识别】的案例
    json = ttddm.tt_SendPointCode(username, password, filepath, typeid,angle, remark)
    // 由于环境限制调式时 去除不等于号的空格
    If json and json <> "" Then
        TracePrint json
        table = Cjson.Decode(json)
        If table Then
            If table["code"] = "0" Then
                ID = table["data"]["id"]
                //识别结果
                Result = table["data"]["result"]
                TracePrint "验证码识别结果为: ", Result
                Call 返回值分割()

            Else
                TracePrint "验证码识别失败: ", table["message"]
            End If
        End If
    Else
        TracePrint "发送HTTP请求失败"
    End If
    Dir.Delete ("/storage/emulated/0/yzm.jpg")
    Dir.Delete ("/storage/emulated/0/yzm1.jpg")

    //报错
    //Dim errorUrl="http://api.ttshitu.com/reporterror.json?id="
    //Dim 返回值 = URL.Post(errorUrl & ID, "")
    // TracePrint 返回值
End Sub
发新帖
集团董事长[果猿] Rank: 1 果壳币: 9

发表于 2021-2-27 13:39:25

好像是只要 Cjson.Decode(json)这个前面运行过返回值是表的语句 到这里就会报错

回复 道具 举报

果壳王子[果壳校长] [王子殿下] Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20 果壳热讲师 独家品牌学院 果壳热大导师 果壳学院创始人 果壳热教职工 果壳热平台站长 果壳学院校长/副校长 果壳学长 果壳热研究生 果壳币: 4726

发表于 2021-4-12 18:33:21

果壳王子 —— 来自果壳热互助团队
image.png

回复 道具 举报

发新帖
您需要登录后才可以回帖 登录 | 注册成为果猿 微信登录

手机版

© 2020-2030 果壳热 All rights reserved.

Powered by GUOHOT XS8.8. Theme designed by GUOKEHOT.

top bottom