用ado访问access时如何动态地创建新表

lwshe 2003-05-09 07:18:58
ado方式,如题????
...全文
42 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
zhengjialon 2003-05-10
  • 打赏
  • 举报
回复
Dim tbl As New Table
Dim cat As New ADOX.Catalog

Set cat.ActiveConnection = CurrentProject.Connection

tbl.Name = "MyTable"
tbl.Columns.Append "Column1", adInteger
tbl.Columns.Append "Column2", adInteger
tbl.Columns.Append "Column3", adVarWChar, 50
cat.Tables.Append tbl



changechange 2003-05-10
  • 打赏
  • 举报
回复
http://a9.shtip.com.cn/index.asp?board=4&mode=3&recordid=310
lwshe 2003-05-09
  • 打赏
  • 举报
回复
???????????????????????????
lwshe 2003-05-09
  • 打赏
  • 举报
回复
?????

7,714

社区成员

发帖
与我相关
我的任务
社区描述
Microsoft Office Access是由微软发布的关系数据库管理系统。它结合了 MicrosoftJet Database Engine 和 图形用户界面两项特点。
社区管理员
  • Access
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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