半翅鸟 发表于 2012-2-23 17:00:30

测试一下发CODE好不好用

本帖最后由 半翅鸟 于 2012-2-23 17:01 编辑

#include <Array.au3>
#include <INet.au3>
$s_URL = 'http://www.ysxyfs.com/goods.php?id=2230'
$sText = _INetGetSource($s_URL)
Local $huohao = StringRegExpReplace($sText,'(?s).+(商品货号[^<]+).+(商品库存[^<]+).+?(商品品牌[^<]+).+?(上架时间[^<]+).+(本店价：)<[^>]+>([^<]+).+',"$1"&@CRLF&"$2"&@CRLF&"$3"&@CRLF&"$4"&@CRLF&"$5$6")
If Not @Error Then MsgBox(0, '商品货号 ',$huohao)成功啦，嘿嘿

Xiao伟 发表于 2012-2-24 22:06:38

是关于淘宝的？

bbslab 发表于 2012-3-2 22:46:06

http://www.dabaoku.com/sucai/gaoxiao/bbs-huitie3.files/2004311O.jpg
页: [1]
查看完整版本: 测试一下发CODE好不好用