微云笔记远程控制脚本思路

实现思路: 脚本会读取指定的url的源代码 从中提取出脚本需要的信息 然后根据这些信息来控制脚本的行为 我们只是需要调整指定的url上面的网页内容 就可以远程的控制脚本的运行情况

常见的功能实现:

1. 脚本间隔一会检测下网络地址上的信息 然后根据刚才获取的信息来决定后面的脚本操作  远程控制脚本开关
2. 远程控制脚本的运行情况
3. 脚本会根据网络信息来进行信息验证 判断是否允许登录 等等

微云笔记端的配置

点击分享之后 记住那个分享的链接        

如果要调整内容

注意 第一行 不要用分隔符   因为根据微云笔记的网页源文件来看  从第二行开始写网络配置信息比较好 第一行写的话 提取出的内容会有html代码的干扰 代码如下

注意：微云笔记的源代码  在浏览器里面查看源代码 和从脚本里面获取到的源代码是不同的 应该是   一切以脚本获取到的源代码为准

脚本获取的源码

浏览器查看的源代码

安卓按键端(脚本端)：

基本思路：从指定地址的源代码 提取出需要的信息  分隔符 我个人习惯用@====  用这个分隔符分割整个源代码 然后得到内容数组  里面存在@==== 则提取里面的内容到<的位置就可以

代码函数

Function 从微云笔记获取信息操作()
    
    Dim 网页源代码=""
    Dim 微云地址="https://share.weiyun.com/5QM9QMb"
     Dim 分组,全组,临时地址,分隔符
    分隔符 = "@===="
    
    //一.获取到源代码 和粗劣的分析源码
    网页源代码 = URL.Get(微云地址) //这里的微云地址是公共变量获取到的
    网页源代码 = Trim(取文本中间("ql-editor ql-blank\"><p>", "</div>", 网页源代码))
     //取出源代码里面的<div class='ql-editor-inner'>  </div>之间的内容  我们需要分析的内容都在这个区域    
    TracePrint 网页源代码
    
    //二.对这部分源码进行分析 得到每行的内容 
    分组=""
    分组 = Split(网页源代码, 分隔符) 
    For Each vv In 分组        
        TracePrint vv
    Next
    //三.去掉一些没必要的html源码 获取到最后的结果
    For i = 0 To UBOUND(分组)
        分组(i) = Trim(UTF8.Mid(分组(i), 1, UTF8.InStr(1, 分组(i), "<") - 1))
        TracePrint 分组(i)
    Next
    
    //四.把结果作为返回值返回
    从微云笔记获取信息操作=分组
        
End Function

该函数访问指定的微云笔记地址 然后把分析出的结果写到一个数组  该函数返回一个数组  可以遍历这个数组来提取出需要的信息

转载于:https://www.cnblogs.com/zjl8455482/p/9219197.html