求助

[daynight2]

错误类型：
Microsoft VBScript 编译器错误 (0x800A03F2)
缺少标识符
/www/xyl/del.asp, line 47, column 6
if rs.("id")=noo then
-----^

id为 数据库自动编号
noo 是去上一页面的文本框植 怎么改？？帮忙了

全叶面代码

<!--#include file="conn.asp"-->
<%
dim name,pw,noo
name=Trim(Request.form("name"))
pw=Trim(Request.form("pw"))
noo=Trim(Request.form("no"))
if trim(name="") then
response.write "<script language='javascript'>" & VbCRlf
response.write "alert('请填入name！');" & VbCrlf
response.write "history.go(-1);" & vbCrlf
response.write "</script>" & VbCRLF
response.end
end if
if trim(pw="") then
response.write "<script language='javascript'>" & VbCRlf
response.write "alert('请填入password！');" & VbCrlf
response.write "history.go(-1);" & vbCrlf
response.write "</script>" & VbCRLF
response.end
end if
if trim(noo="") then
response.write "<script language='javascript'>" & VbCRlf
response.write "alert('请填入no！');" & VbCrlf
response.write "history.go(-1);" & vbCrlf
response.write "</script>" & VbCRLF
response.end
end if
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "Select * From admin where admin='" &name&"'", conn, 3,3
%>
<%if rs.bof then %>
<script language=javascript>
alert( "错误：此用户名不存在！" );
location.href = "javascript:history.back()"
</script>
<%elseif pw<>rs("pw") then%>
<script language=javascript>
alert("错误：您的密码不正确！");
location.href = "javascript:history.back()"
</script>
<%else%>
<%
set rs=server.CreateObject("adodb.recordset")
sqlstr="select * from base"
rs.open sqlstr,conn,1,3
while not rs.eof
if rs.("id")=noo then /////////////这里
rs.delete
rs.update

else
rs.movenext
end if
wend
response.redirect ("list.asp")

%>
<%end if %>

[daynight2]

如果是这样写呢？
rs.Open "Select * From admin where id='"&noo&"'", conn, 3,3
为什么也是类型不匹配？？

[tcpu]

rs.Open "Select * From admin where id='"&noo&"'", conn, 3,3
表admin中的id字段应该是数值类型的吧? 去掉引号...

[daynight2]

呵呵 应当去掉 [ ']

===

再帮忙

<%
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "Select * From admin where id="&noo&"", conn, 3,3
if rs.bof then %>
<script language=javascript>
alert( "错误wu no！" );
location.href = "javascript:history.back()"
</script>
<%else%>
<%
rs.delete

rs.update
end if
response.redirect ("list.asp")
end if

%>

实际并没有删除呀

[tcpu]

那你就直接删除还简单一点...
set rs = conn.execute("delete From admin where id="&noo)

[TrueAndFalse]

1\rs.("id")=noo ===>rs("id")
2rs.Open "Select * From admin where id='"&noo&"'", conn, 3,3

===>

noo=cint(request.form("no"))
rs.Open "Select * From admin where id="&noo&"", conn, 3,3

[BrightEye]

if rs.("id")=noo then
================================>>>>>
if rs("id")=noo then