c/s最简单的问题,250分相送!求详细步骤(250分)

一成

Unregistered / Unconfirmed
GUEST, unregistred user!
小弟最近在学习c/s程序的编写,无赖手头这方面的书太少,哪位朋友能给出详细的服务端、
客户端程序的编写方法

要求:能从客户端连接到服务端数据库,并向其中动态加入数据,仅此而已。
  只是小弟c/s还没有入门,希望详细点:)
 
客户端可以通过ODBC访问服务器的数据,这种结构不难。
 
在delphi安装目录下有个Demo目录,里面的示例很全很多
 
这个其实和单机程序差不多。
1、服务器端主要用来方数据的一般的可用sql server7/2k
当然可以在这写一些存储过程,触发器等等让客户端调用
2 客户端一般就是用户界面和业务规则了,这个和写单机版程序差不多的
放入database datasource table dbgrid dbtext
用ado或bde连接后端数据库(建议用ado)
设置database的数据库为你的数据库(当然最好用别名)active:=true//这一步是关键
设置table 数据库为database active:=true 从中选一个表 datasource 连到table
dbgrid dbtext 连datasource
ok,现在可以了已经可以连到后端了。其他操作和单机的差不多。当然
有一点细节上的操作有区别。自己看看delphi的例程把
.
 
1.你先找找使用ado或者bbe连接数据库服务器的贴子;
2.再就是学习一下sql语句;
3,看看delphi自带的示例就知道怎样使用adoquery中的SQL语句来查询或删除或添加
记录到数据库中了.
//另外,delphi.mychangshu.com,www.playicq.com都有些示例可以下载看看.
有什么细节的问题再问问.
 
单机的程序我会,c/s的连接不会,我只求连接的方法
 
只求连接方法,你是用ado还是bde连接的,
你用ado+连接在全文检索里面找,有不少呢.
 
1.程序中可以内建一个连接,用来操作数据库。如下:(ADO)
function DB_Connect: Boolean;
begin
try
if adcEasy.Connected then //adcEasy为TADOConnection组件,以此作为程序所用连接
adcEasy.Close;
with adcEasy do
begin
Provider := 'SQLOLEDB'; //数据库:SQL Server
Properties['Data Source'].Value := '127.0.0.1'; //服务器地址
Properties['User ID'].Value := 'sa'; //数据库用户名
Properties['Password'].Value := '123456'; //密码
Properties['Initial Catalog'].Value := 'MyDB'; //数据库名
Open;
end;
Result := True;
except
Result := False;
end;
end;

2.数据库中建一个用户表,有用户代码和用户密码字段,用第一步建立的连接来
判断用户的输入是否合法。

3.将第一步的数据库用户名和密码加密存在客户端,可以提供用户修改的权力。
 
1. add new application
2. add Remote datamodule to the application
3. add TADOConnection, TADOQuery, TDataSetProvider to the datamodule
4. connecte the TADOConnection to the database

now the server is ok

 
谢谢大家的回复
我没说清楚,重新说一下:

我是想问:服务器端要用到哪些组件,怎么设置?客户端要用到哪些组件,怎么设置?
    还有:服务端的程序和客户端的程序放在什么样的环境下能正常运行,是不是服务
  端程序一定要放在主机上?
我参照教程做了个c/s结构的,在同一台机器上运行,启动客
 户端程序的时候服务端也自动跟着启动了,但放在不同的机子上就不行,这是为什么?
 
C/S的程序是不用编写服务端的啦....你照教程做的应该是三层结构了吧....
那应该是属于MIDAS的分发问题了...请查询离线数据....
拷贝MIDAS.DLL,用户权限问题,,等等....
 
楼上的大哥,能细说一下吗
 
1.程序中可以内建一个连接,用来操作数据库。如下:(ADO)
function DB_Connect: Boolean;
begin
try
if adcEasy.Connected then //adcEasy为TADOConnection组件,以此作为程序所用连接
adcEasy.Close;
with adcEasy do
begin
Provider := 'SQLOLEDB'; //数据库:SQL Server
Properties['Data Source'].Value := '127.0.0.1'; //服务器地址
Properties['User ID'].Value := 'sa'; //数据库用户名
Properties['Password'].Value := '123456'; //密码
Properties['Initial Catalog'].Value := 'MyDB'; //数据库名
Open;
end;
Result := True;
except
Result := False;
end;
end;
 
用ADO连结(建议用此)用TADOConnection组件的adcEasy可以完成,
正如楼上的兄弟所说的:
Provider := 'SQLOLEDB'; //数据库:SQL Server
Properties['Data Source'].Value := '127.0.0.1'; //服务器地址
Properties['User ID'].Value := 'sa'; //数据库用户名
Properties['Password'].Value := '123456'; //密码
Properties['Initial Catalog'].Value := 'MyDB'; //数据库名
 
1. add new application
2. add Remote datamodule to the application
3. add TADOConnection, TADOQuery, TDataSetProvider to the datamodule
4. connecte the TADOConnection to the database

 
这种问题到处都有,随便找本书看就有
delphid的Demo目录有很多例子,很简单
 
多人接受答案了。
 
顶部