文件名称：提取查询结果中的表格内容
文件大小：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, 整理完毕