class= " lineNumbers "
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
|
class=
id= " codeSnippet807703 " class= " ' **************************************************************
'ПОЗВОНИТЕ ДЛЯ ТОГО ЧТОБЫ ПОЛУЧИТЬ СЧЕТ КРЕДИТА
'Попытка
'создайте предмет HttpWebRequest для того чтобы связывать с Experian
objRequest = CType (WebRequest.Create (EcalsURL), HttpWebRequest)
objRequest.Method = «СТОЛБ»
objRequest.ContentLength = post_string. Длина
objRequest.ContentType = «application/x-www-form-urlencoded»
objRequest.Headers («утверждение») = «БЕЙСИК» & authorization_string
'данные по столба посланы как поток
myWriter = ничего
myWriter = новое StreamWriter (objRequest.GetRequestStream ())
myWriter.Write (post_string)
myWriter.Close ()
'возвращенные значения возвращены как поток, тогда прочитаны в шнур
objResponse = CType (objRequest.GetResponse (), HttpWebResponse)
Если objResponse.StatusCode = 200 после этого
responseStream = новое StreamReader (objResponse.GetResponseStream ())
post_response = responseStream.ReadToEnd ()
responseStream.Close ()
objXML = новое XmlDocument ()
objXML.LoadXml (post_response)
Тусклое objStreamWriter как StreamWriter
objStreamWriter = File.AppendText (Server.MapPath («Output.txt»))
objStreamWriter.WriteLine (post_response)
objStreamWriter.Close ()
myNode = objXML.SelectSingleNode («//CompletionCode»)
Если не myNode ничего после этого
…
|
