在Delphi 6.0中如何使用TServerSocket及TClientSocket实现远程监控及数据交互?请大侠出招!在线等待.....
在Delphi 6.0中使用TServerSocket及TClientSocket实现一个远程监控,大概设计如下:该程序分为服务器端(使用TServerSocket控件)和客户端(使TClientSocket控件),服务器端由数据库(如:Oracle),该数据库内储供客户端查询的数据及客户端用户的认证信息,客户端无任数据库支持(也不可直接访问服务器数据库),其处理流程如下:
流程1:客户端登记请求----->服务器端验证及返回----->客户端
流程2:客户端查询请求----->服务器端按要求查询并返回数据记录----->客户端
我在该程序定义了请求信息如下:
1、客户端请求信息
cltReqInfo = packed record // 客户端请求信息
strUserNo: string; // 用户id
// strUserName: string;
strUserPsw: String; // 用户密码
strReqType:string; // 请求类型:0:请求身份验证;
strClientIP:string; // 用户IP
end;
2、服务器端响应信息
srvResInfo = packed record // 服务器端响应信息
strResContent: string; // 响应内容
strResType:string; // 响应类型:0:请求身份验证;
end;
问题1、如何以最简单的方式将"客户端请求信息"提交给服务器端?
2、服务器端如何接收"客户端请求信息"信息?
3、服务器端如何以简单将查询到的数据库记录批量返回给客户端?
客户端怎样接收?
在线等待,请大侠们出招,希望有程序指导,谢谢!