Montnets WAP용 인터페이스를 만들어야 하므로 이 방법을 사용해야 합니다. 다음으로는 MSXML2.XMLHTTP 개체를 사용하는 ASP.net 버전이 있습니다.
request.asp
희미한 HTTPS
Https=server.createobject("MSXML2.XMLHTTP")를 설정합니다.
'XMLHTTP 객체 정의
Https.open "POST"," http://127.0.0.1/testpost/response.asp",false
Https.send "<?xml version=""1.0""?><misc_command version=""1.6""><command_name>echo</command_name>
<command_data_block><sid>123456</sid><service_id>987654</service_id>
<sp_id>11111</sp_id><sp_password>22222</sp_password></command_data_block>
</misc_command>"
Https.readystate=4이면
response.write "제출 성공"
'readstate 읽기 상태가 4이면 계속됩니다. 실패하면 당연히 Dim objstream 처리를 계속할 필요가 없습니다.
set objstream = Server.CreateObject("adodb.stream")
'스트림을 정의합니다. 직접 꺼내면 왜곡되기 때문에 objstream.Type = 1로 처리해야 합니다.
objstream.Mode =3
objstream.Open
objstream.Write Https.responseBody
objstream.위치 = 0
objstream.Type = 2
objstream.Charset = "GB2312"
html = objstream.ReadText
'코드를 변환하고 html에 넣어서 이러한 개체를 닫습니다. objstream.Close
objstream = 아무것도 설정하지 않음
https=아무것도 설정하지 않음
종료하면
response.write html
response.asp
'DOMDocument 객체 생성
xml = Server.CreateObject("msxml2.DOMDocument")로 설정합니다.
xml.async = False
'POST 데이터 로드
xml.로드 요청
xml.parseError.errorCode <> 0인 경우 그러면
response.write "데이터를 올바르게 수신할 수 없습니다." & "설명: " & xml.parseError.reason & "<br>Line: " & xml.parseError.Line
blogchild=xml.getElementsByTagName("misc_command")로 설정된
경우
'the_text=blogchild.item(0).childnodes(1).text
'the_text=blogchild.item(0).text
'i=0에서 blogchild.length-1로
response.write the_text
이 방법을 사용하면 ASP에서 서블릿이나 웹 서비스를 호출하는 것이 매우 쉽습니다!