<%
Hits=CInt(1)
username=request.Form("UserName")
sql="select * from zxtg where username='"& username &"'"
OpenRS rs,sql,1,3
If rs.eof then
rs.addnew
rs("id")=intID
rs("Classid")=ClassID
rs("UserName")=username
rs("title")=request.form("title")
rs("content")=request.form("content")
rs("Hits")=Hits
IncludePic=request.Form("IncludePic")
Else
sql="update zxtg set Hits=Hits+1 where username='"&username&"'"
dbcon.execute(sql)
End If
%>

为什么我第2次运行的时候Hits没有变化呢？？数据库用的是ACCESS

这个是楼主定义的记录集。


Hits=CInt(1)
这句删掉试试。