仿乔客cms2.0论坛顶部用户登陆口
作者:cmscn 日期:2005-04-11
打开include/con_forum_main.asp,查找:
vbcrlf&" <td height="&m_hei&"><a href='update.asp?action=forum'>论坛公告</a>:"&temp1&"</td></tr>" & _
下面插入
vbcrlf&" <tr>" & _
vbcrlf&" <td align=center><img src='"&joekoe_cms.web_dir_skin&"forum/forum_user.gif' border=0></td>"
call user_bbslogin()
response.write vbcrlf&"</tr>" & _
在尾部的%>上面增加
sub user_bbslogin()
if login_mode="" then
%>
<td height="&m_hei&">
<table border=0 cellspacing=0 cellpadding=0>
<form name=login_frm method=post action='login.asp?action=login_chk' onsubmit="return login_true()">
<input type=hidden name=chk value='yes'>
<input type=hidden name=re_log value='yes'>
<tr>
<td>用户名:<input type=text name=username value='' size=12 maxlegth=20></td>
<td width=5></td>
<td>密码:<input type=password name=password value='' size=12 maxlegth=20></td>
<td width=5></td>
<td><input type=checkbox id=id_memery_info name=memery_info value='yes' class=bg_td></td>
<td><label for=id_memery_info id=label_memery_info alt='如选择“记住密码”登陆,以后将自动登陆本站!'>记住密码</label></td>
<td width=5></td>
<td><input type=submit value='登 陆' onclick="jacascript:return login_true();"></td>
<td width=15></td>
<td><a href='register.asp'>注册新用户</a></td>
<td width=10></td>
<td><a href='user_getpass.asp'>忘记密码</a></td>
<td width=10></td>
<td><a href='register.asp?action=resend' alt='重新发送一次我的注册验证邮件!'>发送注册邮件</a></td>
</tr>
</form>
</table></td>
<%
exit sub
end if
%>
<td>
<table border=0 cellspacing=0 cellpadding=0>
欢迎您<font class=blue><b><%response.write login_username%></b></font> 您是本站的<font class=red2><%response.write format_power(login_mode,1)%></font> 现有积分<font class=red><%response.write login_integral%></font>分和<font class=red2><%response.write login_emoney%></font><%response.write joekoe_cms.web_unit%> <a href='user_main.asp'>用户中心</a> <a href='user_mail.asp'>我的短信箱(<font class=gray><%response.write login_msg%></font>新)</a> <a href='login.asp?action=logout' onclick="javascript:return click_return('退出本次登陆',1);">退出登陆</a></table></td>
<%
end sub
分目录
sub user_bbslogin()
if login_mode="" then
%>
<td height="&m_hei&">
<table border=0 cellspacing=0 cellpadding=0>
<form name=login_frm method=post action='/user/user_login.asp?action=login_chk' onsubmit="return login_true()">
<input type=hidden name=chk value='yes'>
<input type=hidden name=re_log value='yes'>
<tr>
<td>用户名:<input type=text name=username value='' size=12 maxlegth=20></td>
<td width=5></td>
<td>密码:<input type=password name=password value='' size=12 maxlegth=20></td>
<td width=5></td>
<td><input type=checkbox id=id_memery_info name=memery_info value='yes' class=bg_td></td>
<td><label for=id_memery_info id=label_memery_info alt='如选择“记住密码”登陆,以后将自动登陆本站!'>记住密码</label></td>
<td width=5></td>
<td><input type=submit value='登 陆' onclick="jacascript:return login_true();"></td>
<td width=15></td>
<td><a href='/user/user_reg.asp'>注册新用户</a></td>
<td width=10></td>
<td><a href='/user/user_getpass.asp'>忘记密码</a></td>
<td width=10></td>
<td><a href='/user/user_reg.asp?action=resend' alt='重新发送一次我的注册验证邮件!'>发送注册邮件</a></td>
</tr>
</form>
</table></td>
<%
exit sub
end if
%>
<td>
<table border=0 cellspacing=0 cellpadding=0>
欢迎您<font class=blue><b><%response.write login_username%></b></font> 您是本站的<font class=red2><%response.write format_power(login_mode,1)%></font> 现有积分<font class=red><%response.write login_integral%></font>分和<font class=red2><%response.write login_emoney%></font><%response.write joekoe_cms.web_unit%> <a href='/user/user_main.asp'>用户中心</a> <a href='/user/user_mail.asp'>我的短信箱(<font class=gray><%response.write login_msg%></font>新)</a> <a href='/user/user_login.asp?action=logout' onclick="javascript:return click_return('退出本次登陆',1);">退出登陆</a></table></td>
<%
end sub
引用内容
<tr><td class=bbs_tr>用户系统信息:当前IP: <%response.write user_ip%>,<% response.write (user_sys_type(user_sys))%></td></tr>
评论: 6 | 引用: 7 | 查看次数: 789
发表评论