代码如下
(data=StringCases[Import["http://www.jt2345.com/huoche/zhanzhan/"<>#1<>"-"<>#2<>".htm","Text",CharacterEncoding->"CP936"],RegularExpression@"<td.*?>(.*?)</td>"->"$1"][[10;;]]~Partition~9;(data[[;;,#]]=(*flaribbit 2018*)StringDelete["<"~~Shortest@__~~">"]/@data[[;;,#]])&/@{1,2,8};data//TableForm)&["beijing","tianjin"]
调用的api来自jt2345.com