17118.html

来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· HTML 代码 · 共 23 行

HTML
23 行
字号 
<html>  <head>    <title>Re: 我已经试到!谢谢!怎样动态设定DataEnvironment 的DataSource?</title>  </head>  <body bgcolor="#FFFFFF" vlink="#808080">    <center>      <h1>Re: 我已经试到!谢谢!怎样动态设定DataEnvironment 的DataSource?</h1>    </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by <a href="mailto:96483824@clc.vtc.edu.hk">Fai</a> on August 12, 1999 at 12:21:33:<p>In Reply to: <a href="17102.html">Re: 怎样动态设定DataEnvironment 的DataSource?</a> posted by 大汉堡 on August 12, 1999 at 04:38:38:<p>: : : : 本人有一个DataEnvironment,DataSource="D:\ESU\ESU.mdb",DataEnvironment 裹面有几个Command<br>: : : : 由于这程式会设在不同的电脑上,因此需要改变不同的Path<br>: : : : 所以要动态设定DataEnvironment 的DataSource<p>: : : : 我在form中,写了此行<br>: : : :     ConnStr = "Provider=Microsoft.Jet.OLEDB.3.51;" & "Data Source=" & DbDir & "ESU.mdb"<br>: : : :     DataEnvironment1.Connection1.ConnectionString = ConnStr<br>: : : : 想动态改变Directory Path 的位置,当一用到Command 的时候<br>: : : : Error Message is displayed as "[Microsoft][ODBC Driver Manager] Data Source name not found and no default driver specified"<br>: : : : 请问应怎么办?<br>: : : 不要先设定,于程式执行再做<br>: : : Private Sub Connection1_WillConnect(ConnectionString As String, Userid As String, Password As String, Options As Long, adStatus As ADODB.EventStatusEnum, ByVal pConnection As ADODB.Connection)<br>: : :   DataEnvironment1.Connection1.Properties("data source") = ConnStr<br>: : : End Sub<p>: : 首先感谢您的回应,我在DataEnvironment1的Connection1中加入这行,DbDir是DataBase的<br>: : Directory:  DbDir="D:\Fai\ESU\"<br>: : Private Sub Connection1_WillConnect(ConnectionString As String, Userid As String, Password As String, Options As Long, adStatus As ADODB.EventStatusEnum, ByVal pConnection As ADODB.Connection)<br>: :     ConnStr = "Provider=Microsoft.Jet.OLEDB.3.51;Data Source=" & DbDir & "ESU.mdb"<br>: :     DataEnvironment1.Connection1.Properties("Data Source") = ConnStr<br>: : End Sub<br>: : 但是,却出了这Error:[Microsoft][ODBC Driver Manager]Data Source name too long<br>: : 请问我应怎么办?谢谢<p>: 你的ConnStr仅需 Path and DataBaseName,<br>: ConnStr = "d:\Fai\ESU\ESU.mdb"<br>: 而Provider可直接于DataEnvironment的属性页内设定<p><br><br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 17118--></ul><!--end: 17118--><br><hr size=7 width=75%><p></body></html>

17118.html - 源码说明

本页面展示了「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题.对一些VB初学者很用.」中的 17118.html 源码文件，采用 HTML 编程语言编写，共 23 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与电子书相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?