ADODB连接字符串在Classic ASP中不起作用

Question

我一直在开发ASP.NET应用程序。我想在这个应用程序中集成经典ASP文件（.asp）。

在.asp文件中，我必须从SQL Server 2008 r2数据库中获取数据。 为此，我创建了db和rs对象。我在db.Open函数中传递了ConnectionString。但我没有得到此代码的输出。

以下是我的代码

   set db = Server.CreateObject("ADODB.Connection")

   db.Open "provider=SQLNCLI10;Data Source=HP-PC\SQLEXPRESS;Initial Catalog=RMToday;Persist             Security Info=True;"


   set rs = Server.CreateObject("ADODB.Recordset")

   rs.Open "select * from RMToday.dbo.[Current]",db

   if not rs.EOF Then
     response.Write(rs("DayClosed"))
   End If 

我在stackoverflow.com上搜索并得到了一些相关问题，回答。

我无法理解这段代码中的错误。

提前致谢