amgloon 发表于 2008-11-3 09:42:46

数据输出问题

#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 发表于 2008-11-3 10:23:06


#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)
页: [1]
查看完整版本: 数据输出问题