vb,打开数据库时出现如下问题，请高手解决

Question

引用了ADO没有.如果没有的话,到工程序菜单里,在点击引用,在列表框中选中:Microsoft ActiveX Data Objects 2.0 Library,就可以了.

Answer 1

同意 gage 
而且你的代码似乎缺少了"NEW",应该是:
public cn as New ADODB.Connection
public rs as New ADODB.Recordset或者如你如上声明过了,到用到时这样;
Set cn=new ADODB.Connection
Set rs=new ADODB.Recordset

Answer 2

呵呵,看情况应该是没有引用ado,引用2.1更好

Answer 3

一定要引用ado啊,不过ado有几个版本的哦,2.1和2.5有一些细小的差别,但是有睦却是致命的.我刚刚就遇到过.在win2000下引用ado2.5,以下代码运行没有问题,可
是在win98下引用2.1就不能运行,代码如下:
 ...
  with myrs
  .addnew
  .fields("姓名")=myrs2.fields("姓名")
  ...
要这样改才可以
...
  with myrs
  .addnew
  .fields("姓名")=str(myrs2.fields("姓名"))
  ...