<%
if request("action")="login" then
	Set rsLogin=Server.CreateObject("ADODB.RecordSet")
	rsLogin.Open "Select * from user1 where name='"&Request.Form("name")&"' and PassWord='"&Request.Form("password")&"'",conn,1,1
	If Not rsLogin.Eof Then		
			session("user")=Request.Form("name")
			Response.Redirect("Index.asp")
		Else
			Response.Write "<script language=javascript>alert('用户名或者密码错误!!'); "
		End If
		rsLogin.Close
		Set rsLogin=Nothing
end if
%>

<TD vAlign=top>
            <TABLE cellSpacing=0 cellPadding=0 width="100%" bgColor=#f8f8f8 border=0>
              
              <TR>
                <TD width=10><IMG height=10 src="images/ne_left_bg01.gif" width=10></TD>
                <TD></TD></TR>
              <TR>
                <TD background=images/ne_left_bg02.gif>&nbsp;</TD>
                <TD vAlign=top align=middle>
                  <TABLE cellSpacing=0 cellPadding=0 width="95%" bgColor=#e7e7e7 border=0>
                    
                    <TR>
                      <TD width=5><IMG height=5 src="images/ne_left_bg04.gif" width=5></TD>
                      <TD></TD>
                      <TD width=5><IMG height=5 src="images/ne_left_bg05.gif" width=5></TD></TR>
                    <TR>
                      <TD></TD>
                      <TD>
                        <TABLE cellSpacing=0 cellPadding=2 width="100%" border=0>
                          
                          <TR>
                            <TD align=left><IMG height=15 src="images/ne_search_title01.gif" width=78></TD></TR>
                          <TR>
                            <TD>                              
                              <TABLE cellSpacing=0 cellPadding=2 align=center border=0>                                
                                <TR>
                                <TD>								
								<MARQUEE id=MARQUEE1 onmouseover=this.stop() onmouseout=this.start() scrollAmount=2 scrollDelay=0 direction=up width=125 bgColor=#ffffff height=150 align="center" border="0">								
								 <div>
								 <%
								Set rs=Server.CreateObject("ADODB.RecordSet")
						  		rs.Open "Select top 3 * from news where class='98'",conn,1,1
						 		if not rs.eof then
								%>
								 <div style="margin-left:5px;margin-right:5px"><a href="newsview.asp?id=<%=rs("id")%>" target="_blank"><%=rs("content")%></a><div>
								<%
								end if
								rs.close
								set rs=nothing
								%><div></marquee>
								
								</TD></TR>
                               </TABLE></TD></TR></TABLE></TD>
                      <TD></TD></TR>
                    <TR>
                      <TD><IMG height=5 src="images/ne_left_bg06.gif" width=5></TD>
                      <TD></TD>
                      <TD><IMG height=5 src="images/ne_left_bg07.gif" width=5></TD></TR></TABLE><BR>
					  
				<TABLE cellSpacing=0 cellPadding=0 width="96%" bgColor=#e7e7e7 border=0>
                    
                    <TR>
                      <TD width=5><IMG height=5 src="images/ne_left_bg04.gif" width=5></TD>
                      <TD></TD>
                      <TD width=5><IMG height=5 src="images/ne_left_bg05.gif" width=5></TD></TR>
                    <TR>
                      <TD></TD>
                      <TD>
                        <TABLE cellSpacing=0 cellPadding=5 width="100%" border=0>
                          
                          <TR>
                            <TD><IMG height=15 src="images/ne_login_tt01.gif" width=78></TD></TR>
                          <TR>
                            <TD>
                              <TABLE cellSpacing=0 cellPadding=0 align=center border=0>
							  <%if session("user") ="" then%>
                                <FORM name=UserLogin onSubmit="return CheckForm();" action=index.asp?action=login method=post>
                                <TR>
                                <TD align=right height=25>帐号：</TD>
                                <TD height=25><INPUT id=Name maxLength=20 size=10 name=Name style="width:80px"></TD></TR>
                                <TR>
                                <TD align=right height=25>密码：</TD>
                                <TD height=25><INPUT id=Password type=password maxLength=20 size=10 name=Password style="width:80px"></TD></TR>                                
                                <TR align=middle>
                                <TD colSpan=2 height=30><INPUT id=Login type=submit value=登&nbsp;陆 name=Login >&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<INPUT id=Reset type=reset value=清&nbsp;除 name=Reset></TD></TR>
								<TR align=middle><td colspan="2"><A class=userlogin01 href="reg.asp" style="margin-top:5px">用户注册</A>&nbsp;&nbsp; <A class=userlogin01 href="#">忘记密码</A> 
                                </TD></TR></FORM>
							<%else%>
								<tr>
									<td height=25>&nbsp;&nbsp;&nbsp;尊敬的会员：<font color="red"><%=session("user")%></font> 您好，您可以进行以下操作：</td></tr>								
								<tr>
									<td height=25><p style="margin-top:10px"><a href="book.asp"><font color="red">家长留言</font></a>  <a href="up.asp"><font color="red">学生投稿</font></a><p style="margin-top:10px"><a href="password.asp"><font color="red">修改密码</font></a>  <a href="out.asp"><font color="red">退出系统</font></a></td></tr>
							<%end if%></TABLE></TD></TR></TABLE></TD>
                      <TD></TD></TR>
                    <TR>
                      <TD><IMG height=5 src="images/ne_left_bg06.gif" width=5></TD>
                      <TD></TD>
                      <TD><IMG height=5 src="images/ne_left_bg07.gif" width=5></TD></TR></TABLE><br>
						
                 
                  <TABLE cellSpacing=0 cellPadding=0 width="95%" bgColor=#e7e7e7 border=0>
                    
                    <TR>
                      <TD width=5><IMG height=5 src="images/ne_left_bg04.gif" width=5></TD>
                      <TD></TD>
                      <TD width=5><IMG height=5 src="images/ne_left_bg05.gif" width=5></TD></TR>
                    <TR>
                      <TD></TD>
                      <TD align=middle>
                        <TABLE cellSpacing=0 cellPadding=5 width="100%" border=0>
                          
                          <TR>
                            <TD><IMG height=15 src="images/ne_zxdc01.gif" width=78></TD></TR></TABLE>
                        <TABLE cellSpacing=0 cellPadding=3 width="100%" border=0>
                          
                          <TR>
                            <TD>
                              <FORM name=VoteForm action=vote.asp method=post target=_blank>&nbsp;&nbsp;&nbsp;&nbsp;华北星新站发布咯，请问您对本次网站改版感觉怎么样？<BR>
							 <input class=checkvote type=radio name='VoteOption' value=1>喜欢<BR>
							  <input class=checkvote type=radio name='VoteOption' value=2>一般<BR>
							  <input class=checkvote type=radio name='VoteOption' value=3>不喜欢<BR><BR>
							  <INPUT type=hidden value=Single name=VoteType><INPUT type=hidden value=Vote name=Action><INPUT type=hidden value=6 name=ID></FORM>
                              <DIV align=center><A href="javascript:VoteForm.submit();"><IMG src="images/voteSubmit.gif" border=0></A>&nbsp;&nbsp;<A href="vote.asp" target=_blank><IMG src="images/voteView.gif" border=0></A></DIV></TD></TR></TABLE></TD>
                      <TD></TD></TR>
                    <TR>
                      <TD><IMG height=5 src="images/ne_left_bg06.gif" width=5></TD>
                      <TD></TD>
                      <TD><IMG height=5 src="images/ne_left_bg07.gif" width=5></TD></TR></TABLE>
                  </TD></TR>
				  
              <TR>
                <TD><IMG height=10 src="images/ne_left_bg03.gif"  width=10></TD>
                <TD></TD></TR></TABLE></td></tr></TABLE>				
				</TD></TR></TABLE></TD>
