乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 24|回复: 1

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

[复制链接]

6

主题

10

帖子

1

银币

初来乍到

Rank: 1

铜币
34
发表于 2004-2-26 21:00:00 | 显示全部楼层 |阅读模式
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("参数")
。。。
请大家提示,应该很简单,唉,没时间看了
回复

使用道具 举报

158

主题

2315

帖子

10

银币

顶梁支柱

Rank: 50Rank: 50

铜币
2951
发表于 2004-2-28 08:23:00 | 显示全部楼层
请转到数据库版块去看看有关的贴子,都是有关数据库方面的内容。
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-15 13:59 , Processed in 0.356481 second(s), 56 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表