ado创建数据库
㈠ 怎么在VC++中用ADO创建数据库
VC++中使用ADO方式操作ACCESS数据库2005-12-1209：59来源：天极开发作者：刘涛责任编辑：方舟·yesky评论()ADO(ActiveXDataObject)是Microsoft数据库应用程序开发的新接口，是建立在OLEDB之上的高层数据库访问技术，即使你对OLEDB，COM不了解也能轻松对付ADO，因为它非常简单易用，甚至比你以往所接触的ODBCAPI、DAO、RDO都要容易使用，并不失灵活性。本文详细地介绍在VisualC++开发环境下如何使用ADO来进行数据库应用程序开发，并给出示例代码。为了使读者朋友都能测试本例提供的代码，我们采用Access数据库，您可以直接在我们提供的示例代码中找到这个test。mdb。程序编译运行后的效果如图一所示：
图一、ADO操作ACESS数据库的界面效果图
一、实现方法
万事开头难，任何一种新技术对于初学者来说最重要的还是"入门"，掌握其要点。让我们来看看ADO数据库开发的基本流程吧！它的基本步骤如下：
（1）初始化COM库，引入ADO库定义文件
（2）用Connection对象连接数据库
（3）利用建立好的连接，通过Connection、Command对象执行sql命令，或利用Recordset对象取得结果记录集进行查询、处理。
（4）使用完毕后关闭连接释放对象。
下面我们将详细介绍上述步骤并给出相关代码。
1、COM库的初始化
我们可以使用AfxOleInit()来初始化COM库，这项工作通常在CWinApp：：InitInstance()的重载函数中完成，请看如下代码：
BOOLCADOTest1App：：InitInstance()
{
AfxOleInit()；
。。。。。。
}
2、用#import指令引入ADO类型库
为了引入ADO类型库，需要在项目的stdafx。h文件中加入如下语句：
#import"c：\programfiles\commonfiles\system\ado\msado15。dll"
no_namespacerename("EOF"，"adoEOF")
这一语句有何作用呢？其最终作用同我们已经十分熟悉的#include类似，编译的时候系统会为我们生成msado15。tlh，ado15。tli两个C++头文件来定义ADO库。
需要读者朋友注意的是：您的开发环境中msado15。dll不一定在这个目录下，请按实际情况修改；在编译的时候可能会出现如下警告，对此微软在MSDN中作了说明，并建议我们不要理会这个警告：msado15。tlh(405)：warningC4146：，resultstillunsigned。
3、创建Connection对象并连接数据库
为了首先我们需要添加一个指向Connection对象的指针_ConnectionPtrm_pConnection，下面的代码演示了如何创建Connection对象实例及如何连接数据库并进行异常捕捉：
BOOLCADOTest1Dlg：：OnInitDialog()
{
CDialog：：OnInitDialog()；
HRESULThr；
try
{
hr=m_pConnection。CreateInstance("ADODB。Connection")；///创建Connection对象
if(SUCCEEDED(hr))
{
hr=m_pConnection->Open("Provider=Microsoft。Jet。OLEDB。4。0；
DataSource=test。mdb"，""，""，adModeUnknown)；///连接数据库
//上面一句中连接字串中的Provider是针对ACCESS2000环境的，对于ACCESS97，
//需要改为：Provider=Microsoft。Jet。OLEDB。3。51；
}
}
catch(_com_errore)///捕捉异常
{
CStringerrormessage；
errormessage。Format("连接数据库失败!\r\n错误信息：%s"，e。ErrorMessage())；
AfxMessageBox(errormessage)；///显示错误信息
}
在这段代码中我们是通过Connection对象的Open方法来进行连接数据库的，下面是该方法的原型：
HRESULTConnection15：：Open(_bstr_tConnectionString，_bstr_tUserID，_bstr_tPassword，longOptions)；
上述函数中参数ConnectionString为连接字串；参数UserID是用户名；参数Password是登陆密码；参数Options是连接选项，用于指定Connection对象对数据的更新许可权，一般情况下Options可以是如下几个常量：
adModeUnknown：缺省。当前的许可权未设置
㈡ vb如何用ado建立Access数据库
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
cnstr = "Provider=Microsoft.Jet.OLEDB.4.0;DataSource=" + App.Path + "\mydb.mdb;"
cn.Open cnstr
rs.Open "select * from 数据表", cn, adOpenDynamic, adLockOptimistic
====================================
先要有个空的mdb文件做为模板.
用file生成你要的文件,然后用sql再在其中建表以及其中的字段.
㈢ 关于用ADO操作数据库
这样写就好了,靠,笨(这样写有"号是可以的")
cn.execute "insert into b1(f) values ('" & replace(text1.text,"'","''") & "')"
呵呵,replace是替换字符函数,replace("'","")是将'替换个两个''号
保存日期:
cn.execute "insert into b2(d) values ('" & now() & "')"
㈣ 在使用ADO访问数据库之前,我们必须要创建和( )
要创建和数据库的连接
下面的例子创建了和一个叫“水厂数据库.mdb”的Access数据库的连接，并通过SQL查询语句查询必要的数据
希望对你有帮助～
Public Con As New ADODB.Connection
Public Rst As New ADODB.Recordset
Con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\水厂数据库.mdb" & ";Mode=ReadWrite;Persist Security Info=False"
Rst.Open SQL查询语句, Con, adOpenStatic, adLockOptimistic
㈤ ADO怎么连接SQL数据库请详细说明。
IDE是Visual Studio 集成开发环境，对象浏览器就是给你看看方法的返回值和异常，其他我不是很清楚你想问什么=创建connection对象就可以生成工程了还是再创建recordset和command对象呢?
㈥ VB+ADO+Access建立数据库怎么定义数据库关系
多表查询：
sqlstr="select * from 顾客表,销售表 where 顾客表.ID=销售表.ID"
录入数据可以直接输入到要求的表里就可以
㈦ 如何正确操作ADO数据库创建说明
在公司技术人员进行对ADO数据库操作时，特别是企业级的数据库应用，就不得不提一个多人操作时经常会产生的问题——并发冲突。本文首先来看一下什么是并发冲突，传统的并发冲突有现有的处理方式。
一、要完成本文中的实例，您需要作如下准备：
将Visual Studio 2008及.NET Framework 3.5升级到SP1。点击转到升级地址。 安装SQL SERVER 2005，VS 2008中自带的EXPRESS版的SQL SERVER应该也可以用。 下载并附加数据库：点击下载DemoDbV2。 创建一个VB Console Application，并且取一个合适的名字（例如：Concurrency之类的）。注意，目标Framework要设置成3.5版。
二、什么是并发冲突
让我们来看一个跟取款相关的例子：某年某月某日某时某分，ADO数据库老王在A取款机取钱，他儿子小王同时在B取款机取钱（不要问我为什么这么巧^_^），他俩从同一个账号上取。于是就发生了如下一序列的操作：
A取款机向中央数据库提问：这账上还有多少钱？
B取款机向中央数据库询问：这账上还有多少钱？ 中央数据库回答A取款机：2W，中央数据库回答B取款机：2W，然后，ADO数据库老王对A取款机说：我要取出1.5W。 同时，小王对B取款机说：我要取出1.8W。
A取款机就算了一下，2W-1.5W=0.5W>0，于是就吐出1.5W现金给了老王，并且准备告诉中央数据库，现在还剩0.5W啦。但是，就在它告诉中央数据库之前，发生了以下的事情：
B取款机计算了一下，2W（此时，它还不知道余额已经成0.5W了，因为A取款机还没有告诉中央数据库）减去1.8W等于0.2W大于0，于是就吐出1.8W现金给了小王。然后，ADO数据库当然也要知会中央数据库。
中央数据库于是收到A取款机的消息，说，这个账号还剩0.5W，于是刷新余额为0.5W。然后又收到B取款机说还剩0.2W，于是，就刷新余额为0.2W。 呵呵，于是，小王+老王的账户里一共存有2W元，结果老王取了1.5W元，小王取了1.8W元，账户里却还剩了0.2W元。
㈧ labview中怎么用ado创建数据库
eW；中利用AD0接口访问数据库的方法；黎洪生；李超；刘俊刚；（武汉理工大学西院信息学院；450070）；摘要较对LabView中的几种数据库访问方法作了；关键词：LabVjew数据库ADO；SQL；引言；LabView（1aboratoryVinual；engineering；利用其他语言如visualc＋＋编写DLL程序访；利用中间文件存取数据，先将数据
eW
中利用AD0接口访问数据库的方法
黎洪生
李超
刘俊刚
（武汉理工大学西院信息学院
450070）
摘要较对LabView中的几种数据库访问方法作了一些比较。详细说明了利用ADO接口访问数据库的方法，并利用该方法实现了对实时数据库的访问。
关键词：LabVjew数据库ADO
SQL
1
引言
LabView（1aboratoryVinualinstnlment
engineering
利用其他语言如visualc＋＋编写DLL程序访问数据库，利用LabView所带的DLL接口访问该程序，可以实现间接的访问数据库。用这种方法实现需要的工作量比较大。
利用中间文件存取数据，先将数据存入文件之中，在一定的时刻或者是需要的时候再将数据导入到数据库之中。这种方法的实现比较简单，但是需要单独的软件对数据文件导入导出，不能对数据进行实时的存取。
这几种方法虽然可以实现对数据库的访问，但各有缺点，不能满足监控系统中对实时数据库访问的要求。本
文提出的利用ADO接口访问数据库的方法则可以较好的
workbench实验室虚拟仪器工程平台）是美国NI（NationalInstmments）公司标志性的虚拟仪器产品，是一种基于图形化语言的开发、调试和运行的集成化环境。它主要用于来开发数据采集、仪器控制、测试测量及过程监测和控制等领域的应用程序。它使用图形语言，即各种图表，图形符号、连线等编程，界面非常宦观形象，相对于传统的编程方式而言，它不仅简单易学而且执行的效率也很高。LabView中自带丰富的函数库，包括数据采集、数据分析、网络、Activex等集成库，提供了DLL库和cIN节点和大量的仪器驱动器、网络VIs与其他外部程序或外部
设备进行连接。它所提供的自动化Activex、DDE、SQL
解决这个问题。
等功能可以很方便的与其他Windows应用程序一起集成用户的应用程序。
基于LabView的上述特点和功能，在开发某监控系统的工程中笔者选择了LabView作为开发工具。
3
利用ADO接口访问数据库简介
AD0（ActiveX
Data
0bjects）是Microsoft为最新数据
访问接口OLEDB设计的应用层接口，它为一致的数据
访问接口提供了良好的扩展性，不再局限于特定的数据
源。这种特征使此技术具有非常灵活的访问特性
㈨ 用ADO怎样创建一个access数据库文件
ado不支持创建access数据库文件，需要使用ADOX扩展类库。
请参阅下列创建access数据库的知道回答链接：
https://..com/question/1515236857294980780
㈩ 在vb中如何用ado控件动态地创建数据库
首先要把Dim cat As New ADOX.Catalog '不用cat用另外一个名字也可以
Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim pstr As String '定义该变量是为了后面的书写方便
放在全局变量定义位置
其次是要删除Persist Security Info=False;
改后为：
Dim cat As New ADOX.Catalog '不用cat用另外一个名字也可以
Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim pstr As String '定义该变量是为了后面的书写方便
Private Sub Command1_Click() '创建数据库
Dim fm As String 'fm变量用来获取用户输入的文件名
CommonDialog1.Filter = "MDB文件(*.mdb)|*.mdb|AllFiles(*.*)|*.*|"
CommonDialog1.FilterIndex = 1
CommonDialog1.InitDir = "E:\vb例"
CommonDialog1.Flags = 6
CommonDialog1.Action = 2
If CommonDialog1.FileName = "" Then
MsgBox "你必须输入一个文件名，请重新保存一次！"
Exit Sub
Else
fm = CommonDialog1.FileName
End If
pstr = "Provider=Microsoft.Jet.OLEDB.4.0;" '不能把这里的4.0改为3.51
pstr = pstr & "Data Source=" & fm '& ";Persist Security Info=False" Persist Security Info=False;
cat.Create pstr '创建数据库
Dim tbl As New Table
cat.ActiveConnection = pstr
tbl.Name = "MyTable" '表的名称
tbl.Columns.Append "编号", adInteger '表的第一个字段
tbl.Columns.Append "姓名", adVarWChar, 8 '表的第二个字段
tbl.Columns.Append "住址", adVarWChar, 50 '表的第三个字段
cat.Tables.Append tbl '建立数据表
conn.Open pstr
rs.CursorLocation = adUseClient
rs.Open "MyTable", conn, adOpenKeyset, adLockPessimistic
rs.AddNew '往表中添加新记录
rs.Fields(0).Value = 9801
rs.Fields(1).Value = "孙悟空"
rs.Fields(2).Value = "广州市花果山"
rs.Update
End Sub
Private Sub Command2_Click() '查询
Set DataGrid1.DataSource = rs
End Sub
Private Sub Command3_Click() '更新
rs.UpdateBatch
End Sub