요즘 ajax를 좀끄적이다 보니 괜찮은 자료가 있어서 올려놓는다..
좋은 자료인거같다.. 샘플구하기가 쉽지많은 않다..
//XMLHttpRequest 객체생성
var oXmlHTTP = getXmlHttp();
if (window.XMLHttpRequest)
{
oXmlHttp = new XMLHttpRequest();
}else{
oXmlHttp = new ActiveXObject("Microsoft.XMLHTTP");
}
oXmlHTTP.open("POST", "AJAX.asp", false); // 동기방식으로 연결
//리퀘스트 내용을 XML문자열로 만든다. ASP는 기본적으로 EUC-KR로 처리하기 때문에 따로 정의할필요는 없습니다.
//한글을 전송할때는 태그내용을 <![CDATA[ ]]>로 선언해야 합니다.
var strXML = "";
strXML = strXML + "<gwinaemi>";
strXML = strXML + "<strList><![CDATA[내용]]></strList>";
strXML = strXML + "</gwinaemi>";
//리퀘스트 전송
oXmlHTTP.send(strXML);
//받아온 XML문자열에서 에서 strList태그의 내용을 추출 viewText객체의 innerHTML 로 넣는다.
eId("viewText").innerHTML = oResXML.getElementsByTagName("strList").item(0).firstChild.nodeValue;
--------------------------------------------------------------------------------------------------------------
'''''AJAX.asp파일쪽의 처리
'''''받아온 XML문자열을 Request.BinaryRead로 읽어서
'''''microsoft.xmldom 파서로 읽어 Scripting.Dictionary객체로 반환
'''''필요한 리퀘스트 내용은 딕셔너리에서 호출한다.
Dim vntPostedData, lngCount
lngCount = Request.TotalBytes
vntPostedData = Request.BinaryRead(lngCount)
Dim oXMLDom
Set oXMLDom = Server.CreateObject("microsoft.xmldom")
oXMLDom.load(vntPostedData)
Dim oDicXMLRequest
set oDicXMLRequest = Server.CreateObject("Scripting.Dictionary")
If oXMLDom.parseError = 0 Then
Dim objNode
Set objNode = oXMLDom.documentElement
set oXMLDom = nothing
Dim i
For i = 0 To objNode.childNodes.length - 1
oDicXMLRequest.Add objNode.childNodes.Item(i).nodeName, objNode.childNodes.Item(i).Text
Next
set objNode = nothing
else
set oXMLDom = nothing
End if
Response.ContentType = "text/xml"
Response.Charset = "ks_c_5601-1987"
''''''''''''''''XML문서의 형태로 돌려보낸다. encoding을 ASP의 기본엔코딩인 ks_c_5601-1987로 지정한다.
Response.write "<?xml version=""1.0"" encoding=""ks_c_5601-1987""?>" & chr(13) & chr(10)
''''''''''''''''oDicXMLRequest에서 strList의 내용을 불러낸다.
Response.write "<gwinaemi><strList><![CDATA[" & oDicXMLRequest("strList") & "]]></strList></gwinaemi>"