<!--CodeS-->
FXmlHttp := TXMLHTTP.Create( dmCommon );
try
sSendXml := 'id=' + msgCommon.urlEncode( LoginUserID )
+ '&pw=' + msgCommon.urlEncode( LoginUserPW );
reqXmlHttp := FXmlHttp.DefaultInterface;
reqXmlHttp.open( 'POST', m_ServletUrl, False, '', '' );
reqXmlHttp.setRequestHeader( 'Content-Type', 'application/x-www-form-urlencoded' );
try
reqXmlHttp.send( sSendXml );
sResponseXml := reqXmlHttp.responseText;
except
on EOleException do sResponseXml := '';
end;
finally
if FXmlHttp <> nil then
FXmlHttp.Free;
XDom := CoDomdocument.Create;
XDom.loadXML(sResponseXml);
msgCommon.WriteLog(sResponseXml);
XList := XDom.documentElement.selectNodes('//GroupList/Group');
for i := 0 to XList.Length - 1 do begin
groupList[0].Add(XList.item[i].text);
groupList[1].Add(XList.item[i].attributes.item[0].text);
end;
end;
<?xml version="1.0" encoding="euc-kr" ?>
<GroupList>
<Group code="4">대량그룹</Group>
<Group code="1">수정된 그룹</Group>
<Group code="3">친구</Group>
<Group code="2">한글그룹</Group>
</GroupList>
<!--CodeE-->
XML에 한글이 들어가 있는데 이걸 불러오질 못하고 있어요.
setRequestHeader 값을 어떻게 해야 할것 같은데 뭘 해줘야 할지 모르겠어요.
누가 방법좀 알려주시면 정말 감사하겠습니다.