lingdanglfw(DAX)

导航

< 2025年3月 >
23 24 25 26 27 28 1
2 3 4 5 6 7 8
9 10 11 12 13 14 15
16 17 18 19 20 21 22
23 24 25 26 27 28 29
30 31 1 2 3 4 5

统计

AX2012 call Webservice directly

Static void CallWebService(str sURL, RecId PORecId )
{
    System.Net.HttpWebRequest httpRequest = null;
    System.Net.HttpWebResponse httpResponse = null;
    System.Net.CookieCollection cookies = null;
    CLRObject clro = null;
    System.Text.Encoding utf8 = null;
    System.Net.WebHeaderCollection headers;
    System.IO.Stream stream = null;
    System.IO.StreamReader streamReader = null;
    System.Byte[] byteArray = null;
    System.IO.Stream dataStream;
    str jsonData,data;
    int num;

    ;




    new InteropPermission(InteropKind::ClrInterop).assert();

    jsonData = strFmt('{"RecId":"%1"}', PORecId);

    headers = new System.Net.WebHeaderCollection();

    clro = System.Net.WebRequest::Create(sURL);
    httpRequest = clro;
    httpRequest.set_Method('Post');
    httpRequest.set_Timeout(90000);
    httpRequest.set_Headers(headers);
    httpRequest.set_ContentType("application/json");

    utf8 = System.Text.Encoding::get_UTF8();
    byteArray = utf8.GetBytes(jsonData);
    httpRequest.set_ContentLength(byteArray.get_Length());
    stream = httpRequest.GetRequestStream();
    stream.Write(byteArray,0,byteArray.get_Length());
    stream.Close ();


    httpResponse = httpRequest.GetResponse();

 

}

posted on   lingdanglfw  阅读(18)  评论(0编辑  收藏  举报

相关博文:
阅读排行:
· DeepSeek 开源周回顾「GitHub 热点速览」
· 物流快递公司核心技术能力-地址解析分单基础技术分享
· .NET 10首个预览版发布:重大改进与新特性概览!
· AI与.NET技术实操系列(二):开始使用ML.NET
· 单线程的Redis速度为什么快?
点击右上角即可分享
微信分享提示