5天学会asp(6)

   <input type="submit" value=添加> 
   <input type="reset" value=重置>
          </td>
      </tr>
</table>
</center>
</form>
</body>
</html>
下面我们做adduser.asp，这个页面就是向数据库中添加值了
<!--#include file=conn.asp-->
'这里我们添加一个判断，用来判断是不是管理员，只有管理员才有权添加用户
<%
if isempty(session("admin")) or session("admin")="" then 
response.redirect"login.asp"
end if
%>
<%
'-------------------为防止出错我们定义username和password----------------
dim username
dim password
'--------用request的form方法来接受add.asp页面传来的值，并付值给我们定义的username和password
username=request.form("username")
password=request.form("password")
'---------判断传来的值是不是空值
if username="" then
'用response的write的方法输出一个脚本
    response.write"<script>alert('用户名不能为空')</script>"
 response.end
end if
if password="" then
 response.write"<script>alert('密码不能为空')</script>"
 response.end
end if
'----------判断用户是不是已经存在了，如存在就提示，并返回。
set rs=server.cerateobject("adodb.recordset")
sql="select * from admin where admin_name='"&username&"'"
rs.open sql,conn,3,3
'如果用户存在
if not(rs.eof and rs.bof) then
response.write"<SCRIPT language=javascript>alert('用户以存在，请重新选择！');"
response.write"javascript:history.go(-1)</SCRIPT>"
response.redirect"add.asp"
'添加用户
else
rs.addnews
rs("admin_name")=username
rs("admin_pwd")=password
rs.update
response.write"<SCRIPT language=javascript>alert('添加成功，请返回');"
response.write"javascript:history.go(-1)</SCRIPT>"
response.redirect"add.asp"
end if
'---------最后不要忘记关闭数据连接，释放资源
rs.close
set rs=nothing
%>

----------------------------------------------------------------------------------------------------------------------
5天搞定asp第二天[续]
哈哈 第二天的那页放不下了就分开了
不要意思了

好了，现在我来做“更新”“删除”
这里的重点是要取的要删除的数据的编号，数据编号是唯一的不可重复的
首先我们把所有的用户有取出来 ，并放在一个页面上
先写的是更新哦
呵呵
删除和这个基本一样就是SQL的语句不同，要注意的是新闻的id是怎么样取得的！！！！