在程序中操作access数据库的高手请进,在线等待,谢谢!

myhgyp 2002-10-13 02:13:11
下面的一段程序我实现了在程序中增加了一个access数据库,现在我想往tstmp.mdb中增加一张表,该如何实现?请详细写出步骤。
Dim db As New ADOX.Catalog
db.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & pBackDir & "\tstmp\tstmp.mdb"
...全文
94 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
深渊的水影 2002-11-14
  • 打赏
  • 举报
回复
up
aimi0123456 2002-11-14
  • 打赏
  • 举报
回复
'创建数据库文件,在工程-》引用-》引用“Microsoft ado ext ...”
dim db New ADOX.Catalog

db.create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\aaa.mdb"


'得到表的名称
Set rs = conn.OpenSchema(adSchemaTables)
Do While Not rs.EOF
msgbox "表的名称是:" & rs!TABLE_NAME
rs.MoveNext
Loop

'得到字段信息
rs .Open "select * from tablename",conn,adOpenDynamic
for i=0 to rs.fields.count-1
msgbox "字段名称:" & rs.fields(i).name
msgbox "字段类型:" & rs.fields(i).type
....
....
next i
zpec 2002-10-13
  • 打赏
  • 举报
回复
对于本机上的Access,与其用ADO做不如DAO的好用
skywax 2002-10-13
  • 打赏
  • 举报
回复
CREATE TABLE [dbo].[表名]
(
字段
)
griefforyou 2002-10-13
  • 打赏
  • 举报
回复
Create Table语法你不会?

1,216

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧