[此贴子已经被作者于2007-9-3 14:44:16编辑过]

我只知道用判断语句

先对身份进行判断

如果是普通会员则对发布的信息进行判断 大于5则跳转到限制的页面

如果是会员 则直接跳出

代码我不会写

那位高手会写 帮帮忙

让我这个初学者也看看....

在用户信息表用上两个字段来作判断。。。一个用户的类型，是普通还是VIP 另加一个字段来记录用户发布的信息数

UserType int 0-普通 1-Vip 用户类型

UserMesInt int 默认0

登陆后，如进入发布信息页 UserAddMes.asp

--------------------------------------------------
在这个页写这些代码

<%
rs.Conn.exeCute("Select top 1 UserType,UserMesInt from [dbuser] where UserName='"&Session("UserName")&"'")

if rs.eof then
response.write"<script language=JavaScript>alert('读取信息失败，请联系我们!');history.back(-1)</script>"
response.end
end if

if rs("UserType")=0 then
if rs("UserMesInt")>5 then
response.write"<script language=JavaScript>alert('对不起，您是普通用户，最多只能发布五条信息，开通VIP用户将不受限制!');history.back(-1)</script>"
response.end
end if
end if
%>

在用户信息表用上两个字段来作判断。。。一个用户的类型，是普通还是VIP 另加一个字段来记录用户发布的信息数

UserType int 0-普通 1-Vip 用户类型

UserMesInt int 默认0

登陆后，如进入发布信息页 UserAddMes.asp

--------------------------------------------------
在这个页写这些代码

<%
rs.Conn.exeCute("Select top 1 UserType,UserMesInt from [dbuser] where UserName='"&Session("UserName")&"'")

if rs.eof then
response.write"<script language=JavaScript>alert('读取信息失败，请联系我们!');history.back(-1)</script>"
response.end
end if

if rs("UserType")=0 then
if rs("UserMesInt")>5 then
response.write"<script language=JavaScript>alert('对不起，您是普通用户，最多只能发布五条信息，开通VIP用户将不受限制!');history.back(-1)</script>"
response.end
end if
end if
%>

<%
rs.Conn.exeCute("Select top 1 UserType,UserMesInt from [dbuser] where UserName='"&Session("UserName")&"'")

if rs.eof then
response.write"<script language=JavaScript>alert('读取信息失败，请联系我们!');history.back(-1)</script>"
response.end
end if

if rs("UserType")=0 then
if rs("UserMesInt")>5 then
response.write"<script language=JavaScript>alert('对不起，您是普通用户，最多只能发布五条信息，开通VIP用户将不受限制!');history.back(-1)</script>"
response.end
end if
end if
%>

红色部份写代代码(写快点，没有注意到)，抱歉，改成如下：
----------------------------------------------------------------

rs=Conn.exeCute("Select top 1 UserType,UserMesInt from [dbuser] where UserName='"&Session("UserName")&"'")