vb 用ADODC做相对路径连接access数据库
vb 求指教怎么用ADODC做相对路径连接access数据库，代码怎么写？控件属性需要这么设置？数据库连接成功后 combobox控件选择下拉某项，点击command控件后text显示ACCESS中对应的数据，这些代码都怎么写？需要什么控件，求大神指导
FileName = "数据库名称.accdb"
FullFileName = FileDir + FileName
ConnStr = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" + FullFileName + ";Jet OLEDB:Database Password=123456;Persist Security Info=False;"
Adodc1.ConnectionString = ConnStr
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "select * from " & combobox1 & "cssj where 日期='" & combobox2 & "'"
Adodc1.Refresh
text1 = AdodcEmp.Recordset.Fields(2).Value
text2 = AdodcEmp.Recordset.Fields(3).Value
text3 = AdodcEmp.Recordset.Fields(4).Value
text4 = AdodcEmp.Recordset.Fields(5).Value追问
哥们这个是啥意思？
你的数据库是不是2007版本的啊？
把Provider=Microsoft.ACE.OLEDB.12.0;替换成PROVIDER=microsoft.jet.oledb.3.51;
替换了现在提示这个了，前一个追问我自己搞错了没加ADODC控件，我现在又换回来了，一开始提示找不到“cssj”，我改成“地区1cssj”，现在这个text1有不对了，如下图
一开始提示找不到“cssj”，我改成“地区1cssj”，现在这个text1有不对了
兄弟，你把combobox1和combobox2依次替换为Combo1和combo2（是你窗体上的地区1和9月上旬那个下拉组合框的名称）
然后代码中把你增加的地区1删掉
替换了，点启动先弹这个不可识别的窗口
点确定后在弹这个
点调试
你先告诉我你的数据库是哪个版本的？
追问
2003的
把3.51换成4.0
追问
换成4.0了
现在选择地区和月份后点查找，右边的框能显示数据了，但是立马又弹了个这个窗口
点调试
这是内容为null值的赋值，自己查资料解决吧，我困了熬不住了
vb连接access数据库 如何设置数据库的相对路径
1、相对路径就是指由这个文件所在的路径引起的跟其它文件（或文件夹）的路径关系。2、在相对路径中(文件夹我按老习惯称目录)\\表示当前盘的根目录 ..\\表示当前目录的上一层目录，上上层可以用..\\..\\等。当前目录下的data目录可以用data\\表示 当前目录下的data目录下的data1目录，可以用data\\data1\\...
VB 连接ACCESS数据库,如何使用相对路径?
程序与数据库放在一起,用这样代码连接 Private Sub Form_Load()Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& app.path & "\\aaa.mdb;Persist Security Info=False"End Sub
VB如何使用ADODC控件用代码连接数据库
Microsoft ADO Data Control 6.0和Microsoft DataGrid Control 6.0ADODC控件属性设置：1、在ADODC控件上右击，选择ADODC属性2、然后在通用选项卡中选择使用连接字符串，点击生成按钮3、然后选择Microsoft Jet 4.0 OLE DB Provider，点击下一步4、选择要连接打开的Access数据库文件(你要打开的ACCESS文件)，...
VB 中 ADODC 控件如何使用相对路径
使用相对路径App.path方法，App表示应用程序所在路径，后面跟的是数据库文件所在的文件夹名或直接和应用程序在一个文件（在一个文件夹就如按下即可），如下ToolBoardMage.mdb代表你的数据库名称，ToolBoardMage代表数据库表的名称Private Sub Form_Load()Adodc1.ConnectionString = "Provider=Microsoft.Jet....
VB6.0 使用Adodc控件读取Access数据库. 怎么修改数据库指定某一列的所 ...
Adodc控件是这个兄弟，使用很简单，举个按钮单击的例子：Private Sub Command1_Click() Adodc1.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=ACCESS路径名" '\/\/连接字符串,ACCESS2007以上版本不一样 Adodc1.RecordSource="Select * from 表名称" '\/\/查询表数据 Adod...
...objects recordset 2.5 library连的ACCESS数据库的查询功能的原理是...
工程菜单->引用,选择microsoft activex data objects recordset 2.5 library 即可引用 至于原理,其实就是调用系统里的Dll链接库文件来打开数据库的,至于再细点,你也没有必要知道,只要会用就OK了 使用的方法:先声明一个数据库的连接对象,再声明一个记录集对象,这样就可以对数据库进行查询、删除、添加、...
VB6.0,连接Access数据库,用ADODC控件,如何将数据库里面某条指定的记录...
假设表名叫做table1，table1有个人字段是name（人名）。确保你ADODC已经连上数据库，并并且Recordset="table1"，就是关联那个表 那么，with adodc1 .recordset.find "name='" & text1.text & "'"If Not .EOF And Not .BOF Then .Delete .Update End If end with ...
谁能帮我做一个VB连接access数据库的用户登录源代码,要可以注册的_百度...
' 上面是登陆，把ACCESS建立在VB工程一个文件夹里取相对的路径 下面是注册用户表：Private Sub Command2_Click()Dim A As String A = App.Path + "\\ACCESS文件.mdb"Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & A & ";Persist Security Info=False"Adodc1....
vb怎么使用adodc控件调用,删除,储存access某一单元格的数据
这个好简单，给他两个属性赋值就好了：Adodc1.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+ACCESS路径 '\/\/链接数据库Adodc1.RecordSource="Select * from 表" '\/\/给他数据源Adodc1.Refresh '\/\/刷新控件，激活链接状态If Not Adodc1.RecordSet.EOF Then Adodc1....
怎么用VB连接到有密码的ACCESS数据库?
它使用Microsoft ActiveX Data Objects(ADO)创建到数据库的连接。使用Adodc控件之前，要先将Adodc控件添加到控件工具箱中。方法如下：在VB 6.0种选择“工程”菜单，再点击“部件”菜单项，在弹出的“部件”对话框中选中“Microsoft ADO Data Control 6.0(OLEDB)”选项即可。通过Adodc控件连接加密的数据库...
