1.登录统源代码系统登录包含2个asp文件,分别是index.asp,check.asp.<--------------------------------------index.asp------------------------------------------> <html><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><title>兰州理工服装销售管理系统</title></head><body background="image/bg.gif"><div align=center><p><p><form name="form1" method="post" action="check.asp"><table width="437" border="0" cellpadding="0" cellspacing="0" ><!--DWLayoutTable-->.......;省略之间部分代码<td height="1"></td><td colspan="2" rowspan="2" valign="top"><div align="center"><font color="#000000">帐号:</font></div></td><td height="27"></td><td colspan="2" valign="top"><div align="center"><fontcolor="#000000">密码</font><font color="#FFFFFF">:</font></div></td> <td colspan="2" rowspan="2" valign="top"><INPUT name=pass type="password"<td height="34"></td><td> </td><td colspan="2" valign="top"><input type="submit" name="Submit"value="登录系统"></td><td> </td><td></td></tr><tr align="center" valign="bottom"><td height="210" colspan="10"><br><br>  版权所有© 兰州理工大学<br>CopyRight 2009-2010 All Rights Reserved<br>技术支持:<a href="mailto:****************"<span class="style8">俊伟&&&汉云</span></span></a></td></tr> </table></td> </tr></table></form></div></body></html><.------------------------------------check.asp----------------------------------------><%set conn=server.createobject("adodb.connection")conn.open"driver={MicrosoftAccessDriver*.mdb)};pwd=;dbq=" & Server.MapPath("osidata.mdb")%><% username=request("username")pass=request("pass")if username="" and pass="" thenresponse.write "<script language=JavaScript>{window.alert('用户名及密码不能为空,请返回!');window.location.href='index.asp'}</script>"elseSet rs1= Server.CreateObject("ADODB.Recordset")strSql1="select * from user where user='"&username&"' and pass='"&pass&"' "rs1.open strSql1,Conn,1,1if not rs1.eof thenif rs1("biaozhi")="wangxinteng" thensession("username")=usernamesession("user")=rs1("user")session("class")=rs1("class")session("userbz")=rs1("userbz")session("bumen")=rs1("bumen")session("diqu")=rs1("diqu")session("sb")=rs1("class")session("osi")="wangxinteng"........;省略之间部分代码user_ip=Request.ServerVariables("REMOTE_HOST")Set rs2= Server.CreateObject("ADODB.Recordset")strSql2="select * from day "rs2.open strSql2,Conn,3,3rs2.addnewrs2("ip")=user_iprs2("user")=session("username")rs2("thing")="登录系统"rs2("bz")=session("sb")rs2.update%><Script language="javascript">//gotourl('default_into.asp',"","","","",false);//gotourl('oaindex.asp',"","","","",false);var w=800;var h=700;//alert("fullscreen=0,toolbar=0,location=0,directories=0,status=0,menubar=0, scrollbars=0,resizable=1,width=" + w + ",height=" + h + ",top=0,left=0");Var jwin = window.open('main.asp',"","fullscreen=0,toolbar=0,location=0,directories=0,status=0, menubar=0,resizable=1,width=" + w + ",height=" + h + ",top=0,left=0",true);objwin.focus();</script><%elseresponse.write "<script language=JavaScript>{window.alert('该用户帐号已冻结,请与系统管理员联系!');window.location.href='index.asp'}</script>"end ifelseresponse.write "<script language=JavaScript>{window.alert('非法用户,请返回!');window.location.href='index.asp'}</script>"end ifend if%>2.系统管理首页源代码。