数据输出问题

amgloon

#include <INet.au3>

$html=_INetGetSource("http://trading.5173.com/冒险岛.shtml?gm=1114&ga=1116&gs=1117&bt=682b60e289f045339cae13d208023fc6")
$nOffset = 1
While 1

        $array = StringRegExp($html,"\d*\.\d*[/][^\x00-\xff]*", 1, $nOffset)
       
        If @error = 0 Then
                $nOffset = @extended
        Else
                ExitLoop
        EndIf
        for $i = 0 to UBound($array) - 1               
                MsgBox(0,"",$array[$i])               
        Next
WEnd
这段代码获得的数据可以直接输入到一个列表框么?该用什么函数?

[ 本帖最后由 amgloon 于 2008-11-3 10:32 编辑 ]

liongodmien

#include <INet.au3>

$html=_INetGetSource("http://trading.5173.com/冒险岛.shtml?gm=1114&ga=1116&gs=1117&bt=682b60e289f045339cae13d208023fc6")
Local $nOffset = 1, $t = ''
While 1

        $array = StringRegExp($html,"\d*\.\d*[/][^\x00-\xff]*", 1, $nOffset)
        
        If @error = 0 Then
                $nOffset = @extended
        Else
                ExitLoop
        EndIf
        for $i = 0 to UBound($array) - 1                
               $t &= $array[$i] & @CRLF
        Next
WEnd
MsgBox(64,'',$t)