<%Set rrs= Server.CreateObject("abodb.recordset") sql="select * from gexinghua where huiyuan='"&session("huiyuan")&"' and lbid='"&rs("lbid")&"'" rrs.open sql,conn,3,3 if not rrs.eof then conn.execute("update gexinghua set js=js+1 where huiyuan='"&session("huiyuan")&"' and lbid='"&rs("lbid")&"'") else conn.execute("insert into gexinghua (js,huiyuan,lbid) values(1,'"&session("huiyuan")&"','"&rs("lbid")&"')") end if %> 为什么这样运行的时候后面那个insert就运行不出来,把前面那些都去掉,才能运行insert?
<%
' 首先你得明白这段程序的逻辑和功能Set rrs= Server.CreateObject("abodb.recordset")
sql="select * from gexinghua where huiyuan='"&session("huiyuan")&"' and lbid='"&rs("lbid")&"'"
rrs.open sql,conn,3,3' if语句的存在让update和insert只能由一个执行 ifnot rrs.eof then
conn.execute("update gexinghua set js=js+1 where huiyuan='"&session("huiyuan")&"' and lbid='"&rs("lbid")&"'")
else
conn.execute("insert into gexinghua (js,huiyuan,lbid) values(1,'"&session("huiyuan")&"','"&rs("lbid")&"')")
endif
%>
<%
' 建议这样写Set rrs= Server.CreateObject("abodb.recordset")
sql="select * from gexinghua where huiyuan='"&session("huiyuan")&"' and lbid='"&rs("lbid")&"'"
rrs.open sql,conn,3,3if rrs.eof or rrs.bof then
conn.execute("insert into gexinghua (js,huiyuan,lbid) values(1,'"&session("huiyuan")&"','"&rs("lbid")&"')")
else
conn.execute("update gexinghua set js=js+1 where huiyuan='"&session("huiyuan")&"' and lbid='"&rs("lbid")&"'")
endif
%>
终于改对了,谢谢大家的帮忙. <% Set rs= Server.CreateObject("abodb.recordset") set rrs=conn.execute("select * from gexinghua where huiyuan='"&session("huiyuan")&"' and lbid='"&rs("lbid")&"'") if not rrs.eof then set rrs=conn.execute("update gexinghua set js=js+1 where huiyuan='"&session("huiyuan")&"' and lbid='"&rs("lbid")&"'") else set rrs=conn.execute("insert into gexinghua (js,huiyuan,lbid) values(1,'"&session("huiyuan")&"','"&rs("lbid")&"')") end if %>
