急问：如何在VBA中编写代码将数据写进Access数据库中？

bzjustb

Dim bpSpace As Workspace

Dim bpDataBase As Database Set bpSpace = CreateWorkspace("", "Admin", "")
'在工作空间中打开数据库文件
Set bpDataBase = bpSpace.OpenDatabase("E:\数据库.mdb")
Adodc1.RecordSource = "参数"
'用Datagrid 控件显示Adodc控件的数据
Set DataGrid1.DataSource = Adodc1 Dim rs As Recordset
Dim tl As TableDef

Set rs = bpDataBase.OpenRecordset("参数") 。。。 请大家提示，应该很简单，唉，没时间看了

mccad

请转到数据库版块去看看有关的贴子，都是有关数据库方面的内容。