asp写数据

来源:百度知道 编辑:UC知道 时间:2024/06/03 02:14:46
<%

Set Rs = Server.CreateObject("ADODB.Recordset")
sql = "select * from gbook"
Rs.open sql,conn,3,3

dim username,zt,nr,face,brow
username=trim(request.Form("username"))
zt=trim(request.Form("zt"))
nr=trim(request.Form("nr"))
face=trim(request.Form("face"))
brow=trim(request.Form("brow"))
Rs.addnew
Rs("username")=username
Rs("zt")=zt
Rs("body")=nr
Rs("face")=face
Rs("brow")=brow
Rs("addtime")=now

Rs.update
Rs.close
set Rs=nothing
conn.close
set conn = nothing

%>
一下子写了两条其中一条为空的一条正确的
怎么才可以只写一条正确的

Rs.update

改成
if Rs("username")<>"" then
Rs.update
end if

试试

代码没错 可能是你刷新页面重复提交表格了吧

代码没有问题,再试一次看看