这是我在首页的登陆代码·是在login.asp里面截取的 login.asp本身没有问题！但是这些代码就是不能成功进入
有大哥哥和大姐姐门可以帮我解决一下吗
<% if not founduser then
response.Write "<td class=tableBody1 align=center valign=middle>"&_
"<table cellspacing=1 cellpadding=3 align=center border=0><tr>"&_
"<td class=tableBody1 align=center valign=middle>欢迎您访问<font color=blue>"&webname&"</font>，您还没有<font color=red>［<a href=reg.asp class=cblue>注册</a>］</font>或<font color=red>［<a href=login.asp class=cblue>登录</a>］</font></td>"&_
"</tr><form action=login.asp?action=chk method=post><tr>"&_
"<td class=tablebody1 height=40>"&_
"用户姓名：<input maxLength=20 name=username size=12>"
if Cint(Codeshow(0))=1 then
response.Write "&nbsp;<input type=text name=codestr maxlength=4 size=4>&nbsp;"
response.Write (GetCode())
end if
response.Write "<br>用户密码：<input maxLength=20 name=password size=12 type=password>"&_
"<select name=CookieDate><option selected value=0>不保存</option><option value=1>保存一天</option><option value=2>保存一月</option><option value=3>保存一年</option></select>&nbsp;"&_
"<input type=submit name=submit value=登录>"&_
"</td></tr></form></table></td>"
else
response.Write "<td class=tableBody1 align=center valign=middle width=80>"
response.Write("<IFrame src=visual_show2.asp?username="&membername&"&boardid=0&type=1&bgcolor=tablebody1 width=90 height=115 marginwidth=0 marginheight=0 hspace=0 vspace=0 frameborder=0 scrolling=NO allowtransparency=true></iframe></td>")&_
"<td class=tableBody1 valign=middle>"
%>
<TABLE border=0 width="89%" align=center>
<TR>
<td><a href="JavaScript:openScript('messanger.asp?action=new',500,400)">发短信</a>
※
<%
if Cint(newincept())>Cint(0) then
if Cint(Msgautoopen)=1 then%> <script language=JavaScript>openScript('messanger.asp?action=read&id=<%=inceptid(1)%>&sender=<%=inceptid(2)%>',500,400)</script>
<%end if%> <bgsound src="images/mail.wav" border=0>
<a href="usersms.asp?action=inbox">我的收件箱</a> (<a href="javascript:openScript('messanger.asp?action=read&id=<%=inceptid(1)%>&sender=<%=inceptid(2)%>',500,400)"><font color="#ff0000"><%=newincept()%> 新</font></a>)
<% else %> <a href="usersms.asp?action=inbox">我的收件箱</a>
(<font color=gray>0 新</font>)
<%
end if
%> <font face=Wingdings color=blue>v</font>
<font color="red"><%=myClass%></font></td>
</TR>
<tr>
<td height="1" bgcolor=#6595D6 colspan="2"></td>
</tr>
<TR>
<td><a href="userdiary.asp">我的日记</a> ※ <a href="UserArticle.asp">我的文章</a>
※ <a href="Userphoto.asp">我的相册</a></td>
</TR>
<TR>
<td>魅力：<%=myuserep%> ※ 现金：<%=mymoney%> ※ 威望：<font color="red"><%=mypower%></font></td>
</TR>
<TR>
<td>您最后一次登录是在：<%=Now()%></td>
</TR>
</TABLE>
<%end if%></td>
<td height="181"></td>
</tr>
<tr>
<td width="227" align="left" valign="top">
<p>　</td>
<td height="23" width="1"></td>
</tr>
</table>
</div>
</TD>
<TD valign="top" align="right" width="0">
</TD>
</TR>
</TBODY></td>
</tr>
</table>