测试发布博文12

ElseIf 多点bi色(多点bi色_别处登陆提示窗口) > -1 Then
            Tap intX, intY            
            Call 等待多点bi色消失(多点bi色_别处登陆提示窗口, 5)
            

ElseIf 多点bi色(多点bi色_别处登陆提示窗口) > -1 Then
            Tap intX, intY            
            Call 等待多点bi色消失(多点bi色_别处登陆提示窗口, 5)

Dim 网页源代码=""
Dim url1="https://share.weiyun.com/5EdPtQh"
网页源代码 = URL.Get(url1)
TracePrint 网页源代码

Dim 分组,全组

分组 = Split(网页源代码, "@    ")
TracePrint 分组(1