变量名 | 类 型 | 静态 | 数组 | 备 注 | 文本对象 | 快速文本对象 | | | i | 整数型 | | | a | 整数型 | | | 启动时间 | 整数型 | | | 信息 | 文本型 | | | keywords | 文本型 | | | rank | 文本型 | | | 值 | 文本型 | | | 值集 | 文本型 | | | y | 整数型 | | | key | 文本型 | | | pm | 文本型 | | | 正则 | 正则表达式类 | | |
启动时间 = 取启动时间 ()通用对话框1.初始目录 = 取运行目录 () 如果真 (通用对话框1. 打开 ())  文本对象. 从文件读 (通用对话框1.文件名 ) a = 0 判断循环首 (真) y = y + 1  i = 文本对象. 寻找文本 ( #换行符, a + 2, 假) 如果真 (i = -1 ) 跳出循环 ()   如果真 (a = 0 )  a = -2    信息 = 文本对象. 取文本 (a + 2, i - a - 2 ) 判断 (文本_取出现次数 (信息, “,”, 假) = 1 )  正则. 创建 ( #常量3, 信息 )  key = 正则. 取子匹配文本 (1, 1 )  pm = 正则. 取子匹配文本 (1, 2 )  正则. 创建 ( #常量2, 信息 )  key = 正则. 取子匹配文本 (1, 1 )  pm = 正则. 取子匹配文本 (1, 2 )   key = 文本_替换 (key, , , , “'”, “\'”) pm = 文本_替换 (pm, , , , #引号, “”, “,”, “”) 值 = 文本_替换 ( #常量1, , , , “关键词”, key, “排名”, pm ) 判断 (文本_是否为数字 (pm ) = 真)  值集 = 值集 + 值        判断 (y = 1000 ) 调试输出 (批量添加_Mysql (“test”, “rank”, “(`key`,`rank`)”, 值集, 假))   值集 = “” 程序_延时 (200 )  y = 0        a = i 判断循环尾 ()启动时间 = 取启动时间 () - 启动时间 调试输出 (启动时间 )
|