Question

VB中如何导入ACCESS数据

Answer 1

是将数据库中的数据读入程序吗?还有。数据导入程序中，要怎么显示？是入在datagrid里显示吗？
数据库操作可以用ADO来进行。
打开数据库：
Dim
cn
As
New
ADODB.Connection
cn.ConnectionString
=
"Data
Source="
&
App.Path
&
"/"
&
database_name
&
";User
ID="
&
user_id
&
_
";Jet
OLEDB:Database
Password="
&
password
cn.CommandTimeout
=
100
cn.Provider
=
"Microsoft.Jet.OLEDB.3.51"
'
这和你使用的VB的版本有关
cn.Open
查询的代码：
Dim
rs
As
ADODB.Recordset
Set
rs
=
New
ADODB.Recordset
rs.CursorLocation
=
adUseServer
rs.Open
"Select
ProductID
from
products",
&
_
"Provider=Microsoft.Jet.OLEDB.3.51;"
&
_
"Data
Source=d:\vb5_win95\nwind.mdb",
_
adOpenDynamic,
adLockUnspecified
至于放到哪里，你哪里要导入数据，就放到哪里好了。