你试试看能不能用
#include<array.au3>
$text='40 Can AutoitX run a complete script or an a3x file? [url]http://www.autoitscript.com/forum/index.php?showtopic=83292'&@CRLF& _
'41 Last post by: [url]http://www.autoitscript.com/forum/index.php?showtopic=83292&view=getlastpost'&@CRLF& _
'42 3.3.0.0 Unicode Functions [url]http://www.autoitscript.com/forum/index.php?showtopic=89698'&@CRLF& _
'43 Last post by: [url]http://www.autoitscript.com/forum/index.php?showtopic=89698&view=getlastpost'
;~ ConsoleWrite($text)
$array=StringRegExp($text,'\d+\s(.+)\s(http.+)',3);stringregexp($text,'\d+ (.+) (http.+)',3)
;~ _ArrayDisplay($array)
For $i=0 To UBound($array)-1 Step 2
If $array[$i]='Last post by:' Then ContinueLoop
$a=$array[$i]
$b=$array[$i+1]
ConsoleWrite($a&" "&$b)
Next
我试了下可以用,但有点小问题
[ 本帖最后由 cnsnc 于 2009-4-17 22:06 编辑 ] |