在delphi6下
使用var
Response : TStringStream;
Request : TStrings;
FileStream : TStrings;
begin
FileStream := TStringList.Create();
Response := TStringStream.Create('');
Request := TStringlist.Create();
try
FileStream.LoadFromFile(Edit1.Text );
Request.Append(widestring('MSG_DATA=' + FileStream.Text ));
try
IdHTTP1.Post(Edit2.Text ,Request,Response);最后在jsp上收到'MSG_DATA='就为null
可用d7的IdHTTP就没问题
是否d6在Post上存在问题呢??
使用var
Response : TStringStream;
Request : TStrings;
FileStream : TStrings;
begin
FileStream := TStringList.Create();
Response := TStringStream.Create('');
Request := TStringlist.Create();
try
FileStream.LoadFromFile(Edit1.Text );
Request.Append(widestring('MSG_DATA=' + FileStream.Text ));
try
IdHTTP1.Post(Edit2.Text ,Request,Response);最后在jsp上收到'MSG_DATA='就为null
可用d7的IdHTTP就没问题
是否d6在Post上存在问题呢??
解决方案 »
- 如何对依码士喷码机9020进行打印控制啊?
- 使用FtpGetFile或idftp下载大文件后,没有反应怎么办
- 在一个richedit中设置了一个popumenu菜单,可是怎么运行后,每次右建都出现两次快捷菜单。
- paradox数据库中类型为D的日期字段怎么查询呢?
- 假如有2个QQ聊天窗口属于2个不同的QQ,怎么区别他们是属于哪个QQ呢??
- 求购leadtools控件正式版
- 请教一个RAVE中的计算字段怎么写?
- 客户端调用DCom为什么老提示“类没有注册”???
- 有一个问题挺棘手,关于多重查询的问题,谁能解决,100分献上.急.
- *都说L连接SQL SERVER ,ADO 比 BDE 好?到底好到那里?*
- database desktop数据表中使用了User这个关键字,插入数据时出错提示使用了关键字,SQL语句应该如何写?
- 怎么连接不了SQL?
procedure Post(URL: string; const Source: TStrings; const AResponseContent: TStream); overload;
procedure Post(URL: string; const Source: TStream; const AResponseContent: TStream); overload;
----------------------------------------------------------------------------------post的两种参数基本都一样,有一种用流,还有一种用TStrings 而你Response 创建的时候把它创建为空了 Response := TStringStream.Create(''); 仔细检查检查~~~~ D6的INDY没这样的BUG的
其实这个问题已解决了加上
IdHTTP1.Request.ContentType :='application/x-www-form-urlencoded' ;就行了
可是还有个问题,就是我FileStream.LoadFromFile的文件(xml)中如果存在%就会在服务器端
同样出现[jsp上收到'MSG_DATA='就为null]
请教了!!!
对%&需要进行16进制转义处理