我设置了一个连接：

set conn= New ADODB.CONNECTION

出错提示“用户定义变量未定义”
我搞不清楚怎么回事！？？

看看下面的例子，你是不是没有声明conn
Dim iDb As ADODB.Connection
Dim iConcStr$, iSql$, iReturn$
     
On Error GoTo lbErr
   
'创建对象
Set iDb = New ADODB.Connection
   
'连接数据库服务器,根据你的情况修改连接字符串
iConcStr = "DRIVER=SQL Server;SERVER=" & sern & ";UID=sa;PWD=;APP=Visual Basic;WSID=" & wdsn & ";DATABASE=ERP;Network=DBMSSOCN"
 
iDb.Open iConcStr
   

    Dim o As Collection
    Debug.Print ObjPtr(o)
    Set o = New Collection
    Debug.Print ObjPtr(o)
    Set o = Nothing
    Debug.Print ObjPtr(o)

先定义一个对象，就好了
Dim iDb As ADODB.Connection

谢谢各位,我再回去试试!