1188
社区成员
急，怎样用ADO建立access数据库及，在access数据库中新建表格
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
headwind 2001-11-14
及
dim Num_Dig_J as integer
dim Num_Dig_J as integer
headwind 2001-11-14
不好意思，漏了一句：
dim DBPATH_Name as string
dim DBPATH_Name as string
headwind 2001-11-14
用扩展ADO来建数据库~~
首先要引用：Microsoft ADO Ext.27 for DLL and securiy
Dim strDB As New ADOX.Catalog
Dim strTab01 As New ADOX.Table
DBPath_Name = App.Path & "\" & Num_Dig_J & ".mdb"
strDB.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DBPath_Name
strTab01.Name = "yh" & Num_Dig_J '表名
strTab01.Columns.Append "YHXM", adVarWChar, 14 '字段名
strTab01.Columns.Append "YHDH", adVarWChar, 14 '同上
strDB.Tables.Append strTab01
首先要引用：Microsoft ADO Ext.27 for DLL and securiy
Dim strDB As New ADOX.Catalog
Dim strTab01 As New ADOX.Table
DBPath_Name = App.Path & "\" & Num_Dig_J & ".mdb"
strDB.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DBPath_Name
strTab01.Name = "yh" & Num_Dig_J '表名
strTab01.Columns.Append "YHXM", adVarWChar, 14 '字段名
strTab01.Columns.Append "YHDH", adVarWChar, 14 '同上
strDB.Tables.Append strTab01
81083 2001-11-14
先引用“Microsoft DAO 3.6 Object Library”
Dim db As Database '数据库对象定义
Dim dbName As String '数据库文件名
dbName = "NewDB.mdb"
Set db = CreateDatabase(dbName, dbLangChineseSimplified, dbEncrypt) '建立数据库
db.Execute "create table 表名 (field1 long,field2 text(8))" '添加表
db.Close
Set db = Nothing
Dim db As Database '数据库对象定义
Dim dbName As String '数据库文件名
dbName = "NewDB.mdb"
Set db = CreateDatabase(dbName, dbLangChineseSimplified, dbEncrypt) '建立数据库
db.Execute "create table 表名 (field1 long,field2 text(8))" '添加表
db.Close
Set db = Nothing
sonicdater 2001-11-14
我一般用dao 建数据库, 要用 ado的话,就必须用 adox . 在 "工程"-"引用" 里,添加 它.
icyer 2001-11-14
还是用DAO比较好。
这里有个例子：
Dim db As Database
Dim tb As TableDef
Set db = CreateDatabase("G:\test.mdb", dbLangGeneral) '建立数据库
Set tb = db.CreateTableDef("table1") '建立表
tb.Fields.Append tb.CreateField("Field1", dbText, 10) '添加字段
db.TableDefs.Append tb '添加表
一切OK。当然，别忘了“引用”“Microsoft DAO 3.6 Object Library”。
这里有个例子：
Dim db As Database
Dim tb As TableDef
Set db = CreateDatabase("G:\test.mdb", dbLangGeneral) '建立数据库
Set tb = db.CreateTableDef("table1") '建立表
tb.Fields.Append tb.CreateField("Field1", dbText, 10) '添加字段
db.TableDefs.Append tb '添加表
一切OK。当然，别忘了“引用”“Microsoft DAO 3.6 Object Library”。
baoxiang 2001-11-14
http://www.csdn.net/expert/topic/369/369996.shtm
《Access在财务中的应用》附书源码 2－1 使用Access数据库完成会计循环自动产生报表 2－1－1 东海企业会计循环实例 2－1－2 解答：人工会计循环 2－2 东海企业会计循环电算化 2－2－1 建立会计科目一览表 2－2－2 建立东海企业日记簿 2－2－3 ...
VC++使用ADO开发ACCESS数据库 VC++使用ADO开发ACCESS数据库 ADO和ADOX到底是什么，二者的作用和区别 ADO是Microsoft 最新推出的数据库访问的高层软件接口。它和Microsoft以前的数据库访问接口DAO、RDO相比具有更大的灵活性，使用也更方便，开发...
idea access数据库连接_LABVIEW实现对数据库表格的操作 Microsoft Access 是在Windows 环境下非常流行的桌面型数据库管理系统，它作为Microsoft office 组件之一，安装和使用都非常方便，幵且支持SQL 语言，所以本文将基于Access 来介绍数据库的操作。建立数据...
C#创建Access数据库、表格、并向表格中添加数据（转） 本文主要演示如何通过C#创建Access数据库以及表格，需要执行演示代码，必须添加两个扩展程序包（COM组件）： Microsoft ADO Ext. 2.8 for DDL and Security Microsoft ActiveX Data Objects 2.8 Library 如下图： ...
VS2013下MFC通过ADO连接Access数据库 新建一个基于对话框的MFC项目：ADO_Access0306 在stdafx.h头文件末尾添加（网上有说在某个#include后面的添加的,也有说在合适位置添加的，我这里直接添加在最末尾） win32位系统添加： #import "C:\Program Files\...
VBA+ADO查询ACCESS数据库 Sub 调用ACCESS数据库查询() Dim rst As New ADODB.Recordset Dim myPath As String Dim SQL As String Dim i As Integer myPath = ThisWorkbook.Path & "\新建 Microsoft Access 数据库 (4G-2G)....
数据库基本概念和 ADO 编程创建数据库及数据表 四、用 ADO创建数据库中的表 五、常见的 SQL 语句 六、使用_ConnectionPtr接口开发ACCESS数据库 七、使用_RecordsetPtr接口开发ACCESS数据库 一、数据库、数据库管理系统、数据库编程技术概念...
ADO创建ACCESS数据库的表(3)
例程CREATE_DB_AND_TABLE演示如何使用ADO创建ACCESS数据库的表。
打开VC++ 6.0，新建一个基于对话框的工程CREATE_DB_AND_TABLE。在对话框IDD_CREATE_DB_AND_TABLE_DIALOG中添加如下控件：
...
使用MFC+ADO+SQL2008（Access）如何动态创建数据库和表 SQL要动态创建数据库，MFC中编程实现方法是：首先连接master数据库，然后查询sysdatabases表中是否存在需要创建的数据库名，如果有则不用创建，否则进行新数据库的创建，新数据库的创建直接执行SQL语句即可。...
ADO访问Access数据库在英文操作系统上出错的问题 客户为国外用户，使用的是英文版的Windows XP，结果使用我们的程序一启动就报ODBC数据库访问错误。由于他们并不是我们的直接客户，所以为了这个问题前前后后沟通了很长时间，我不知道他们会怎么评价我们的办事能力，...
MFC对话框以ADO的方式连接（ACESS）数据库 1）首先我下载了Window office access2007 新建了数据库， 并将其另存为acess2007数据库，取名为shujuku.mdb，里面的表格名字为tiku.并将该文件放在所建立的对话框文件夹下。 2）在所建立的对话框中的StdAfx.h头文件...
VS2010 数据库操作（基于Access 2013） 这几天老师让我做一个实现从VS2010中向Access数据库读写数据的程序。我想起当初学习VS的时候做过一个类似的密码管理器，就是利用数据库的一些知识。当时也是突发奇想，找了各种资料，总算有了个结果，勉强能用，但是...
vc连接access数据库及数据表基本操作 在类中新建两个变量CString m_strName; CString m_strPassword; Cfinancial_sysDlg::Cfinancial_sysDlg(CWnd* pParent /*=NULL*/) : CDialogEx(Cfinancial_sysDlg::IDD, pParent) { m_hIcon = AfxGetApp
利用SQLite ADO.NET在.NET(C＃)中使用SQLite数据库 利用SQLite ADO.NET在.NET(C＃)中使用SQLite数据库 一、关于SQLite ADO.NET[转] System.Data.SQLite 是一个原始SQLite的加强版. 它将是一个原版的sqlite3.dll完全替代品 (你甚至就可以把它重命名为sqlite3.dll)....
