作者fumizuki (蒙面加菲狮)
看板Visual_Basic
标题Re: [VB6 ] 有关Inet.Execute的问题..
时间Fri Dec 29 07:39:02 2006
※ 引述《yeeddt (" Mr.ㄨㄞ ")》之铭言：
: 找了很多的网站..
: 实在是找不到Inet.Execute的用法
: 学校图书馆也找不到类似书籍
: 实在是没办法了
: 请问有心人可以跟我解释一下大略的用法吗？
: 感激不尽
MSDN 有以 ftp 为例介绍 inet 的用法
至於 http 的话用法也差不多
Inet1.Execute url
然後在 StateChanged 事件中检查并接收 web 回传的网页内容
Private Sub Inet1_StateChanged(ByVal State As Integer)
If State = 12 Then
Dim bData, bData2, bData3() As Byte
Do
bData2 = Inet1(Index).GetChunk(32768, icByteArray)
If LenB(bData2) = 0 Then Exit Do
bData = bData & bData2: bData3 = bData
Loop
End If
'bData3 就是网站回传的资料内容，为 Byte 型态
'StrConv(bData3, vbFromUnicode) 为 字串 型态
'亦可 bData2 = InetX(Index).GetChunk(32768) 直接取回字串型态的资料
End Sub
--
▃▅▇▆▄ ▆▂▃ `
逝去感情如何能留住，半点痴情遗留殊不易，██▅▇▄▃ ▇▃▂" .
█████████▃i ▁▄▇
更多凄凄惨惨的遭遇…………██▆▃ █▅▆▃ˍ▄*
◢ ▂█▄▇▅▂▌.
我不知道，王～八～蛋～～！ ▂▆███ █▄▃ 。fumizuki。Check。
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 210.58.156.148