加入收藏 | 设为首页 | 会员中心 | 我要投稿 李大同 (https://www.lidatong.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 百科 > 正文

如何使用请求并使用xml和VB.net进行响应?

发布时间:2020-12-16 23:29:08 所属栏目:百科 来源:网络整理
导读:我被要求向服务器发送请求以在线注册点收集系统的交易.我不太了解这个请求 – 响应程序. 他们告诉我,请求应该是这样的: request( p1 - loginInfo:UN|PASS|MP1p2 - XMLTransactionInfo (below)p3 - returnPointBalance:1)transaction partnernum000001/partn
我被要求向服务器发送请求以在线注册点收集系统的交易.我不太了解这个请求 – 响应程序.

他们告诉我,请求应该是这样的:

request( 
p1 - loginInfo:UN|PASS|MP1
p2 - XMLTransactionInfo (below)
p3 - returnPointBalance:1
)

<transaction>
  <partnernum>000001</partnernum>
  <trxndate>2012-10->12T07:18:27</trxndate>
  <cardnum>1234567891234567</cardnum>
  <trxnamount>5.4</trxnamount>
  <trxnpoints>729</trxnpoints>
  <posnum>000-001</posnum>
  <contactidnum></contactidnum>
  <contactphone>357</contactphone>
  <trxnseqnum>12345612345612</trxnseqnum>
</transaction>

响应应该是这样的:

response(    
<?xml version="1.0" encoding="UTF-8"?> 
<transactionresponse xmlns="C:pathSth.earSth.war/xmlschema/TransactionResponse.rng">
  <sequencenum>123123121312</sequencenum> 
  <errorcode>0</errorcode> 
  <errormessage></errormessage> 
  <trxnnum>6399575</trxnnum> 
  <balancebefore>1942</balancebefore> 
  <balanceafter>1213</balanceafter> 
  <mpcontrib>729</mpcontrib> 
  <partnercontrib>0</partnercontrib> 
</transactionresponse>
)

他们还告诉我:“你可以使用这个URL获取WSDL:url1 ……”和“WS端点是:url2 ……”

到目前为止,我已成功完成以下任务:

Dim request As WebRequest = Nothing

  'Create a request for the URL.
  request =WebRequest.Create("URL1")

  'set the credentials.
  Dim credentials As NetworkCredential
  loginUser = "username"
  loginPass = "pass"
  credentials = New NetworkCredential(loginUser,loginPass,"MP1")
  request.Credentials = credentials

  'create the transaction xml
  request.ContentType = "text/xml"
  Dim transaction As XmlElement
  transaction = xml2.CreateElement("transaction")
  xml2.AppendChild(transaction)

  Dim partnernum As XmlElement
  partnernum = xml2.CreateElement("partnernum")
  partnernum.InnerText = "00001"
  transaction.AppendChild(partnernum)

  'and so on until i create the exact same xml as above...

然后我将XML文件打印到控制台进行目视检查,然后请求响应

'print to console
  xml2.Save(Console.Out)
  Dim response As WebResponse = request.GetResponse()
  Console.WriteLine(response.ToString())
  'write the response to a textbox
  responseText.Text = response.Headers.ToString()

文本框中的响应结果是

Content-Language: el-GR
Transfer-Encoding: chunked
Content-Type: text/xml
Date: Thu,13 Dec 2012 18:52:33
GMT Server: WebSphere Application Server/6.0

首先,我应该使用他们给我的2个网址中的哪一个?

其次,如何创建他们告诉我的请求以获得我想要的响应?

有没有一步一步的指导?

我正在使用VB.net,WinForms.
感谢您的时间.

解决方法

您正在尝试使用VB.NET访问Web服务.

在Visual Studio中,您应该能够添加Web引用(或服务引用,具体取决于您正在使用的项目类型和VS版本).

看一下本教程:http://www.a2zdotnet.com/View.aspx?Id=191#.U9B6ZPmSyuo

有关.NET Web服务的更多信息:http://msdn.microsoft.com/en-us/library/t745kdsh(v=vs.90).aspx

(编辑:李大同)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章
      热点阅读