开发基于SQL SERVER 的C/S数据库应用系统

减小字体

增大字体作者：佚名来源：本站整理发布时间：2009-01-10 11:51:20

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连接的数据源。(下转第19页)

 需要设：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控件名。

③ 运行程序即可。

注意：如果需要使用模糊查询功能，那么RDO的方法和控件均不适用。

请选择DAO控件使用。

通过上述设置，我们可以用SQL Server和Visual Basic这两种功能强大的网络编程软件编制出各种满足需要的Client/Server数据库应用系统。

文章评论评论内容只代表网友观点，与本站立场无关！