搜索
第10章系统开发——VB+Oracle9i第10章系统开发——VB+Oracle9i本章介绍如何利用中文版VisualBasic6.0（简称VB）为前端开发工具，后台数据库为Oracle9i进行应用系统的开发。10.1如何构建开发和运行的环境10.1.1如何选择前台开发工具10.1.2如何构建开发和运行环境一个VB+Oracle9i的数据库应用从逻辑上看有3个组成部分。如图10.1所示。ODBC数据源Oracle9i客户机数据库应用程序网络数据库服务器客户机图10.1VB数据库应用的结构1.构建开发和运行客户机在开发客户机上要进行以下工作。（1）安装VB。（2）安装Oralce9i客户机，最好是管理员，这样可以及时管理后台数据库服务器上的数据。（3）测试Oracle9i的客户机是否能够正常连通数据库服务器。在运行客户机上要进行如下工作。（1）安装用VB开发好的应用程序。（2）安装Oralce9i客户机，最好是连接，这样终端用户不能直接操作数据库。（3）测试Oracle9i的客户机是否能够正常连通数据库服务器。–237–Oracle9i中文版基础培训教程赵松涛制作版权所有2.保证网络畅通确保网络TCP/IP协议能够畅通。3.构建数据库服务器2.1节已经详细做了介绍。10.1.3环境构建实例1.检查数据库服务器工作情况2.安装Oracle9i客户机图10.2所示为Oracle9i客户机安装步骤中的【安装类型】界面。图10.2【安装类型】界面3.安装VB前端应用程序＋Oracle9i客户机运行时运行客户机Oracle9i数据库：myoracle.mynet运行客户机数据库服务器IP地址：192.168.100.89开发机IP地址：192.168.100.5VB＋Oracle9i客户机管理员图10.3VB＋Oracle9i数据库应用开发环境–238–第10章系统开发——VB+Oracle9i10.2VB程序如何连接数据库ODBC数据源Oracle9i客户机应用程序图10.4运行客户机的结构10.2.1ODBC数据源1.什么是ODBCODBC（OpenDatabaseConnectivity，开放式数据库互联），是目前国际上通用的数据库访问标准。2.什么是ODBC数据源【ODBC数据源】就是计算机上的ODBC配置和管理的工具，利用这个工具，用户就可以定制使用ODBC来连接数据库。10.2.2Oracle9i客户机10.2.3VB程序连接数据库的过程分析Oracle9i客户机ODBC数据源应用程序图10.5VB程序连接数据库的过程DSN=graduateDBUID=tempuserPWD=tempuser–239–graduateDB的配置：服务器：myoraclelink本地网络服务名myoraclelink的配置：IP地址：192.168.100.89端口：1521全局数据库名：myoracle.mynetOracle9i中文版基础培训教程赵松涛制作版权所有1.VB程序指定DSN名称2.【ODBC数据源】解析DSN名称3.Oracle9i客户机解析数据库服务器名称4.数据库服务器验证DSN中的用户名和密码10.2.4如何建立ODBC数据源（1）如图10.6所示的ODBC数据源管理器的【用户DSN】选项卡。（2）切换到如图10.7所示的ODBC数据源管理器的【系统DSN】选项卡。图10.6【用户DSN】选项卡图10.7【系统DSN】选项卡（3）出现如图10.8所示的【创建新数据源】界面。图10.8【创建新数据源】界面（4）出现如图10.9所示的【MicrosoftODBCforOracleSetup】界面。–240–第10章系统开发——VB+Oracle9i图10.9【MicrosoftODBCforOracleSetup】界面（5）成功建立系统DSN名称后的【系统DSN】选项卡如图10.10所示。图10.10成功建立的ODBC数据源10.3VB程序如何访问数据库10.3.1通过【Data】控件访问数据库（1）启动VB。（2）出现如图10.12所示的新建工程的【新建】选项卡。图10.11scott.dept数据表的数据图10.12新建工程的【新建】选项卡–241–Oracle9i中文版基础培训教程赵松涛制作版权所有（3）出现如图10.13所示的VB主界面。②自动出现【Data】控件①双击该图标图10.13VB主界面（4）如图10.14所示。图10.14选择查看data1控件的属性窗口（5）出现如图10.15所示的【属性窗口】界面。④关闭窗口①切换选项卡②输入代码③选择记录源图10.15【Data】控件的【属性窗口】界面–242–第10章系统开发——VB+Oracle9i―――――――――――――――――――――――――――――――――――――odbc;dsn=graduateDB;uid=scott;pwd=tiger;―――――――――――――――――――――――――――――――――――――（6）如图10.16所示。图10.16向窗体中添加文本框控件（7）选择【Form1】窗体上出现名为Text1的【TextBox】控件。（8）出现如图10.17所示的【TextBox】控件的属性窗口。（9）按照和Text1同样的步骤添加名为Text2的【TextBox】控件，其主要的设置为。（10）按照和Text2同样的步骤添加名为Text3的【TextBox】控件，其主要的设置为。（11）设计好的窗体Form1如图10.18所示。②设置数据字段①设置数据源图10.17【TextBox】控件的【属性窗口】界面图10.18设计好的Form1窗体（12）在VB主界面的【快捷按钮区】单击运行快捷按钮，如图10.19所示。图10.19选择运行Form1窗体–243–Oracle9i中文版基础培训教程赵松涛制作版权所有（13）运行结果如图10.20所示。图10.20Form1的运行结果（14）读者可以从本书的配套光盘上找到实例的配套程序。【参见光盘文件】：第10章\使用Data控件访问数据库.vbp，窗体为Form1.frm。（15）利用表格来表示上述过程中窗体的设置，如表10.1所示。表10.1Form1窗体的设计控件名称类型主要属性属性值Form1【窗体】名称Form1CaptionData1Conneectodbc;dsn=graduateDB;uid=scott;pwd=tiger;Data1【Data】RecordSourceScott.deptDataSourceData1DataFieldDEPTNOText1【TextBox】名称Text1DataSourceData1DataFieldDNAMEText2【TextBox】名称Text2DataSourceData1DataFieldLOCText3【TextBox】名称Text310.3.2通过【ADODC】控件访问数据库（1）启动VB，建立新的工程。（2）如图10.21所示的VB主界面的【菜单栏】选择【工程】/【部件】选项。–244–第10章系统开发——VB+Oracle9i图10.21选择加载【ADODC】控件（3）出现如图10.22所示的部件的【控件】选项卡。（4）如图10.23所示。②自动出现【ADODC】控件①双击该图标图10.22部件的【控件】选项卡图10.23向窗体中添加【ADODC】控件（5）如图10.24所示。（6）出现如图10.25所示的属性页的【通用】选项卡。图10.24选择查看adodc1的属性窗口图10.25属性页的【通用】选项卡（7）切换到如图10.26所示的属性页的【身份验证】选项卡。（8）切换到如图10.27所示的属性页的【记录源】选项卡。–245–Oracle9i中文版基础培训教程赵松涛制作版权所有图10.26属性页的【身份验证】选项卡图10.27属性页的【记录源】选项卡（9）主要的属性设置如图10.28所示。②设置数据字段①设置数据源图10.28【TextBox】控件的【属性窗口】界面（10）向Form1窗体中添加一个名为Text2的【TextBox】控件。（11）向Form1窗体中添加一个名为Text3的【TextBox】控件。（12）读者可以从本书的配套光盘上找到实例的配套程序。【参见光盘文件】：第10章\使用ADODC控件访问数据库.vbp，窗体为Form2.frm。（13）利用表格来表示上述过程中窗体的设置，如表10.2所示。表10.2Form2窗体的设计控件名称类型主要属性属性值名称Form2Form2【窗体】CaptionForm2【通用】选项卡使用ODBC数据源graduateDBAdodc1【ADODC】【身份验证】选项卡【用户名】scott，【口令】tiger–246–第10章系统开发——VB+Oracle9i【记录源】选项卡【命令类型】2-adCmdTable，【表名】deptDataSourceAdodc1DataFieldDEPTNOText1【TextBox】名称Text1DataSourceAdodc1DataFieldDNAMEText2【TextBox】名称Text2DataSourceAdodc1DataFieldLOCText3【TextBox】名称Text3（14）程序运行结果如图10.29所示。图10.29Form2窗体的运行结果10.3.3通过【ADODB】编程对象访问数据库1.引用【ADODB】对象要使用【ADODB】对象，必须首先进行引用。（1）启动VB，新建工程。（2）如图10.30所示。（3）出现如图10.31所示的【引用】界面。–247–Oracle9i中文版基础培训教程赵松涛制作版权所有图10.30选择引用【ADODB】对象图10.31【引用】界面2.使用【ADODB】对象编程（1）设计如图10.32所示的窗体Form3。图10.32Form3窗口的设计利用表格来表示上述过程中窗体的设置，如表10.3所示。表10.3Form3窗体的设计控件名称类型主要属性属性值名称Form3Form3【窗体】Caption使用ADODB访问数据库Text1【TextBox】名称Text1Text2【TextBox】名称Text2Text3【TextBox】名称Text3名称CmdFirstCmdFirst【CommandButton】Caption首记录名称CmdPreviousCmdPrevious【CommandButton】Caption上记录CmdNext【CommandButton】名称CmdNext–248–第10章系统开发——VB+Oracle9iCaption下记录名称CmdLastCmdLast【CommandButton】Caption末记录名称CmdExitCmdExit【CommandButton】Caption退出（2）读者可以从本书的配套光盘上找到实例的配套程序。【参见光盘文件】：第10章\使用ADODB对象编程访问数据库.vbp，窗体为Form3.frm。（3）窗体Form3内所有的VB代码如下。―――――――――――――――――――――――――――――――――――――‘强制性声明变量后才能使用OptionExplicit‘定义RS为ADODB对象的记录集DimRsAsNewADODB.Recordset‘定义conn为ADODB对象的连接PrivateconnAsADODB.Connection‘窗体运行时初始化过程PrivateSubForm_Load()‘定义ConnStr为连接字符串DimConnStrAsString‘定义Cmd为ADODB的命令字符串DimCmdAsNewADODB.CommandSetconn=NewADODB.ConnectionConnStr=DSN=graduateDB;uid=scott;pwd=tiger;conn.ConnectionString=ConnStr‘按照ConnStr的内容连接数据库conn.