Question

asp程序Microsoft VBScript 编译器错误 '800a03f2'

Microsoft VBScript 编译器错误 '800a03f2'

缺少标识符

\www\asp\zjwzz\admin\repass.asp, line 16

源码如下
<%@language="vbscript" codepage="936" %>
<%
DBpath = "../" '数据库文件的位置
%>
<!-- #include file="../ConnDB.asp"-->
<!-- #include file="../DT_Inc/md5.asp"-->
<%
dim sql,rs
dim username,password
username="sanler"
password="123456"
password=md5(password,32)
set rs=server.createobject("adodb.recordset")
sql="select * from tAdmin where fID='1'"
rs.open sql,conn,1,3
rs.("fPassword")=password
rs.("fUserName")=username
rs.update
rs.close
set rs=nothing

%>

Answer 1

先把数据库路径加上再试一遍：
DBpath = "../" '数据库文件的位置

这里是错的。

Answer 2

sql="select * from tAdmin where fID='1'"
这里面的'1'改成1~`不要加单引号

Answer 3

sql="select * from tAdmin where fID='"&1&''"

Answer 4

rs("fPassword")=password
rs("fUserName")=username

Answer 5

把
rs.("fPassword")=password
rs.("fUserName")=username
改为
rs("fPassword")=password
rs("fUserName")=username