Ïîíåäåëüíèê, 18 ßíâàðÿ 2016 ã. 10:38
+ â öèòàòíèê
Äëÿ çàïðîñà íàèìåíîâàíèÿ áàíêà ïî ÁÈÊ
èñïîëüçóþ òàêîé êîä
Dim strData As String
Dim strResponse As String
Dim objHTTP As Object
Dim strpost As String
strData = "postparam=postval&postparam2=postval2"
Set objHTTP = CreateObject("MSXML2.ServerXMLHTTP")
objHTTP.Open "post", "http://www.bik-info.ru/api.html?type=xml&bik=046014327", False
objHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
objHTTP.send strData
strResponse = objHTTP.responseText
'îáðàáîòêà ñòðîêè strResponse
íî îòâåò ïðèõîäèò êðàêîçÿáðàìè.
íà ñàéòå íàïèñàíî www.bik-info.ru:
 ôîðìàòå XML:
http://www.bik-info.ru/api.html?type=xml&bik=ÍÎÌÅÐ_ÁÈÊ (Êîäèðîâêà Windows-1251)
êàê èñïðàâèòü ïîìîãèòå î÷åíü íàäî è î÷åíü ñðî÷íî. Íóæíî äåëàòü ïëàòåæêè à íàèìåíîâàíèå áàíêà íå ïîëó÷àåòñÿ óçíàòü.
http://www.sql.ru/forum/1195801/pomogite-ochen-srochno
-
Çàïèñü ïîíðàâèëàñü
-
0
Ïðîöèòèðîâàëè
-
0
Ñîõðàíèëè
-