asp问题 跪求各位大哥大姐 帮忙解决

来源：百度知道 编辑：UC知道 时间：2024/05/07 17:12:02
'是否是本俱乐部会员
set rs=server.createobject("adodb.recordset")
rs.open "select username from love_clubuser where username='"&username&"' and bigkind='"&bigkind&"'",conn,1,1
IF (rs.State =adStateClosed) or (rs.BOF=true and rs.EOF =true) or rs.RecordCount=0 THEN
rs.close:set rs=nothing
call msg("只有本俱乐部成员才能报名参加！","-1")
End If
'是否截止报名或结束
set rs=server.createobject("adodb.recordset")
rs.open "select username from love_club_main where id='"&Classid&"' and (flag=2 or jzbm=1) ",conn,1,1
IF not((rs.State =adStateClosed) or (rs.BOF=true and rs.EOF =true) or rs.RecordCount=0) THEN
rs.close:set rs=nothing
call msg("①此活动已截止报名或已经结束！\n\n②此活动还未通过管理员审核！","-1")
End If
'是否重复申请
set rs=server.createobject("ad

rs.open "select username from love_club_main where id='"&Classid&"' and (flag=2 or jzbm=1) ",conn,1,1
改成
rs.open "select username from love_club_main where id=0"&Classid&" and (flag=2 or jzbm=1) ",conn,1,1

rs.open "select username from love_club_user where username='"&username&"' and main_id='"&Classid&"'",conn,1,1
改成
rs.open "select username from love_club_user where username='"&username&"' and main_id=0"&Classid&"",conn,1,1

sql="insert into love_club_gbook(bigkind,main_id,username,content,addtime)values('"&bigkind&"','"&main_id&"','"&username&"','"&content&"',now())"
改成
sql="insert into love_club_gbook(bigkind,main_id,username,content,addtime)values('"&bigkind&"',0"&main_id&",'"