Microsoft VBScript 编译器错误 错误 '800a03f6' 

缺少 'End' 

/iisHelp/common/500-100.asp，行242 

Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005' 

[Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified 

/index.asp，行8
我的程序代码是
<!--#include file="Connections/cnnliuyan.asp" -->
<%
Dim xinwen
Dim xinwen_numRows

Set xinwen = Server.CreateObject("ADODB.Recordset")
xinwen.ActiveConnection = MM_cnnliuyan_STRING
xinwen.Source = "SELECT * FROM News ORDER BY ID DESC"
xinwen.CursorType = 0
xinwen.CursorLocation = 2
xinwen.LockType = 1
xinwen.Open()

xinwen_numRows = 0
%>
我在WINDOWS xp系统中运行正常但是在WINDOWS 2000中运行出现上述错误,还请指教.