Delphi中使用IXMLHTTPRequest如何用POST方式提交带参

Delphi中使用IXMLHTTPRequest如何用POST方式提交带参



说明:服务器端为JAVA,编码UTF-8,返回数据编码UTF-8;数据交换格式JSON。

procedure TloginForm.loginBtnClick(Sender: TObject);
var
  jo: ISuperObject; //JSON接口
  req: IXMLHTTPRequest;
  url: WideString; //要访问的url

  params : string; //要提交的数据
begin
  //要访问的url
  url := 'http://localhost/wuliu/servlet/Login';

  {req := CoXMLHTTP.Create; //Delphi2010用此名称}
  //实例化IXMLHTTPRequest
  req := CoXMLHTTPRequest.Create;
  //调用open方法
  req.open('Post', url, False, EmptyParam, EmptyParam);
  //设置post必要参数
  req.setRequestHeader('Content-Type', 'application/x-www-form-urlencoded');
  //req.SetRequestHeader('Content-Length', intToStr(length(sParams)));
  //提交数据
  params := 'account=大家好&password=好了';
  //发送请求
  req.send(params);
  showMessage(req.responseText);
  //jo := SO(req.responseText);
end;

以上为本人已经实现的方法,已经可以正确提交需要的参数到服务器端。这里注意req.setRequestHeader('Content-Type', 'application/x-www-form-urlencoded'); 这个参数是POST参数数据必须有的。params := 'account=大家好&password=好了';是要提交的参数数据,类型为String。这些准备好了,用req.send(params);提交数据到服务器端;得到的数据就是req.responseText);




上一篇: Delphi Class of 类引用
下一篇: Delphi获取系统服务描述信息
文章来自: 本站原创
引用通告: 查看所有引用 | 我要引用此文章
Tags: Delphi IXMLHTTPRequest POST 参数
相关日志:
评论: 0 | 引用: 0 | 查看次数: -
发表评论
昵 称:
密 码: 游客发言不需要密码.
邮 箱: 邮件地址支持Gravatar头像,邮箱地址不会公开.
网 址: 输入网址便于回访.
内 容:
验证码:
选 项:
虽然发表评论不用注册,但是为了保护您的发言权,建议您注册帐号.
字数限制 1000 字 | UBB代码 开启 | [img]标签 关闭