主题：[讨论]关于100快递如何查询顺丰订单状态

100快递不支持顺丰的API，只能使用HTMLAPI，无法抓取快递状态信息，这样只能手动将查询到的录入到系统中。

有没有什么好的解决方法。

PS：仅针对顺丰，不是其他的快递。其他快递论坛中都有解决方案了

目前只能做到打开查询界面，无法获取。

代码如下：

Dim brs As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")
brs.Address = “http://www.kuaidi100.com/applyurl?key=“”&com=shunfeng&nu=“”

Dim s As String = e.form.controls("WebBrowser1").basecontrol.DocumentText
Dim brs As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")

Dim reg As System.Text.RegularExpressions.Regex
Dim arr() As String
arr = reg.split(s,"(<PRE>)|(</PRE>)")
brs.Address = arr(2)

以上两段代码必须分开来，否则第二段代码无法获取S

之后就只能返回一个网页了，就不知道如何获取了，求高手