sql="update admin set admin_pwd='"&pwd1&"' where (admin_name='"&name&"'& admin_pwd='"&pwdo&"')"
改成
sql="update admin set admin_pwd='"&pwd1&"' where (admin_name='"&name&"'& admin_pwd='"&pwd0&"')"

你没有定义pwdo这个变量，也没赋直，所以你在数据库里查询不到这样的记录，就不会修改了！
但是你在if 前定义的sql="select * from admin where admin_name='"&name&"'"，而数据库中符合这样的一条记录，if的条件就为真，接着执行下面的语句，接着你就没有再用if 判断密码是否相符了，实际上你的这段程序只查询了有没有admin_name='"&name&"'"的一条记录，你又把pwd0写成pwso了，就不可能在执行修改语句了！

可以把if前面的那个查询条件换一下试试！

是的,我那个出错了,我换成下面这样

sql="select * from admin where (admin_name='"&name&"' and admin_pwd='"&pwd0&"') "
如果这样的话,只要用户名对它记录可以更新了,而不管密码对不对,那我要的是用户名与密码同时对的话再更新,那怎么办才好呢

按理说那段程序是可以的，但既然不行可以换个思路啊！
你可以先查询用户是否存在，有的话再用if判断输入的密码是否正确啊，象下面的你试试：
<!--#include file="conn.asp" -->
<%set rs=server.createobject("adodb.recordset") %>
<%
name=request("name1")
pwd1=request("pwd0")
pwd1=request("pwd1")
set cn=server.createobject("adodb.connection")

set rs=server.createobject("adodb.recordset")
sql="select * from admin where admin_name='"&name&"'"
rs.Open sql,conn,1,1
if 用户名存在 then
dim userpsd
userpsd=rs("admin_psd")
if 密码相符 then
修改密码
response.write "<script language=JavaScript>" & chr(13) & "alert('OK! 信息修改成功！');"&"window.location.href = 'admin.asp'"&" </script>"
else
response.write "<script language=JavaScript>" & chr(13) & "alert('对不起!不能修改！');" & "history.back()" & "</script>"
end if
else
response.write "<script language=JavaScript>" & chr(13) & "alert('对不起!不能修改！');" & "history.back()" & "</script>"
end if

rs.Close
set rs=nothing
conn.close
set conn=nothing
%>
好象有点麻烦，但你可以参考！呵呵~~~~~~~~~~