这段网页代码怎么去获取到??
td width="26%" bgcolor="#FFAA00" height="30"><div align="right"><b><FONT COLOR=red>宜:</FONT></b></div>
</td>
<td width="74%" bgcolor="#FFD680">祭祀 解除 教牛马 出行 馀事勿取</td>
</tr>
<tr>
<td width="26%" bgcolor="#FFAA00" height="30">
<div align="right"><b><FONT COLOR=green>忌:</FONT></b></div>
</td>
<td width="74%" bgcolor="#FFD680">动土 破土 行丧 开光 作梁 安葬 探病</td>
</tr>
<tr>
<td width="26%" bgcolor="#FFAA00" height="30">
<div align="right"><b>吉神宜趋:</b></div>
</td>
<td width="74%" bgcolor="#FFD680">天恩 月恩 守日 玉宇 青龙 </td>
</tr>
<tr>
<td width="26%" bgcolor="#FFAA00" height="30">
<div align="right"><b>凶神宜忌:</b></div>
</td>
<td width="74%" bgcolor="#FFD680">月建 小时 土府 月刑 </td>
</tr>
<tr>
<td width="26%" bgcolor="#FFAA00" height="30">
<div align="right"><b>每日胎神占方:</b></div>
</td>
<td width="74%" bgcolor="#FFD680">碓磨栖外正西</td>
</tr>
<tr>
<td width="26%" bgcolor="#FFAA00" height="30">
<div align="right"><b>五行:</b></div>
</td>
<td width="74%" bgcolor="#FFD680">白蜡金 建执位</td>
</tr>
<tr>
<td width="26%" bgcolor="#FFAA00" height="30">
<div align="right"><b>冲:</b></div>
</td>
<td width="74%" bgcolor="#FFD680">冲狗(甲戍)煞南</td>
要获取到的是:div align="right"><b><FONT COLOR=red>宜:</FONT></b></div>
</td>
<td width="74%" bgcolor="#FFD680">祭祀 解除 教牛马 出行 馀事勿取</td>
</tr>
div align="right"><b><FONT COLOR=green>忌:</FONT></b></div>
</td>
<td width="74%" bgcolor="#FFD680">动土 破土 行丧 开光 作梁 安葬 探病</td>
段中的: 祭祀 解除 教牛马 出行 馀事勿取
动土 破土 行丧 开光 作梁 安葬 探病 用正则,代码保存到t8.txt
$text = FileRead("t8.txt")
$shiyi = StringRegExp($text, '<td\swidth=\"74%\"\sbgcolor=\"#FFD680\">(.*)</td>', 3)
MsgBox(0,0,"宜: "&$shiyi&@CRLF&"忌: "&$shiyi&@CRLF&"吉神宜趋: "&$shiyi&@CRLF&"凶神宜忌: "&$shiyi&@CRLF&"每日胎神占方: "&$shiyi&@CRLF&"五行: "&$shiyi&@CRLF&"冲: "&$shiyi)
[ 本帖最后由 xayle 于 2009-4-6 21:33 编辑 ]
页:
[1]