提取查询结果中的表格内容

【文件属性】：
文件名称：提取查询结果中的表格内容
文件大小：2KB
文件格式：AHK
更新时间：2018-04-03 11:45:44
提取查询 ; 提取查询结果中的表格内容 FileDelete, result.txt Loop, %TotalPage% { MatchItemNum := 0 Loop, Read, Html\%A_Index%.html, result.txt { ; 抽取表格字段 If (A_LoopReadLine ~= "i)[^<]+]+class=""calc""") { MatchItemNum++ Field := RegExReplace(A_LoopReadLine,"i)^[^>]+>()?([^<]+)<.+","$2$3") StringReplace, Field, Field,  , , All ; 表格中的字段每5个组成一条记录 ModNum := Mod(MatchItemNum,5) If (ModNum = 1) FileAppend, % "`n" Field "`t" else { If (ModNum <> 0) FileAppend, % Field "`t" else FileAppend, % "http://gis2.sinica.edu.tw/place/" SubStr(Field,1,-4) } } } } MsgBox, 整理完毕