求一简单客户机/服务器应用程序，有点急，先谢了，在线等待

Question

【描述如下】
现在我在单位一个局域网内，开发一个Delphi程序，数据库为SQL Server 2000，想做一个程序，让局域网内其他机器查询访问（仅查询，不需修改数据等）
设数据库名为school，其内有表student，字段如下：
学号xh char(4)
姓名xm varchar(20)
【客户端程序】
1、窗体上有个TEdit控件，输入服务器IP，然后按钮TButton，进行连接，如果连接服务器不成功，希望下方用个TLabel提示，连接不成功，同样成功后也提示。
2、放置另一TEdit控件，用于输入学号，和TEdit显示检索得到的学生姓名，当然中间一个命令按钮
就这样简单的一个应用程序
【服务器端程序】
能满足上述客户端应用程序要求就可以了，如果能显示连接的客户机IP就最理想了
【数据库连接】
放置在数据模块unit_main、定义dm_main，设有个adoconnection控件adoc_main，然后用数据集adot_main连接表student，数据源ds_main
【说明】
我用的Delphi 6，请使用标准VCL控件。
希望大家详细描述一下，最好能举个例子发送到我信箱[email protected]。数据库文件可以不发了，因为就那么简单
有点急，周一就要用，谢谢了，在线等待同时欢迎学习Delphi的朋友QQ加我5418147，我刚学不久哈

Answer 1

我晕了，自己写个吧，这么简单的你东西都放好了，我就顺便写点代码
【客户端程序】
1，这样，动态连接数据库 ，用ADOCONNECTION组建
 修改CONNECTSTRING内容，大概如下
Provider=SQLOLEDB.1;Persist Security Info=True;User ID=‘用户名’;Initial Catalog=school;Data Source=‘服务器地址IP’
 你只需要把edit的值传递近来就是了，
2，用ADOQUERY查询数据库
大概就是
  with adoquyer do
  begin
    close;
    sql.clear;
    sql.add('select * from student where xh='''+trim(Edit1.text)+'''');
    Open;
  end;

Answer 2

楼上的，首先谢谢了
不过Provider=SQLOLEDB.1;Persist Security Info=True;User ID=‘用户名’;Initial Catalog=school;Data Source=‘服务器地址IP’，这样就能连上目标机器的SQL Server啊，这样需要客户机有SQL Server不，（现在我的客户机没有SQL Server也没装Delphi哈），只需要安装我的客户机程序。
2、查询数据库我知道，我主要是想知道如何去编写个客户机/服务器程序，单机的功能我肯定会实现哈

Answer 3

客户机不用装sqlserver呀sqlserver可以远程访问呀
c/s不是你说的那样服务器上只放数据库，没有服务器程序，
客户通过远程来查询数据库而已

Answer 4

Provider=SQLOLEDB.1;Persist Security Info=True;User ID=‘用户名’;Initial Catalog=school;Data Source=‘服务器地址IP’
你放上TADOQUERY 控件上去就知道了，看看属性　一下子就可连上，如果是WIN９８，
９８要装ADO的包,2K没问题

Answer 5

98下需要装ADO的包，什么意思？装什么包
另外，最好能谈一下ClientdataSet 和Provider的使用，谢谢，大家最好说一下分别开发成服务器端程序和客户端程序做法

Answer 6

哪个回答一下啊，这样直接连对方的\sql 通信量太大，很慢啊

Answer 7

别管那么多了，SQL既然允许客户端连接就说明可以处理大量的通信数据。
你呀就现在一个安装SQLSERVER的机器上写最简单的程序，只要把SQLSERVER连接上即可。

Answer 8

但是这样也不方便控制客户端的访问啊，还是有个服务器程序比较好，也好唬Boss