VB6.0 SP6 AOD应用笔记——第一部分

序：工作多年，一直是程序爱好者，真正动手编码其实才21天，纯新手一个。用的还是老古董的VB+SQLserver2000，唯一的原因就是网络上资源多，有啥不懂的好找。

ADO，ActiveX Data Objet，微软用于访问数据库的接口。研究了快半个月，终于搞懂了一点皮毛，整理一下过程中的问题，理理自己的思路，如果有不对的地方，还请高手不吝赐教，对于和我一样的新手，希望有所帮助。

1、ADODB和ADODC

一开始就没有弄清楚这两个东西到底怎么回事。后来用的时候才慢慢的搞清楚。

ADODB是一个数据模型，我觉得可以理解成一个类。用这个类来创建对象，引用方法来操作数据库。

ADODC是VB的一个控件，它“封装”了ADODB，给用户一个更加易于理解的操作界面，通过点选来完整基本的连接操作。

两者其实在使用上实际上没啥区别，网上的描述大多是说ADODB比ADODC更加灵活，方便，其实我觉得这个是对于老手而言的。对于新手，还是ADODC好用，点两下就好了。

2、ADODC的使用

在窗体上放一个ADODC控件，右键点击这个控件，点击“ADODC属性”，弹出来下面的对话框：

用第三个“使用连接字符串”，其他两个没研究。点生成，进入“数据库连接属性”，对于我们这种新手，用两种数据库就好了，最容易上手，也最容易理解。微软的Acess和SQLserver，这两种数据库对于绝大多数应用都完全胜任了，新手没必要去搞那些复杂的。

下一步，如果是Acess：

在数据源的位置填写做好的Acess数据库完整的mdb文件的路径。

注意点：文件名一定要带上.mdb的扩展名，要不vb会报错。

点击测试连接，就应该显示“测试连接成功”。点击确定返回之前的ADODC属性窗口，有了这么一个字符串

Provider=Microsoft.ACE.OLEDB.12.0;Data Source=D:\VB\ADODC\Database1.mdb;Persist Security Info=False

要明白的就一个：

Data Source=后面是完整的mdb数据库路径。

如果是SQLserver：

选择或输入服务器名称——这里如果你的SQLserver是打开的，就能找到。如果是在XP下用的开发版或者学习版什么的，这里可能有个问题，

就是显示不出来数据库的名称，我也不知道怎么回事，但是实际上是连上的。

注意点：（这个我犯过错误）第二项，“输入登录服务器的信息”。

如果仅仅实在单机上用，并且装SQLserver时也是选择的“使用WindowsNT集成安全设置”，那就选这个。如果要做网络的数据库访问，那就得在装SQLserver时选择混合验证，设置SQLserver的用户名和密码，然后在这个对话框选择“使用指定的用户名和密码“，填写上SQLserver上设置的用户名和密码，这样在别的电脑上就能访问到服务器上的数据库了。

测试连接成功以后，就能选择数据库了。再点击确定，就会返回之前那个”ADODC属性“的窗口，然后有了这么一串字符串。

这个是”使用WindowsNT集成安全设置“的字符串

Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=pubs

这个是”使用指定的用户名和密码“的字符串

Provider = SQLOLEDB.1;Password =123; UserID =sa; Initial Catalog = Database; Data Source = SQLserver

对于我们新手，只需要知道几个关键的意思就行：

Initial Catalog= 这个是用的SQLserver上的具体的数据库的名称，等号后面写你要用的数据库的名字

Data Source = 这个是SQLserver的名称，等号后面写你的SQLserver的名字

再有就是Password和UserID，写你在SQLserver安装是选择混合安全模式填写的用户名和密码。

有了这两个字符串，后面就不用再这样弄了，可以编码了，可以像是编程而不像是用office了。

再用ADODC的时候，在窗体上画一个控件，然后在form_load或者是Command1_Click这种子程序下写这么两句话：

用Acess：

Adodc1.ConnectionString =“Provider=Microsoft.ACE.OLEDB.12.0;Data Source=D:\VB\ADODC\Database1.mdb;Persist Security Info=False”

Adodc1.RecordSource = "select * from test "

Adodc1.Refresh

用SQLserver，没用户名密码：

Adodc1.ConnectionString =“Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=pubs”

Adodc1.RecordSource = "select * from test "

Adodc1.Refresh

用SQLserver，有用户名密码：

Adodc1.ConnectionString =“Provider = SQLOLEDB.1;Password =123; UserID =sa; Initial Catalog = Database; Data Source = SQLserver”

Adodc1.RecordSource = "select * from test "

Adodc1.Refresh

就这么着，Adodc就和数据库连接了。
注意点：

1、ConnectionString和RecordSource的“=”后面要跟的是一个字符串，所以要用双引号连起来

2、用Acess的时候，使用绝度路径（就是说：D:\VB\ADODC\Database1.mdb）不太好用，有时会用“App.path+数据库字符串变量”来写，格式要是这样才行：

Private strDB As String

strDB = "\Database\001.mdb"

Adodc3.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path + strDB & ";Persist Security Info=False"
别问为什么，我也不知道。

-=没写完，后面接着写=-