Asp classic ASP DSN较少的连接问题

Asp classic ASP DSN较少的连接问题,asp-classic,connection,dsn,Asp Classic,Connection,Dsn,抱歉,如果这不是提出这个问题的合适地方,但我是论坛的新手 我的问题与ASP和无DSN连接有关。我有一个网站,它是很久以前建立的,使用DSN连接到Access数据库,运行在2003服务器上。我必须复制这个站点,但是我们的服务器(通过Fasthosts托管)现在是2008服务器,不支持ODBC 我已经设置了DSN较少的连接,但显然我仍然没有正确设置,因为我一直在获取所需的对象:每个页面上的“对象”。我不是很精通ASP,所以如果有人能提供一些答案那就太好了 我的原始代码是: //Get the 5 n

抱歉,如果这不是提出这个问题的合适地方,但我是论坛的新手

我的问题与ASP和无DSN连接有关。我有一个网站,它是很久以前建立的,使用DSN连接到Access数据库,运行在2003服务器上。我必须复制这个站点,但是我们的服务器(通过Fasthosts托管)现在是2008服务器,不支持ODBC

我已经设置了DSN较少的连接,但显然我仍然没有正确设置,因为我一直在获取所需的对象:每个页面上的“对象”。我不是很精通ASP,所以如果有人能提供一些答案那就太好了

我的原始代码是:

//Get the 5 newest news items
Dim objRec2, sql2, 
newstext sql2="SELECT TOP 5 news_date, news_text FROM news ORDER BY news_date DESC" 
set objRec2=Server.CreateObject("ADODB.Recordset") 
objRec2.Open sql2,     "dsn=database"
然后我将其更改为:

//Get the 5 newest news items
set conob2 = Server.CreateObject("ADODB.Connection")
conob2.Provider="Microsoft.Jet.OLEDB.4.0" 
conob2.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & server.MapPath("database.mdb") Set rsuni2 = Server.CreateObject("ADODB.Recordset")  
sql2="SELECT TOP 5 news_date, news_text FROM news ORDER BY news_date DESC" 
objRec2.Open sql, conob
然后我得到一个错误:

Microsoft VBScript runtime error '800a01a8'
Object required: 'objRec2'
index.asp, line 20
我正在运行一个“WhileNot”语句来获取新闻文本和新闻日期,如下所示:

<%While Not objRec2.EOF
            newstext = Replace(objRec2("news_text"), vbCrLf, "<br />")
            %>
            <p><span class="bold">Date: <%=objRec2("news_date")%></span><br />
            <%=newstext%></p>

日期:

有人能帮忙吗


非常感谢

在您的更改之后,您似乎丢失了:

set objRec2=Server.CreateObject(“ADODB.Recordset”)


这将导致您遇到的确切错误(与连接无关)。

谢谢,我现在得到错误:ADODB。对象关闭时不允许记录集错误“800a0e78”操作/index.asp,第79行,与“While not”行相关。@user1607021检查名称:是objRec2吗。打开sql2,conob2?