Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp,行242
Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005'
[Microsoft][ODBC 驱动程序 管理器] 驱动程序的 SQLSetConnectAttr 失败
/index.asp,行8
菜鸟问题:请教如何解决,源代码如下,xp运行正常,但2000运行出现上述错误
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="Connections/conn.asp" -->
<%
Dim rs
Dim rs_numRows
Set rs=Server.CreateObject("ADODB.Recordset"
rs.ActiveConnection=MM_conn_STRING
rs.Source="SELECT * FROM userbook ORDER BY id DESC"
rs.CursorType= 0
rs.CursorLocation=2
rs.LockType=1
rs.Open()
rs_numRows=0
%>
<%
' *** Validate request to log in to this site.
MM_LoginAction=Request.ServerVariables("URL"
If Request.QueryString<>"" Then MM_LoginAction = MM_LoginAction + "?" + Server.HTMLEncode(Request.QueryString)
MM_valUsername=CStr(Request.Form("name"
If MM_valUsername <> "" Then
MM_fldUserAuthorization=""
MM_redirectLoginSuccess="index1.asp"
MM_redirectLoginFailed="index.asp"
MM_flag="ADODB.Recordset"
set MM_rsUser=Server.CreateObject(MM_flag)
MM_rsUser.ActiveConnection = MM_conn_STRING
MM_rsUser.Source="SELECT username, password"
If MM_fldUserAuthorization <> "" Then MM_rsUser.Source=MM_rsUser.Source & "," & MM_fldUserAuthorization
MM_rsUser.Source=MM_rsUser.Source & " FROM userbook WHERE username='" & Replace(MM_valUsername,"'","''" &"' AND password='" & Replace(Request.Form("password","'","''" & "'"
MM_rsUser.CursorType=0
MM_rsUser.CursorLocation=2
MM_rsUser.LockType=3
MM_rsUser.Open
If Not MM_rsUser.EOF Or Not MM_rsUser.BOF Then
' username and password match - this is a valid user
Session("MM_Username"=MM_valUsername
If (MM_fldUserAuthorization <> "" Then
Session("MM_UserAuthorization"=CStr(MM_rsUser.Fields.Item(MM_fldUserAuthorization).value)
Else
Session("MM_UserAuthorization"=""
End If
if CStr(Request.QueryString("accessdenied"
<> "" And true Then
MM_redirectLoginSuccess=Request.QueryString("accessdenied"
End If
MM_rsUser.Close
Response.Redirect(MM_redirectLoginSuccess)
End If
MM_rsUser.Close
Response.Redirect(MM_redirectLoginFailed)
End If
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>振中教育 振兴中华</title>
<style type="text/css">
<!--
a:link {
text-decoration: none;
color: #FFFFFF;
}
a:visited {
text-decoration: none;
}
a:hover {
text-decoration: underline;
color: #00CCFF;
}
a:active {
text-decoration: none;
}
h1,h2,h3,h4,h5,h6 {
font-family: Arial, Helvetica, sans-serif;
}
body {
background-image: url(image/ad_bg.gif);
}
.style3 {font-size: 9pt}
.style4 {font-size: 9pt; color: #686557; }
.style9 {color: #1F69C0}
.style10 {font-size: 10pt}
.style11 {color: #FFFFFF}
.style13 {color: #FFFFFF; font-size: 9pt; }
a {
font-weight: bold;
}
.style14 {color: #00CCFF}
-->
</style></head>
<body>
<table width="750" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="856" height="60"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="100%" height="65"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="25%" height="91"> </td>
<td background="image/bg1.jpg"> </td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td height="13" background="振中教育/image/ad_bg1.jpg"><table width="100%" border="0" cellpadding="0" cellspacing="0" background="image/ad_bg1.jpg">
<tr>
<td width="25%" height="29"> </td>
<td width="75%"><table width="82%" height="16" border="0" align="center" cellpadding="0" cellspacing="0">
<tr align="center" valign="middle" class="style4">
<td width="60" class="style11"><a href="index.asp" class="style11">首 页</a></td>
<td><img src="image/daohang_bj_1.gif" width="1" height="15"></td>
<td width="60"><span class="style11">中 考</span></td>
<td><img src="image/daohang_bj_1.gif" width="1" height="15"></td>
<td width="60"><span class="style11">高 考</span></td>
<td><img src="image/daohang_bj_1.gif" width="1" height="15"></td>
<td width="60"><span class="style11">网上书店</span></td>
<td><img src="image/daohang_bj_1.gif" width="1" height="15"></td>
<td width="60"><span class="style11">资源下载</span></td>
<td><img src="image/daohang_bj_1.gif" width="1" height="15"></td>
<td width="60"><span class="style11">联系我们</span></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td height="542"><table width="100%" height="409" border="0" cellpadding="0" cellspacing="0">
<tr align="center" valign="top">
<td width="23%" height="409" bgcolor="#E4EEF8"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="75"><table width="100%" height="172" border="0" cellpadding="0" cellspacing="0">
<tr>
<td><img src="image/index_11.jpg" width="175" height="41"></td>
</tr>
<tr>
<td align="center" valign="middle"><form ACTION="<%=MM_LoginAction%>" name="form1" method="POST">
<p><span class="style4">用户名</span><span class="style3">:</span>
<input name="name" type="text" id="name" size="12">
</p>
<p><span class="style4">密 码</span><span class="style3">:</span>
<input name="password" type="password" id="password" size="12">
</p>
<p><img src="image/index_21.jpg" width="27" height="16">
<input type="submit" name="Submit" value="登录">
<img src="image/index_23.jpg" width="64" height="18"> </p>
</form></td>
</tr>
<tr>
<td height="20" align="center" valign="middle"><p> </p>
</td>
</tr>
</table></td>
</tr>
<tr>
<td height="100"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="25" colspan="2"> </td>
</tr>
<tr align="center" valign="middle">
<td colspan="2"><p><img src="image/index_16.jpg" width="175" height="24"></p>
</td>
</tr>
<tr>
<td width="27%" align="right" valign="middle"><img src="image/i4.gif" width="10" height="12"></td>
<td width="73%" align="center" valign="middle" class="style4">点卡充值</td>
</tr>
<tr>
<td align="right" valign="middle"><img src="image/i4.gif" width="10" height="12"></td>
<td align="center" valign="middle" class="style4">点卡使用流程</td>
</tr>
<tr>
<td align="right" valign="middle"><img src="image/i4.gif" width="10" height="12"></td>
<td align="center" valign="middle" class="style4">账户信息</td>
</tr>
<tr>
<td align="right" valign="middle"><img src="image/i4.gif" width="10" height="12"></td>
<td align="center" valign="middle" class="style4">会员制度</td>
</tr>
<tr>
<td align="right" valign="middle"><img src="image/i4.gif" width="10" height="12"></td>
<td align="center" valign="middle" class="style4">常见问题</td>
</tr>
<tr>
<td align="right" valign="middle"><img src="image/i4.gif" width="10" height="12"></td>
<td align="center" valign="middle" class="style4">意见建议</td>
</tr>
<tr>
<td align="right" valign="middle"><img src="image/i4.gif" width="10" height="12"></td>
<td align="center" valign="middle" class="style4">联系方式</td>
</tr>
</table></td>
</tr>
<tr>
<td height="175"><table width="100%" height="160" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="30"><img src="image/index_43.gif" width="171" height="25"></td>
</tr>
<tr>
<td><FONT
color=#003399 class="style4">您具备教案编写的能力吗?<BR>
来吧,您将有机会加盟无忧网校,凭您的实力将成为无忧网校的明星教师。<BR>
欢迎兼职教师加盟 <BR>
我要申请 </FONT></td>
</tr>
</table></td>
</tr>
</table></td>
<td width="77%"><table width="100%" height="480" border="0" cellpadding="0" cellspacing="0" bgcolor="#EFF5FC">
<tr>
<td height="142"><table width="85%" height="140" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="61%" height="41"><img src="image/index_3.jpg" width="417" height="41"></td>
<td width="39%"><img src="image/index_2.jpg" width="163" height="41"></td>
</tr>
<tr>
<td height="99"><table width="98%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="32%"><img src="image/pic_01.jpg" width="122" height="154"></td>
<td width="68%"> <span class="style9"> <span class="style10">教育部学位与研究生教育发展中心(简称教育部学位中心)是教育部直属事业单位,在教育部和国务院学位委员会的领导下开展工作。教育部学位中心具有独立法人资格,是具有社会中介机构性质的、非营利性的社会组织。教育部学位中心成立于2003年7月2日,其前身是挂靠在清华大学的全国学位与研究生教育发展中心。 <br>
学位中心工作职能: <br>
开展学位与研究生教... [详细内容</span>] </span></td>
</tr>
</table></td>
<td background="image/index_4.jpg"> </td>
</tr>
</table></td>
</tr>
<tr>
<td height="54" align="center" valign="top"><table width="100%" border="0" align="right" cellpadding="0" cellspacing="0">
<tr>
<td><img src="image/index_5.jpg" width="289" height="26"></td>
<td><div align="left"><img src="image/index_6.jpg" width="289" height="26"></div></td>
</tr>
<tr>
<td> </td>
<td> </td>
</tr>
<tr>
<td><div align="right"><img src="image/c2.gif" width="44" height="15"></div></td>
<td><div align="right"><img src="image/c2.gif" width="44" height="15"></div></td>
</tr>
</table></td>
</tr>
<tr>
<td height="231" valign="top"><table width="100%" border="0" align="right" cellpadding="0" cellspacing="0">
<tr>
<td><img src="image/index_7.jpg" width="289" height="26"></td>
<td><div align="left"><img src="image/index_8.jpg" width="289" height="26"></div></td>
</tr>
<tr>
<td> </td>
<td> </td>
</tr>
<tr>
<td><div align="right"><img src="image/c2.gif" width="44" height="15"></div></td>
<td><div align="right"><img src="image/c2.gif" width="44" height="15"></div></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="44" align="center" bgcolor="#468CC7"><table width="82%" height="16" border="0" align="center" cellpadding="0" cellspacing="0">
<tr align="center" valign="middle" class="style4">
<td><span class="style11">关于本站</span></td>
<td><img src="image/daohang_bj_1.gif" width="1" height="15"></td>
<td><span class="style11">网站地图</span></td>
<td><img src="image/daohang_bj_1.gif" width="1" height="15"></td>
<td><span class="style11">网站招聘</span></td>
<td><img src="image/daohang_bj_1.gif" width="1" height="15"></td>
<td><span class="style11">广告服务</span></td>
<td><img src="image/daohang_bj_1.gif" width="1" height="15"></td>
<td><span class="style11">版权声明</span></td>
<td><img src="image/daohang_bj_1.gif" width="1" height="15"></td>
<td><span class="style11">练习我们</span></td>
</tr>
</table> </td>
</tr>
<tr>
<td height="59" align="center" bgcolor="#468CC7"><p class="style11 style3">版权所有:振中教育中心 网站设计:蒋汉成</p>
<p class="style13"> Copyright?2005 All Rights Reserved</p> <p class="style13">地址:河南省洛阳市</p> </td>
</tr>
</table> </td>
</tr>
</table>
<div align="center"></div>
</body>
</html>
<%
rs.Close()
Set rs=Nothing
%>