我们专注攀枝花网站设计 攀枝花网站制作 攀枝花网站建设
成都网站建设公司服务热线:400-028-6601

网站建设知识

十年网站开发经验 + 多家企业客户 + 靠谱的建站团队

量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决

vb.net获取单号 vbnet获取电脑信息

VB源码查询快递单号

Function kdcx(kd, orderid)

创新互联建站是一家专业提供涪陵企业网站建设,专注与成都做网站、成都网站制作、H5场景定制、小程序制作等业务。10年已为涪陵众多企业、政府机构等服务。创新互联专业网络公司优惠进行中。

Dim Err, url, kdtime, link, Errcode, Status

Select Case kd

Case "申通"

kd = "shentong"

Case "圆通"

kd = "yuantong"

Case "优速"

kd = "yousu"

Case "龙邦"

kd = "longbang"

Case "城市"

kd = "cs"

Case Else

kdcx = "暂时不支持此快递"

Exit Function

End Select

Set http = CreateObject("Microsoft.XMLHTTP")

url = ";order=" orderid "id=" kd "ord=descshow=xml"

http.Open "get", url, False

http.send

WebContent = http.responsetext

Set objDom = CreateObject("Microsoft.XMLDom")

objDom.async = False

objDom.LoadXML WebContent

Set Item = objDom.getElementsByTagName("Order")

For i = 1 To Item.Length - 1

kdtime = Item(i).getElementsByTagName("Time")(0).Text

link = Item(i).getElementsByTagName("Content")(0).Text

kdcx = kdcx kdtime link vbCrLf

Next

Set Item = Nothing

End Function

Private Sub Command1_Click()

MsgBox kdcx("申通", "768782613057")

End Sub

如何获取圆通快递单单号,开发用VB.net可以吗

一般来说,提供的接口,不分语言。同是.net里的产品。C#可以用,vb.net就可以用

你现在要确认好,他给你提供什么形式的接口,在线API还是封装的类库,或是其它形式的

使用VB.NET读取数据

孩子,如果你从你单击事件上下手,就好办了,先弄明白,点击了什么,datagridview点击,可以获取单击的值,好办,用SQL语句去查询单击的这个值,把查到的结果再交给你要处理的地方,我常这么干。我从来不晓得什么表与表之间的关联,或者关系表什么鬼东西,但是我也可以操作很多张表,把它们的结果集一起显示出来。

Dim 表1 As New DataSet

Dim 对象1 As OleDb.OleDbDataAdapter = New OleDb.OleDbDataAdapter("select top * from表名 where 字段名 = '" DataGridView1.CurrentCell.Value "' ", 数据源)

对象1.Fill(表1, " 表名")

DataGridView2.DataSource = 表1.Tables(" 表名")

表1 = Nothing

对象1 = Nothing

如果写成这样,还嫌不够,一定要按你的意思去写,那我真的要疯了。

这个例子,就是把表格1点击的值查一个结果集,在表格2上显示,不知有没有你想要的表达式?

VB.NET 在其它窗口如何调用 DataGridView1.CurrentRow.Cells(0).Value

NullReferenceException表示的是你调用的某一个对象为Null

从你的描述来看,你应该是在Form3里面Show的Form6

我建议你不要一行写太多的代码,这样出错不容易找到问题

你的DataGridView1、CurrentRow、Cells(0)、Value这些都可能为空

你可以先用一个变量保存你选中的单号,而且你可以在出错的时候看到这个单号到底有没有取到,进而确定具体问题

你可以在出错的时候选中这一个对象

然后右键,选择添加监视,或者快速监视来查看这个对象的值以确定它是不是null

你找的出错那一行的代码哪个对象为null,然后再确定问题就好了(一般对象为null都是流程不对或未取到正确的值)

跨窗口传值的话使用公有属性是没有错的,不过一般不直接传整个Grid,而是需要什么传什么;你这里需要单号的话直接设置单号这个属性,然后在showFrom6之前把单号取出来赋值过去就好了


当前标题:vb.net获取单号 vbnet获取电脑信息
分享链接:http://mswzjz.cn/article/dosephd.html

其他资讯