#include <Array.au3> $sText = FileRead("index.asp") $sRegExp = '(?<=\t)<marquee.+?</marquee >' $asResult = StringRegExp($sText, $sRegExp, 1) If Not @error Then MsgBox(0, 'ok', $asResult[0]) _ArrayDisplay($asResult)
您需要 登录 才可以下载或查看,没有账号?加入
举报
#include <Array.au3> $sText = FileRead("index.asp") $sRegExp = '(?<=\t)<marquee.+?</marquee >' $asResult = StringRegExp($sText, $sRegExp, 1) If Not @error Then MsgBox(0, StringLen($asResult[0]), $asResult[0]) _ArrayDisplay($asResult, 1) $asResult[0] = StringLeft($asResult[0], 4094) _ArrayDisplay($asResult, 2)
#include <Array.au3> Local $iCount = 4095 ;ArrayDisplay只能显示4094个字.超过则显示为空 Local $asResult[1] For $i = 1 To $iCount Step 1 $asResult[0] &= "B" Next _ArrayDisplay($asResult, StringLen($asResult[0]))
本版积分规则 发表回复 回帖后跳转到最后一页
|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度
GMT+8, 2025-5-22 00:47 , Processed in 0.107691 second(s), 20 queries .
Powered by Discuz! X3.5 Licensed
© 2001-2025 Discuz! Team.