==求ASP代码,增删改查的功能,建立ACCESE表,里面两个字段,USERID,USERNAME!就可以了==

来源:百度知道 编辑:UC知道 时间:2024/06/18 18:10:25
越快越好,弄完请发到select2005@163.com邮箱里,谢谢!
要求:增加 可以增加USERNAME一个字段数据就可
删除 可以删除USERNAME的字段数据就可
查 也用这个字段完成就可!

sub SaveAdd()
classname=Trim(Request.Form("classname"))

Set Rs=Server.CreateObject("ADODB.Recordset")
Sql="Select * From 表 where USERNAME='"&classname&"'"
Rs.Open Sql,Conn,1,3
if not(rs.eof and rs.bof) then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>请不要重复提交!</li>"
exit sub
else
Rs.AddNew
rs("Classname")=Classname
Rs.UpDate
Rs.close
Set Rs=Nothing

end sub