开发基于SQL SERVER 的C/S数据库应用系统
(5) 在Index Attribute (索引属性)窗框内,选择Clustered (群集)复选框。
(6) 在Clustered旁边的两个单选钮中,Allow duplicate rows 表示允许重复行。
(7) 按Build按钮,开始创建索引。
6. 在SQL Server中为数据库开用户
(1) 启动Microsoft SQL Server 6.5 EM ,选择适当的服务器。
(2) 选择login目录,单击右键,选择 New Login...,弹出 Manage Logins窗口。
(3) 在Login Name中输入用户名;在Password中输入用户密码;在数据库框中,选择用户所 要访问的数据库。
(4) 单击“ADD”按钮。重复一次密码。
7. 在SQL Server中为数据库用户设置访问权限
(1) 对于新开的数据库一定要为访问它的用户提供权限,否则这个数据库是不能被访问的。
(2) 启动Microsoft SQL Server 6.5 EM ,选择适当的服务器以及数据库。
(3) 从Object菜单中选择Object Permission菜单项,再在弹出的对话框中列出了单击By Us er标签。
(4) 要想授予一个用户或用户组特定的权限,只要从User/Group下拉式列表中选定用户或用 户组,并单击相应权限的单元格。
(5) 最后单击“Set”按钮,保存设置。
另外,SQL Server 6.5也为系统管理员提供了功能强大的备份和恢复数据库功能。
但是,想从网络客户机访问SQL Server只设服务器方还不行。利用Visual Basic 对SQL Ser ver进行编程还需要对客户端的ODBC进行设置。
ODBC(开放数据库连接)是Microsoft为应用程序开发人员提供的一种策略。它采用 单一的API来辐射各种不同的数据库引擎、关系和非关系的DBMS(数据库管理系统)。它使 数据库开发人员在开发数据库应用系统的时候,可以使用熟悉的ODBC SQL语法,而不用考虑 数据源是什么。
8. 以下是客户端ODBC的设置和调试方法
(1) 对于USER DSN的设置
① 在系统的“开始”菜单上选择“设置”,单击其中的“控制面板”,弹出控制面板框。
② 双击“32bit ODBC”图标,弹出“ODBC data source administrator”窗口,选择“USE R DSN”页,单击“Add...”按钮。
③ 在“Create New Data Source”窗口中选择“SQL SERVER”后,单击“完成”按钮,弹 出“ODBC SQL SERVER Setup”窗口。
④ 在 Data Source Name 中输入数据源名,如“pms”;在 Description 中输入描述信息 (可选);在 Server 中输入SQL SERVER 服务器名,如“hfserver”;单击Option 按钮, 在 Database Name 中输入SQL SERVER 数据库名,如“PMS98”,单击“OK”按钮。
⑤ 单击“确定”按钮。
(2) 对于File DSN的调试
① 在系统的“开始”菜单上选择“设置”,单击其中的“控制面板”,弹出控制面板框。
② 双击“32bit ODBC”图标,弹出“ODBC data source administrator”窗口,选择“Fil e DSN”页,单击“Add...”按钮。
③ 在“Create New Data Source”窗口中选择“SQL SERVER”后,单击“下一步”按钮, 在弹出的输入框中输入数据源名,如“pms”, 单击“下一步”按钮,在弹出的信息框中单 击“完成”按钮。
④ 在弹出的SQL Server Login对话框中:在“Server”栏中输入SQL Server服务器名;在 “Login ID”栏和“Password”栏中输入登陆SQL Server时用的用户名和用户口令;然后单 击“Options》”按钮,在Options框中的Database栏中选择所想登陆的SQL Server数据库名 。然后单击“OK”按钮。
Visual Basic 5.0 是Microsoft推出的一个功能强大的可视化编程工具。它凭借与ODBC良好 的接口和提供给用户极其完善的网络数据库访问控件,赢得国内外众多编程爱好者的青睐。 有了Visual Basic我们可以利用它的ODBC接口在几分钟内编制一个基于SQL Server的客户机 /服务器数据库应用软件。
9. 以下采用编程常用的DAO和RDO两种方法,为大家介绍 一下怎样使用Visual Basic 5.0访问远程SQL Server数据库
(1) 用DAO方法打开远程数据库
① 在本地ODBC的FileDSN中设置与SQL SERVER连接的数据源。
需要设:Data Source Name:数据源名,Server:SQL服务器名,Login ID:用户名,Password :用户口令,Database Name:数据库名。(这种设置不可在单机状态下设)
② 添加data控件,以及一个DBGrid控件
③ 在程序中添加如下代码:假定数据源名为pms;用户名为:test;用户口令为:355;SQL Server数据表为:工资情况。
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