asp去除表格内容的正则表达式
asp去除表格内容的正则表达式
Function GetZhanzhanList(Codes)
Codes=RegExpTest("<td>.*?</td>", Codes)
Codes=Replace(Codes,"<td>","")
Codes=Replace(Codes,"</td>","")
Codes2=""
TempArr=Split(Codes,"||")
For Each Temp In TempArr
If Temp<>"" And Instr(Temp,"http://")=0 Then
If Instr(Temp,"<a href=")>0 Then
Temp=Split(Temp,">")(1)
Temp=Split(Temp,"<")(0)
End If
If Codes2="" Then
Codes2=Temp
Else
Codes2=Codes2&"||"&Temp
End If
End If
Next
GetZhanzhanList=Codes2
End Function
补充:asp教程,正则表达式