基于SQL Server的C/S数据库应用系统

ZDNet软件频道　时间：2009-04-10　作者：ahcit.com 吴俊峰 | 天新网　我要评论()
本文关键词：Mssql SQL SQL Server 数据库 SQL Server

SQL Server 6.5作为面向中小型企业的网络数据库服务系统,提供了与众多高级数据库管理器相同的运行性能,向传统的数据库厂商发起了强有力的挑战。

Dim sSQL As String

Data1.Connect=″ODBC;DSN=pms;uid=test;pwd=355″

sSQL=″select*from 工资情况″

Data1.RecordSource=sSQL

Data.Refresh

④ 运行程序即可。

(2) 用RDO方法打开远程数据库

① 在本地ODBC的UserDSN中设置与SQL Server连接的数据源。
需要设：Data Source Name:数据源名,Descrption:描述,Server:SQL Server服务器名,D atabase Name:数据库名。(这种设置可在单机状态下设)
② 在程序中添加：

Option Explicit

Private mrdoenv As rdoEnvironment

Private mrdoconn As rdoConnection

Private mrdors As rdoResultset

Private Sub Command1Click()

Dim sSQL As String

Set mrdoenv=rdoEnvironments(0)

Set mrdoconn=mrdoenv.OpenConnection(″pms″,
rdDriverNoPrompt,False,″ODBC;UID=te st;PWD=355″)

sSQL=″select*from 工资情况″

Set mrdors=mrdoconn.OpenResultset
sSQL,rdOpenKeyset,rdConcurRowVer,0)

以后对mrdors对象进行操作即可。(如：可用Text控件与其相连,但不可用DBGrid。)。

(3) 用DAO控件打开远程数据库

① 在本地ODBC的UserDSN中设置与SQL Server连接的数据源。
       需要设：Data Source Name:数据源名,Description:描述,Server:SQL Server服务器名, Database Name:数据库名。(这种设置可在单机状态下设)
    ② 添加DAO控件和DBGrid控件。
    DAO控件：在DataSourcename中添入相应的ODBC的DSN,如“pms”；
    DBGrid:在Datasource中选择相应的DAO控件名。
    ③ 在程序中添加：

Data1.Connect=″UID=test;PWD=355″

sSQL=″select*from 工资情况 where 姓名 like′*′″

Data1.RecordSource=sSQL

Data1.Refresh

④ 运行程序即可。

(4) 用RDO控件打开远程数据库
    ① 在本地ODBC的UserDSN中设置与SQL Server连接的数据源。
    需要设：Data Source Name:数据源名,Description:描述,Server:SQL Server服务器名, Database Name:数据库名。(这种设置可在单机状态下设)
    ② 添加RDO控件和DBGrid控件：
    RDO控件：在DataSourcename中添入相应的ODBC的DSN；在SQL中添入SQL查询语句；在Passwo rd中添入访问此数据库的密码；在Username中添入访问此数据库的用户名。
    DBGrid:在Datasource中选择相应的RDO控件名。
    ③ 运行程序即可。