设置对VisualBasic数据库连接的动态路径

2016-02-19 18:55 9 1 收藏

下面图老师小编要跟大家分享设置对VisualBasic数据库连接的动态路径，简单的过程中其实暗藏玄机，还是要细心学习，喜欢还请记得收藏哦！

【 tulaoshi.com - 编程语言】

我个人因为经常作一些数据库方面的程序，对于程序间如何与数据库进行接口的问题之烦是深有体会，因为VB在数据库链接的时候，一般是静态，即数据库存放的路径是固定的，如用VB的DATA，adodc,DataEnvironment等到作数据库链接时，如果存放数据库的路径被改变的话，就会找不到路经，真是一个特别烦的事。
　　笔者的解决方法是利用app.path来解决这个问题。

一、用data控件进行数据库链接，可以这样：
　　在form_load()过程中放入：
　　privateform_load()
　　DimstrAsString'定义
　　str=App.Path
　　IfRight(str,1)""Then
　　str=str ""
　　EndIf
　　data1.databasename=str&"数据库名"
　　data1.recordsource="数据表名"
　　data1.refresh
　　subend
　　这几句话的意为，打开当前程序运行的目录下的数据库。
　　你只要保证你的数据库在你程序所在的目录之下就行了。

二、利用adodc（ADODataControl)进行数据库链接：
　　privateform_load()
　　DimstrAsString'定义
　　str=App.Path
　　IfRight(str,1)""Then
　　str=str ""
　　EndIf
　　str="Provider=Microsoft.Jet.OLEDB.3.51;PersistSecurityInfo=False;DataSource="&str&"sl.mdb"
　　Adodc1.ConnectionString=str
　　Adodc1.CommandType=adCmdText
　　Adodc1.RecordSource="select*fromtable3"
　　Adodc1.Refresh
　　endsub

三、利用DataEnvironment进行数据库链接
　　可在过程中放入：
　　OnErrorResumeNext
　　IfDataEnvironment1.rsCommand1.StateadStateClosedThen
　　DataEnvironment1.rsCommand1.Close'如果打开，则关闭
　　EndIf
　　'i=InputBox("请输入友人编号:","输入")
　　'Ifi=""ThenExitSub
　　DataEnvironment1.Connection1.OpenApp.Path&"userdatabasesl.mdb"
　　DataEnvironment1.rsCommand1.Open"select*fromtable3where编号='"&i&"'"
　　'SetDataReport2.DataSource=DataEnvironment1
　　'DataReport2.DataMember="command1"
　　'DataReport2.show
　　endsub

四、利用ADO(ActiveXDataObjects)进行编程：
　　建立连接：
　　dimconnasnewadodb.connection
　　dimrsasnewadodb.recordset
　　dimstr
　　str=App.Path
　　IfRight(str,1)""Then
　　str=str ""
　　EndIf
　　str="Provider=Microsoft.Jet.OLEDB.3.51;PersistSecurityInfo=False;DataSource="&str&"sl.mdb"
　　conn.openstr
　　rs.cursorlocation=aduseclient
　　rs.open"数据表名",conn,adopenkeyset.adlockpessimistic
　　用完之后关闭数据库：
　　conn.close
　　setconn=nothing->

来源:http://www.tulaoshi.com/n/20160219/1619510.html

看过《设置对VisualBasic数据库连接的动态路径》的人还看了以下文章更多>>

JDBC连接Access数据库

标签：编程语言网络编程

第一种：使用JDBC的ACCESS驱动程序：在http://industry.java.sun.com/products/jdbc/drivers下载ACCESS的JDBC驱动程序。第二种：使用JDBC-ODBC桥访问： Class.forName("sun.jdbc.odbc.JdbcOdbcDriver"); conn = DriverManager.getConnection("jdbc:odbc:dbaccess"); 第三种：直接访问ACCESS数据库，不使用JDBC-ODBC桥： Class.forNam...

JSP连接Access数据库

标签： Web开发

一.建立数据库及ODBC数据源１.建立jcc.mdb数据库及user表２.添加测试数据３.配置ODBC数据源二.在%wwwroot%/下，新建Access数据库连接文件Select.jsp Select.jsp源码如下： %@page contentType="text/html;charset=gb2312"% %@page import="java.sql.*"% html body ...

Dreamweaver中数据库路径的使用

标签： Web开发

链接数据库是我们程序开发的第一步，下面我们来看看Dreamweaver中数据库路径的使用技巧。一、不推荐使用Server.Mappath(相对文档路径地址的数据库文件) 虽然具有平台移植性，但对于不同层次，不同深度下的引用该数据库的文件，将不能完整地保证数据库路径的正确性。举个例子: 1、数据库文件cnbruce.mdb，所在文件夹d...

java与数据库连接

标签：编程语言网络编程

1、用数据库软件（如：mysql）创建数据库，在数据库注册时用到的数据库名则为刚刚创建的数据库，若为数据源名，则需ODBC配置。 2、将驱动程序放在D:\Tomcat 5.5\common\lib或相应的开发工具的lib下，对D:\Tomcat 5.5\conf\web.xml修改，打开web.xml,在/web-app的前面添加以下内容： resource-ref descriptionDB Con...

数据访问-与数据库建立连接

标签： SQLServer

在第一部分，我们讨论了如何优化 ASP 代码。在这一部分，我们把重点放在数据访问上。一般情况下，数据访问时间要比 ASP 代码解释，编译时间长，不要让数据检索成为影响 ASP 性能的瓶颈。首先，讲一些老生常谈的话。比如：需要声明变量，要用 Response.Write SQL_string 来进行调试，要用 On Error Resume Next 来捕获错误。不要在 ...

查看更多精彩>>