下面是引用 三仙 于 2009-05-15 01:33 发表的 : 
1.放弃连资料库
A.这么快就放弃了哦
2.载入资料库的程式码都一直出现未定义
A.未定义??你的步骤能够说一下吗
1.因为时间快来不及了@@"
所以只能先放弃使用连结资料库这个方法...
2.
首先我打了这段程式码载入资料库，
Private Sub Command1_Click
Set Cn = CreateObject("ADODB.Connection")
Set Rs = CreateObject("ADODB.Recordset")
End Sub
是Cn和Rs 出现绿色弯曲底线。(我想是下面要再用到Cn和Rs底线才会消失)
之后我试了VB研究小站 提供的 "透过OLEDB载入MDB资料库" 程式码，
但是它的 ADODB.Connection 和 ADODB.Recordset 一直出现有蓝色弯曲底线，
(型别 'ADODB.Connection' 未定义 和型别 'ADODB.Connection' 未定义)然后 ADODB.Connection 有建议我应该改成
Odbc.OdbcConnection 或 Data.Odbc.OdbcConnection 或 OleDb.OleDbConnection 或 Data.OleDbConnection ；
ADODB.Recordset 则没有建议，只显示未定义。
VB研究小站有提供另外一个连资料库的方法，但是我一直找不到它上面说的引用项目，所以这个方法就不能用。
所以可能是我哪里没有设定好，或是哪个东西没有安装的问题吧!
知道不能一步登天，
但时间急迫，
所以就先放弃连资料库了!
现在是用 Select Case 方法把资料打上去，再做连结!
