100分请教!请教一个与ASP登录模块有关的问题(VBScript)

来源:百度知道 编辑:UC知道 时间:2024/05/22 08:47:48
我使用asp VBScript制作的网站,现在遇到一个问题,我想把登录模块实现为用户没有登录前显示这段代码的内容:
<table width="800" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#D0D0D0">
<tr>
<td>
<form name="form1" method="POST" action="<%=MM_LoginAction%>">
用户名:
<label>
<input type="text" name="username" id="username">
</label>
密码:
<label>
<input type="password" name="pw" id="pw">
</label>
<label>
<input type="submit" name="submit" id="submit" value="登录">
</label>
<label>
<input name="resume" type="button" id="resume" onClick="MM_goToURL('parent','reg.asp');

首先在<%=MM_LoginAction%>(登录界面)界面设置一个Session变量:
<%
'如果登录成果
Session("Username")="YES"
'否则
Session("Username")=""
%>
然后在返回界面:
<% If Session("Username") = "" Then %>
未登录或登录不成功的代码
<% Else %>
已经成功登录的代码
<% End If %>

<% if Session("MM_Username")==null %>
未登录代码
<% else %>
登录代码
<% end if %>
我对VB不是很熟,语法可能有带你问题,不过大体就是这样了!

<% if Session("MM_Username")=="" then %>
未登录代码
<% else %>
已登录代码
<% end if %>

<%if IsNothing(Session("MM_Username")) Then%>
登录前代码
<%else%>
登录之后代码
<%end if%>