Http协议访问DataSnap Rest 服务器
来源:互联网 发布:淘宝whoo旗舰店 假货 编辑:程序博客网 时间:2024/05/06 05:15
Http协议访问DataSnap Rest 服务器
用TIDHttp访问DataSnap Rest服务器,在服务器采用了用户验证的情况下,客户端需要注意下面的细节,否则不能正常连接。
假如服务器有如下的用户验证:
procedure TSC.DSAuthenticationManager1UserAuthenticate(Sender: TObject; const Protocol, Context, User, Password: string; var valid: Boolean; UserRoles: TStrings);var sCheckCode : string;begin valid := False; sCheckCode := CMBSrvIniSetting.SrvCnnCheckCode; if PassWord.Equals(sCheckCode) then begin valid := True; end;end;
那么在客户端连接的时候,必须把这个密码传递过去,否则会发生401错误。
procedure TForm15.Button2Click(Sender: TObject);var url, params, Text: string; code: Integer; http: TIDHttp;begin http:= TIDHttp.Create(nil); http.Request.BasicAuthentication := True; http.request.password := '密码'; params := Edit1.Text; url:= 'http://192.168.10.182:8081/datasnap/rest/TSM/EchoString/'; try text := http.Get(URL+TIdURI.ParamsEnCode(params)); Edit2.Text := Text; except on E: Exception do begin end; end;end;
这样客户端就可以正常访问服务器的方法了。
此外,如果客户端采用Post的方式访问服务器的话,服务器的方法在定义的时候需要在前面加上Update前缀:UpdateEchoString。
TIdURI类定义在IdURI.pas单元。
0 0
- Http协议访问DataSnap Rest 服务器
- Http协议访问DataSnap Rest 服务器 - 封三郎
- http访问服务器rest格式请求
- DataSnap的REST服务器ServerMethod参数编码问题
- Delphi XE程序设计系列 2-开发DataSnap/REST服务器
- Delphi XE程序设计系列 2-开发DataSnap/REST服务器
- Delphi XE程序设计系列 2-开发DataSnap/REST服务器
- Delphi XE程序设计系列 2-开发DataSnap/REST服务器
- Delphi XE程序设计系列 2-开发DataSnap/REST服务器
- Delphi XE程序设计系列 2-开发DataSnap/REST服务器 .
- Delphi XE程序设计系列 2-开发DataSnap/REST服务器
- Delphi XE程序设计系列 2-开发DataSnap/REST服务器
- DataSnap Rest 服务器网络分配器返回格式定义
- REST,http,服务器开发
- DataSnap REST Application
- c语言socket使用http协议访问apache服务器
- delphi xe datasnap rest 相關
- HTTP访问协议封装
- 《CLR via C#》读书笔记-.NET多线程(二)
- 黑盒测试、白盒测试、灰盒测试之间区别
- VMware Workstation8.0虚拟机安装Ubuntu14.04
- 随谈10年的技术生涯和技术成长
- Java String字符串类的equals方法如何避免NullPointerException
- Http协议访问DataSnap Rest 服务器
- Ubuntu64位安装WPS出现的问题
- RecyclerView和ListView的异同
- 多图片上传示例
- dup,dup2函数
- Out Of Bag (OOB 估计)
- measure(widthMeasureSpec, heightMeasureSpec)的使用技巧
- 数据结构(算法的时间复杂度和空间复杂度)
- 降序索引浅析