开发者论坛

 找回密码
 注册 (请使用非IE浏览器)
查看: 4001|回复: 1

[求助] 数据库access的连接

[复制链接]

0

精华

0

贡献

0

赞扬

帖子
3
软币
69
在线时间
2 小时
注册时间
2016-12-9
发表于 2016-12-17 22:18:49 | 显示全部楼层 |阅读模式
private void button1_Click(object sender, EventArgs e)
        {
            OleDbConnection strConnection = new OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + "SQLTDDC.mdb" + ";Persist Security Info=False");
            //建立数据库引擎连接,注意数据表(后缀为.db)应放在DEBUG文件下
            OleDbDataAdapter myda = new OleDbDataAdapter("select * from fbf" ,strConnection);
           //建立适配器,通过SQL语句去搜索数据库
            DataSet myds = new DataSet();
            //建立数据集
            myda.Fill(myds, "fbf");
            //用FILL的方式将适配器已经连接好的数据表填充到数据集MYDS这张表
            dataGridView1.DataSource = myds.Tables["yzbm"];
            //用显示控件来显示表
        }
各位大大~晚上好

这是我百度来的代码~,我也把mdb文件放到debug目录下了~但是 点按钮的时候就是没反应~求解~

回复

使用道具 举报

0

精华

97

贡献

17

赞扬

帖子
21
软币
241
在线时间
19 小时
注册时间
2016-9-29
发表于 2017-1-8 11:30:59 | 显示全部楼层
Try

                dbProvider = "Provider=Microsoft.ACE.OLEDB.12.0;"
                dbSource = "Data Source=" & dbFileDir

                Using db_AccessCon As OleDbConnection = New OleDbConnection(dbProvider & dbSource)

                    db_AccessCon.Open()

                    Using Access_Dataset As DataSet = New DataSet
                        Using Access_CMD As OleDbCommand = New OleDbCommand(cmdString, db_AccessCon)
                            Access_CMD.CommandTimeout = ProcessTime
                            Using Access_Adapter As OleDbDataAdapter = New OleDbDataAdapter(Access_CMD)
                                Using EMBuilder As OleDbCommandBuilder = New OleDbCommandBuilder(Access_Adapter)
                                    Access_Adapter.Fill(Access_Dataset, cmdTable)      ' Access_Adapter.FillSchema(AccessDataset, SchemaType.Source)
                                End Using
                            End Using
                        End Using
                        Return Access_Dataset.Tables(0)
                    End Using
                End Using

            Catch ex As Exception
                MsgBox(ex.Message, MsgBoxStyle.Critical, ErrorString & " Error")
                Return Nothing
            Finally

            End Try
回复

使用道具 举报

Archiver|手机版|小黑屋|开发者网 ( 苏ICP备08004430号-2 )
版权所有:南京韵文教育信息咨询有限公司

GMT+8, 2024-12-23 07:47

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表