Idhttp Post 服务器接收不到数据，求原因

2013-04-19 09:50:55 241 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

delphi XE10.4 idhttp post Json中文乱码的处理 delphi XE10.4 idhttp使用TIdMultiPartFormDataStream实现post中文处理阅读详情

小弟往服务器post 编码过的数据，结果服务器接收不到，不知道post的格式哪里不对了，求指点，代码如下
编码函数如下

AnsiString __fastcall URLEncodeT(AnsiString& inStr)

{

        char hex[] = "0123456789ABCDEF";

        AnsiString dst;

       AnsiString src = inStr;

        for (int i = 1; i <= src.Length(); ++i)

    {

    //ShowMessage(IntToStr(i));

    char cc = src[i];

    if(cc == ' ')

    {

     dst += '+';

    }else if(cc >= 'A' && cc <= 'Z'){

     dst += cc;

    }else if(cc >= 'a' && cc <= 'z'){

     dst += cc;

    }else if(cc >= '0' && cc <= '9'){

     dst += cc;

    }else if(cc == '-' || cc == '.' || cc == '!'|| cc == '_' || cc == '~' || cc == '*' || cc == '\'' || cc == '(' || cc == ')' ){

     dst += cc;

    }else{

      char c = static_cast<unsigned char>(src[i]);

           dst += '%';

           dst += hex[c / 16];

           dst += hex[c % 16];

    }

    }

    return dst; 

}

正文如下



Url = "http://172.21.4.138:8080/UnionUpdate/UnionUpdateService";



ClientVersion = "KABW900+_CH.2.02.002";

request = "<?xml version=\"1.0\" encoding=\"utf-8\"?><Request><RequestType>mobileVersion</RequestType><MobileVersionParams><OpType>verifyRom</OpType><ClientVersion>"+ClientVersion+"</ClientVersion><RomSize>12345678</RomSize><UserName></UserName><SystemOuterVersion></SystemOuterVersion><FileType>img</FileType><CustomizationType>cmcc</CustomizationType><Paramater1></Paramater1><Paramater2></Paramater2><Paramater3></Paramater3></MobileVersionParams><OtherParams></OtherParams></Request>";



AnsiString sa = URLEncodeT(request);



TStringList *params = new TStringList();

AnsiString param = "param";

params->Add((param+"="+sa));

TStringStream *returnString=new TStringStream("");

try

{

IdHTTP1->Post(Url,params,returnString);

}

catch(...)

{

        ShowMessage("服务器连接错误，无法检测升级包的合法性!");

}

delete params;

delete returnString;

...全文

Pywinauto与Inspect.exe完美搭配：解决Windows应用UI自动化中的元素定位难题本文详细介绍了如何将Pywinauto与Inspect.exe结合，以解决Windows应用UI自动化中的核心难题——元素定位。通过实战指南，阐述了如何利用Inspect.exe在UIA模式下精准侦察控件属性，并将这些信息转化为Pywinauto的稳健定位策略，从而高效自动化WPF、WinForms等现代框架构建的复杂桌面应用。阅读详情

春华-秋实

VCL组件使用和开发 604 成员 13,456 内容

+ 关注 + 加入社区

Idhttp Post 服务器接收不到数据，求原因

相关推荐