快递100，现在关于三通一达都已经不能直接用api查询了
必须用htmlApi去查。
参考例子
http://foxtable.com/bbs/dispbbs.asp?BoardID=5&ID=38956&skin=0
Dim wbr As new System.Windows.Forms.WebBrowser
wbr.Navigate("www.kuaidi100.com/applyurl?key=a163da2878f79e28&com=yunda&nu=3904050037722")
Do Until wbr.ReadyState = 4
Application.DoEvents
Loop
Dim s As String = wbr.DocumentText
Dim reg As System.Text.RegularExpressions.Regex
Dim arr() As String
arr = reg.split(s,"(<PRE>)|(</PRE>)")
wbr.Navigate(arr(2))
Do Until wbr.ReadyState = 4
Application.DoEvents
Loop
output.show(wbr.Document.body.innertext)
加好友 
发短信
Post By：2015/7/19 17:19:00 [显示全部帖子]
