在线时间:8:00-16:00
迪恩网络APP
随时随地掌握行业动态
扫描二维码
关注迪恩网络微信公众号
function Tverpipxinfo.postXml(const xmlstr, url: WideString): WideString;
var idHttp:TIdHTTP; sends:tstrings; IdEncoderMIME1:TIdEncoderMIME; begin result:=''; try idHttp:= TIdHTTP.Create(nil); idHttp.Request.ContentType := 'application/x-www-form-urlencoded'; IdEncoderMIME1:=TIdEncoderMIME.Create(nil); sends:=tstringlist.Create; sends.Add('xmlstr='+IdEncoderMIME1.Encode(xmlstr)); result:=idhttp.Post(url,sends); except on E:Exception do begin result:=e.Message; end; end; idHttp.Free; IdEncoderMIME1.Free; sends.Free; end;
<%@ Language=VBScript %>
<%'On Error Resume Next xmlstr=Request.form("xmlstr") set xmlobj=server.CreateObject("microsoft.xmldom") xmlobj.loadXML xmlstr Response.ContentType="text/xml"%> <?xml version="1.0" encoding="big5"?> <% Response.Write xmlobj.xml set xmlobj=nothing %>
private void Page_Load(object sender, System.EventArgs e)
} |
2023-10-27
2022-08-15
2022-08-17
2022-09-23
2022-08-13
请发表评论