使用Adodc控件,现在只能在一个文件夹下使用,改成别的路径就不行。其中Adodc的ConnectionString属性为:Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\VB project\db1.mdb;Persist Security Info=FalseDataGrid的Datasource属性为:adodc怎么才能改成动态的,即放在各种位置都能用。在线等,急,谢谢!msn:[email protected]
解决方案 »
- 一个关于IP输入合法性的判断语句,请高手帮忙看看。运行出错。。
- 求报表制作具体步骤及代码
- 请VB高手小留残步,帮我解决个问题,亟盼答复啊!
- 求EnumChildWindows函数详细用法!~
- 关于从Excel表向Access转化过程中的问题
- “知其然还要知其所以然”, pyf1027(我为峰) 朋友进来看看,其他的朋友也进来指教~~
- 关于toolbar的表示!!!
- 寻找将vb代码转换为vc代码的工具。
- 我用XP控件做了个XP风格的小程序,如何控制这个程序的窗体大小不被改变?
- 为什么我在用mid和right函数时老是说“找不到工程或库”,而left函数就没有这个问题?
- VB可不可以直接写屏
- 请大家答一下下面的题,就当你正在面试
全盘寻找数据库文件!确定文件路径!但是好象没有人这么做吧?都是把数据库存和应用程序放到一个文件夹下吧!
在form_load中把adodc.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & app.path & "\db1.mdb;Persist Security Info=False"
好像不行。你说的那个语句是在哪赋值?
事先建立一个配置文件例如 DataPath.ini 里面保存你的数据库路径及其数据库名称。
你在你的程序启动时读取该文件中的数据库路径,并调用即可。Dim DataPath as String...DataPath=... '此处的 DataPath 包含具体的数据库名称...Adodc.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DataPath & ";Persist Security Info=False"...此方法的好处数据库路经和名称与你的应用程序无关,同时你还可保存调用多个路径和多个数据库!
你只需:
Dim DataPath() as String
Dim Count1 Count1=2
ReDim DataPath(Cont1)
...DataPath(0)=... '数据库名称 1
DataPath(1)=... '数据库名称 2
DataPath(2)=... '数据库名称 3...Adodc.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DataPath(0) & ";Persist Security Info=False"...'以下动态的改变了数据库路径由 DataPath(0) 为 DataPath(1)
Adodc.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DataPath(1) & ";Persist Security Info=False"...
应该写在什么地方呢?
我写在form_load中,运行时告诉我“odbc驱动程序”管理器未发现数据源名称并且为指定默认驱动程序”
不知道怎么回事!