菜鸟级问题(数据库)
我是个vb新手,好多都不懂,比如数据库的插入调出,很是陌生!
我想请教各位一个问题:
我想从access调出调出一些数据,
定义
Dim db As Database
Dim dbname As String
Dim rs As Recordset
Dim qdef As QueryDef
Private Sub Form_Load()
dbname = App.Path
If Right$(dbname, 1) <> "\" Then dbname = dbname & "\"
dbname = dbname & "books.mdb"
Set db = OpenDatabase(dbname)
Set qdef = db.CreateQueryDef("", _
"SELECT title, url FROM books")
Set rs = qdef.OpenRecordset(dbOpenSnapshot)
End Sub
这些程序不知道对不对?我不会写。想麻烦各位帮我编一编。让我参考。