错误 '80004005'未发现数据源名称并且未指定默认驱动程序cod_ado.inc，行 4

Question

 <%
sub cod_AdoOpen(objConnection, rsCoursesList,dsn,rss)
    Set objConnection = Server.CreateObject("ADODB.Connection")
    objConnection.Open dsn
    Set rsCoursesList = Server.CreateObject("ADODB.Recordset")
    rsCoursesList.ActiveConnection = objConnection  
    rsCoursesList.CursorLocation = adUseClient
    rsCoursesList.CursorType = adOpenForwardOnly
    rsCoursesList.LockType = adLockReadOnly
    rsCoursesList.Source = rss
    rsCoursesList.Open
end sub
sub cod_AdoClose(objConnection, rsCoursesList)
    rsCoursesList.close
    objConnection.close
    set rsCoursesList = nothing
    set objConnection = nothing
end sub
%>

系统是WIN8 64位 ACCESS也是64位 DW是32位

求教是什么问题引起的啊

Answer 1

dsn有什么内容，驱动指定错误了吧。。怎么是cod_ado.inc