access資料庫讀寫
㈠ 我買了一本Access資料庫方面的書,如何將其中的Access 資料庫只讀範例變成為可以讀寫的例子
去掉只讀保護就行了。
或者就你參考這個例子,自己做一個一模一樣的access資料庫即可。
㈡ access資料庫無法讀寫
資料庫欄位類型不正確,或者是沒寫許可權
㈢ 怎麼用VB來對ACCESS資料庫讀寫,我想把表直接顯示出來.
(注意要把你的資料庫文件和你的工程窗體啥的放在同一個文件夾里)
先插入一個模塊,在模塊里寫代碼
Public cn As ADODB.Connection
Sub con()
Set cn = New ADODB.Connection
cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\資料庫名.擴展名;Persist Security Info=False"(在一行里)
End Sub
在窗體里寫代碼
call con
cn.open //打開資料庫
Dim rs As ADODB.Recordset //rs是變數
Set rs = New ADODB.Recordset
查找
rs.Open "select * from 表名 where 欄位名1=' " & Text1.Text & " ' and 欄位名2= ' " & Text2.Text & " ' ", cn //text里的內容是符合你要查找的要求
rs.Open "select * from 表名" //查找整個表的內容
Set DataGrid1.DataSource = rs //顯示在DataGrid里
往資料庫里添加內容是(不過貌似只能一個一個的吧,要不就用循環)
cn.Execute "INSERT INTO 表明 (欄位1,欄位2,欄位3) VALUES('" & Text1 & "','" & Text2 & "','" & Combo3.Text & "')"
刪除 cn.Execute "DELETE FROM 表明 where 欄位名='" & Text1 & "'"