北大青鸟 源代码
北大青鸟官方网站源代码
<!--#include file="inc/data.asp"-->
<!--#include file="inc/asp.asp"-->
<!--#include file="inc/dll.asp"-->
<!--#include file="inc/md5.asp"-->
<%
if request("action")="login" then
server_v1=Cstr(Request.ServerVariables("HTTP_REFERER"))
server_v2=Cstr(Request.ServerVariables("SERVER_NAME"))
if mid(server_v1,8,len(server_v2))<>server_v2 then
Response.Write("<script>alert('您的IP以记录！请不要再访问此页！');this.location.href='admin.asp';</script>")
response.end
end if
if int(request("code"))<>int(Session("code")) then
Response.Write("<script language=javascript>alert('请输入正确的认证码！');this.location.href='admin.asp';</script>")
Response.End
end if
Session("code")=""
adminname=trim(replace(request("adminname"),"'",""))
adminpass=MD5(trim(replace(request("adminpass"),"'","")))
sql="select * from YC_admin where admin_name='"&adminname&"' and admin_pass='"&adminpass&"'"
set rs=conn.execute(sql)
if rs.eof and rs.bof then
Response.Write("<script>alert('您输入的用户名和密码不正确！');this.location.href='admin.asp';</script>")
Response.End
else
if rs("admin_lock")=true then
Response.Write("<script>alert('您的帐户已经锁定，请和超级管理员联系！');this.location.href='admin.asp';</script>")
Response.End
end if
session("superlogin")=ht
session("supername")=trim(rs("admin_name"))
session("superadmin")=trim(rs("admin_super"))
session.timeout=30
Response.write "<script>this.top.location.href='admin.asp';</script>"
rs.close
set rs=nothing
end if
elseif request("action")="adminout" then
session("superlogin")=""
session("supername")=""
session("superadmin")=""
Response.write "<script>this.location.href='index.asp';</script>"
end if
if session("superlogin")=ht then
if request("action")="" then%>
<html><head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>北大青鸟(华腾教育)培训中心网站管理系统→后台管理</title><script src=img/adminjs.js></script>
<link rel="STYLESHEET" type="text/css" href="img/admin.css">
</head>
<body topmargin="0" leftmargin="0" scroll=no>
<table width="100%" height="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr><td width="150" align=center valign="top" id="bar">
<table width="100%" align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d>
<tr class="titleleft" height="22">
<td><b> <img src=img/ie.gif border=0 width=15 height=15 align=absMiddle> 北大青鸟 控制面板</b></td></tr>
<tr class=bg height="20"><td style="line-height:150%;">
管理员：<b><%=session("supername")%></b><br>
权 限：<b><%
if session("superadmin")="admin" then
response.write"<font color=red>超级管理员</font>"
elseif session("superadmin")="news" then
response.write"新闻管理员"
elseif session("superadmin")="art" then
response.write"文章管理员"
elseif session("superadmin")="pic" then
response.write"图片管理员"
elseif session("superadmin")="down" then
response.write"下载管理员"
elseif session("superadmin")="dj" then
response.write"娱乐管理员"
else
response.write"非法管理员"
end if%></b>
</td></tr></table>
<table width="100%" align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d><tr class="titleleft" height="22" onclick="document.all.home.style.display=(document.all.home.style.
display =='none')?'':'none'"><td><b> <img src=img/admin.gif border=0 width=15
height=15 align=absMiddle> 基本管理</b></td></tr>
<tr class=bg height="50" id="home"><td align=center style="line-height:150%;">
<a href="admin.asp?action=welcome" target="admin" onclick="showDiv()">管理首页</a>
<a href="admin.asp?action=adminout">安全退出</a><br>
<a href="admin_sqlin.asp" target="admin">注入管理</a>
<a href="admin_asp.asp" target="admin">网站设置</a><br>
<a href="admin_link.asp" target="admin">连接管理</a>
<a href="book.asp" target="admin">留言管理</a><br>
</td></tr></table>
<table width="100%" align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d>
<tr class="titleleft" height="22" onclick="document.all.lanmu.style.display=(document.all.lanmu.style.
display =='none')?'':'none'"><td><b> <img src=img/admin.gif border=0 width=15 height=15
align=absMiddle> 栏目管理</b></td></tr>
<tr class=bg height="36" id=lanmu style="display:none;">
<td style="line-height:150%;">
√ <a href="admin_news.asp" target="admin">新闻管理</a>
<a href="admin_news.asp?action=add" target="admin">添加新闻</a><br>
√ <a href="admin_zxjj.asp" target="admin">中心简介</a>
<a href="admin_zxjj.asp?action=add" target="admin">添加文章</a><br>
√ <a href="admin_kcxj.asp" target="admin">课程详解</a>
<a href="admin_kcxj.asp?action=add" target="admin">添加文章</a><br>
√ <a href="admin_szll.asp" target="admin">师资力量</a>
<a href="admin_szll.asp?action=add" target="admin">添加文章</a><br>
√ <a href="admin_zswd.asp" target="admin">招生问答</a>
<a href="admin_zswd.asp?action=add" target="admin">添加文章</a><br>
√ <a href="admin_jygc.asp" target="admin">就业广场</a>
<a href="admin_jygc.asp?action=add" target="admin">添加文章</a><br>
√ <a href="admin_xxyd.asp" target="admin">学习园地</a>
<a href="admin_xxyd.asp?action=add" target="admin">添加文章</a><br>
√ <a href="admin_pic.asp" target="admin">图片管理</a>
<a href="admin_pic.asp?action=add" target="admin">添加图片</a><br>
</td></tr></table>
<table width="100%" align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d>
<tr class="titleleft" height="22" onclick="document.all.other.style.display=(document.all.other.
style.display=='none')?'':'none'">
<td><b> <img src=img/admin.gif border=0 width=15 height=15 align=absMiddle> 菜单频道</b></td></tr>
<tr class=bg height="22" id=other style="display:none">
<td style="line-height:150%;">
√ <a href="admin_menu.asp?action=menu" target="admin">菜单管理</a> <a href="admin_menu.asp?action=newmenu"
target="admin">添加菜单</a><br>
√ <a href="admin_other.asp" target="admin">频道管理</a> <a href="admin_other.asp?action=newother"
target="admin">添加频道</a>
</td></tr></table>
<table width="100%" align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d>
<tr class="titleleft" height="22" onclick="document.all.user.style.display=(document.all.user.
style.display=='none')?'':'none'"><td><b> <img src=img/admin.gif border=0 width=15 height=15
align=absMiddle> 管员管理</b></td></tr>
<tr class=bg height="22" id=user style="display:none">
<td style="line-height:150%;">
√ <a href="admin_admin.asp" target="admin">管员管理</a> <a href="admin_admin.asp?
action=newadmin" target="admin">添加管员</a><br>
</td></tr></table>
<table width="100%" align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d><tr class="titleleft" height="22" onclick="document.all.data.style.display=(document.all.data.
style.display =='none')?'':'none'">
<td><b> <img src=img/admin.gif border=0 width=15 height=15 align=absMiddle> 数据管理</b></td></tr>
<tr class=bg height="36" id=data style="display:none">
<td style="line-height:150%">
√ <a href="admin_data.asp?action=godata" target="admin">压缩数据库</a><br>
√ <a href="admin_data.asp?action=backdata" target="admin">备份数据库</a><br>
√ <a href="admin_data.asp?action=redata" target="admin">恢复数据库</a><br>
√ <a href="admin_data.asp?action=resetdata" target="admin">系统初始化</a><br>
</td></tr></table>
<table width="100%" align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d>
<tr class="titleleft" height="22"><td><b> <img src=img/admin_copy.gif border=0
width=15 height=15 align=absMiddle> 版权所有</b></td></tr>
<tr class=bg height="36"><td style="line-height:150%;">
程序设计：马甸<br>
官方网站：<a href=http://www.htbenet.net=_blank>马甸中心</a> <br>
当前版本：V1.0
</td></tr></table>
</td>
<td style="cursor:hand;" onclick="document.all.bar.style.display=(document.all.bar.style.
display =='none')?'':'none'" class=3d></td>
<td valign="top">
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
<tr><td valign="top">
<IFRAME name="admin" scrolling=auto frameSpacing="0" src="admin.asp?action=welcome" frameBorder="0"
width="100%" height="100%">
</IFRAME></td></tr></table></td>
</tr></table></body></html>
<%elseif request("action")="help" then%>
<link rel="STYLESHEET" type="text/css" href="img/admin.css">
<br><br>
<ul>
<li style=color:red>关于增加记录？
<li>增加记录前必须先要添加栏目分类。
<li>增加记录前必须要把相关的选项添完。
</ul>
<ul>
<li style=color:red>关于频道和菜单？
<li>添加频道后要把频道地址插入到菜单管理。
<li>增加记录前必须要把相关的选项添完。
</ul>
<ul>
<li style=color:red>关于皮肤管理？
<li>皮肤系统可以无限制的增加皮肤。<br>您只要在官方下载皮肤后直接上传到skin文件夹，上传成功后
即到后台添加皮肤名称和皮肤地址，这样就可以使用该皮肤了！
<li>默认皮肤要在网站设置里修改！
</ul><ul>
<li style=color:red>关于用户管理？
<li>您可以任意查看用户相关数据。
<li>可以为用户增加点数！
</ul>
<ul>
<li style=color:red>关于数据库管理？
<li>可以实现在线数据库压缩、备份、恢复。
<li>数据库可以初始化，就是把记录清空！
</ul>
<ul>
<li style=color:red>怎样修改数据库路径？
<li>第一步：要在后台的网站设置里修改数据库路径。
<li>第二步：然后修改您的服务器（就是实际的路径）路径。[注意哦！是相对路径，如data/ht.mdb]！
</ul>
<%elseif request("action")="welcome" then%>
<link rel="STYLESHEET" type="text/css" href="img/admin.css">
<body >
<script src=img/adminjs.js></script>
<br>
<table width="600" align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d>
<tr class="title" height="22"><td><b> <img src=img/ie.gif border=0 width=15 height=15
align=absMiddle> 本程序由[<font color="#C0C0C0">北大</font>]授权给[<font color="#C0C0C0">
北大青鸟(华腾教育)培训中心</font>]使用。</td></tr>
<tr class=bg height="100"><td STYLE="BACKGROUND:#444444;PADDING:0PX">
<img src=img/adminwelcome.gif border=0></td></tr>
<tr><td class="hr"></td></tr><TR>
<TD class=bg><br>
<center><button class=button onclick="document.all.size.style.
display=(document.all.size.style.display =='none')?'':'none'" style=height:30>占用空间情况</button>
<button style=height:30 class=button onclick="document.all.dll.style.display=(document.all.dll
.style.display =='none')?'':'none'">组件支持情况</button>
<button style=height:30 class=button onclick="document.all.host.style.display=(document.all
.host.style.display =='none')?'':'none'">主机环境情况</button></center><br>
<center>
<button style=height:30 class=button onclick="location.href='admin_sqlin.asp
';">查看注入信息</button>
<button style=height:30 class=button onclick="location.href='admin_asp.asp'
;">快速设置网站</button>
<button style=height:30 class=button onclick="location.href='admin_link.asp'
;">审核友情连接</button></center><br>
</tr>
<tr><td class="hr"></td></tr>
<tr>
<td calss=bg style=line-height:180%>
程序开发：北大青鸟<br>
产品名称：北大青鸟(华腾教育)培训中心网站管理系统<br>
产品负责：程序初作：网络工程师 二次制作： java软件开发 美工处理：计算机培训 <br>
当前版本：Professional Version 1.0 <br>
Q Q：738169456<br>
电子信箱：738169456@qq.com<br>
官方网站：<a href="http://www.htbenet.net" target="_blank">http://www.htbenet.net</a><br>
</tr>
<tr><td class="hr"></td></tr><tr><td calss=bg>
<center><br>
Power By 北大 Design Studio <br>
Copyright (c) 2005-2008 4000-777-016. All Rights Reserved .</center>
<br>
</TD></TR>
</table>
<%
sub othersize(names)
set fso=server.CreateObject("scripting.filesystemobject")
path=server.mappath("images")
ml=left(path,(instrrev(path,"\")-1))&"\"&names
set d=fso.getfolder(ml)
mlsize=d.size
size=mlsize
dx=size & " Byte"
if size>1024 then
size=(Size/1024)
dx=formatnumber(size,2) & " KB"
end if
if size>1024 then
size=(size/1024)
dx=formatnumber(size,2) & " MB"
end if
if size>1024 then
size=(size/1024)
dx=formatnumber(size,2) & " GB"
end if
response.write dx
end sub
sub allsize()
set fso=server.CreateObject("scripting.filesystemobject")
path=server.mappath("index.asp")
ml=left(path,(instrrev(path,"\")-1))
set d=fso.getfolder(ml)
mlsize=d.size
size=mlsize
dx=size & " Byte"
if size>1024 then
size=(Size/1024)
dx=size & " KB"
end if
if size>1024 then
size=(size/1024)
dx=formatnumber(size,2) & " MB"
end if
if size>1024 then
size=(size/1024)
dx=formatnumber(size,2) & " GB"
end if
response.write dx
end sub
Function Drawbar(drvpath)
dim fso,drvpathroot,d,size,totalsize,barsize
set fso=server.createobject("scripting.filesystemobject")
drvpathroot=server.mappath("images")
drvpathroot=left(drvpathroot,(instrrev(drvpathroot,"\")-1))
set d=fso.getfolder(drvpathroot)
totalsize=d.size
drvpath=server.mappath(drvpath)
set d=fso.getfolder(drvpath)
size=d.size
barsize=cint((size/totalsize)*400)
Drawbar=barsize
End Function
%>
<table width="95%" align=center border="0" cellpadding="0" cellspacing="0" rules=none
class=3d id=size style="position:absolute;
left:30;top:300;width:680;display:none">
<tr onmousedown="MDown(size)" style="cursor:move" height=22><td colspan="2" class=title><b> <img src=img/ie.gif border=0 width=15 height=15 align=absMiddle> 系统占用空间情况(全部：
<%allsize()%>)</b>
<img onclick="document.all.size.style.display=(document.all.size.style.display=='none')?'
':'none'" style="position:absolute;right:2
;top:5;cursor:hand" border="0"
src="img/adminclose.gif" align=absMiddle></td></tr>
<tr class=bg>
<td height="25" align="center" width=100>系统图片占用：</td>
<td><img src="img/bar.gif" width=<%=Drawbar("img")%> height=10> <%othersize("img")%></td>
</tr>
<tr class=bg>
<td height="25" align="center">系统皮肤占用：</td>
<td><img src="img/bar.gif" width=<%=Drawbar("skin")%> height=10> <%othersize("skin")%></td>
</tr>
<tr class=bg>
<td height="25" align="center">上传新闻占用：</td>
<td><img src="img/bar.gif" width=<%=Drawbar("up/news")%> height=10> <%othersize("up/news")%></td>
</tr>
<tr class=bg>
<td height="25" align="center">上传文章占用：</td>
<td><img src="img/bar.gif" width=<%=Drawbar("up/art")%> height=10> <%othersize("up/art")%></td>
</tr>
<tr class=bg>
<td height="25" align="center">上传图片占用：</td>
<td><img src="img/bar.gif" width=<%=Drawbar("up/pic")%> height=10> <%othersize("up/pic")%></td>
</tr>
<tr class=bg>
<td height="25" align="center">上传娱乐占用：</td>
<td><img src="img/bar.gif" width=<%=Drawbar("up/dj")%> height=10> <%othersize("up/dj")%></td>
</tr><tr class=bg>
<td height="25" align="center" >上传软件占用：</td>
<td><img src="img/bar.gif" width=<%=Drawbar("up/down")%> height=10> <%othersize("up/down")%></td>
</tr><tr class=bg>
<tr class=bg>
<td height="25" align="center" >系统数据占用：</td>
<td><img src="img/bar.gif" width=<%=Drawbar("data")%> height=10> <%othersize("data")%></td>
</tr><tr class=bg>
<td height="25" align="center">论坛目录占用：</td>
<td><img src="img/bar.gif" width=<%=Drawbar("bbs")%> height=10> <%othersize("bbs")%></td>
</tr>
</table><%call br%>
<table width="95%" align=center border="0" cellpadding="0" cellspacing="0" rules=none
class=3d id=host
style="position:absolute;left:50;top:50;width:550;height:300;display:none;">
<tr>
<td style="cursor:move" colspan="2" height="22" class=title onmousedown=MDown(host)><b>
<img src=img/ie.gif border=0 width=15 height=15 align=absMiddle> 主机环境变量</b>
<img onclick="document.all.host.style.display=(document.all.host.style.display =='none')?'':'none'"
style="position:absolute;right:2;top:5;cursor:hand"
border="0" src="img/adminclose.gif" align=absMiddle></td>
</tr>
<tr class=bg><td height="25" align="center" width="57%">项目</td><td align="center">
值</td></tr>
<tr class=bg>
<td height="25" width="57%"> 服务器的域名</td>
<td height="25"> <%=Request.ServerVariables("server_name")%> </td>
</tr>
<tr class=bg>
<td height="25" width="57%"> 服务器的IP地址</td>
<td height="25"> <%=Request.ServerVariables("LOCAL_ADDR")%> </td>
</tr>
<tr class=bg>
<td height="25" width="57%"> 服务器操作系统</td>
<td height="25"> <%=Request.ServerVariables("OS")%> </td>
</tr>
<tr class=bg>
<td height="25" width="57%"> 服务器解译引擎</td>
<td height="25"> <%=ScriptEngine & "/"& ScriptEngineMajorVersion &"."&ScriptEngin
eMinorVersion&"."& ScriptEngineBuildVersion %> </td>
</tr>
<tr class=bg>
<td height="25" width="57%"> 服务器软件的名称及版本</td>
<td height="25"> <%=Request.ServerVariables("SERVER_SOFTWARE")%> </td>
</tr>
<tr class=bg>
<td height="25" width="57%"> 服务器正在运行的端口</td>
<td height="25"> <%=Request.ServerVariables("server_port")%> </td>
</tr>
<tr class=bg>
<td height="25" width="57%"> 服务器CPU数量</td>
<td height="25"> <%=Request.ServerVariables("NUMBER_OF_PROCESSORS")%> 个</td>
</tr>
<tr class=bg>
<td width="57%"> 服务器Application数量</td>
<td height="25"> <%=Application.Contents.Count%> 个</td>
</tr>
<tr class=bg>
<td height="25" width="57%"> 服务器Session数量</td>
<td > <%=Session.Contents.Count%> 个</td>
</tr>
<tr class=bg>
<td height="25" width="57%"> 请求的物理路径</td>
<td height="25"> <%=Request.ServerVariables("path_translated")%> </td>
</tr>
<tr class=bg>
<td height="25" width="57%"> 请求的URL</td>
<td width="66%" height="25"> http://<%=Request.ServerVariables("server_name")%>
<%=Request.ServerVariables("script_name")%></td>
</tr>
<tr class=bg>
<td height="25" width="57%"> 服务器当前时间</td>
<td height="25"> <%=now()%> </td>
</tr>
<tr class=bg>
<td height="25" width="57%"> 脚本连接超时时间</td>
<td height="25"> <%=Server.ScriptTimeout%> 秒</td>
</tr>
</table><%call br%>
<table width="95%" id="dll" align=center border="0" cellpadding="0" cellspacing="0"
rules=none class=3d
style="position:absolute;left:50;top:50;width:550;height:300;display:none">
<tr style="cursor:move"><td colspan="2" height="22" class=title onmousedown=MDown(dll)>
<b> <img src=img/ie.gif border=0
width=15 height=15 align=absMiddle> 组件支持情况</b><img style="position:absolute;right:2;
top:5;cursor:hand" border="0" src="img/adminclose.gif" align=
absMiddle onclick="document.all.dll.style.display=(document.all.dll.style.display =='none')?'':'none'"></td>
</tr>
<tr class=bg>
<td width="57%" height=25 align=center> 组件名称</td><td width="41%" align=center>支持及版本</td>
</tr>
<%
Dim theInstalledObjects(16)
theInstalledObjects(0) = "MSWC.AdRotator"
theInstalledObjects(1) = "MSWC.BrowserType"
theInstalledObjects(2) = "MSWC.NextLink"
theInstalledObjects(3) = "MSWC.Tools"
theInstalledObjects(4) = "MSWC.Status"
theInstalledObjects(5) = "MSWC.Counters"
theInstalledObjects(6) = "MSWC.PermissionChecker"
theInstalledObjects(7) = "Scripting.FileSystemObject"
theInstalledObjects(8) = "adodb.connection"
theInstalledObjects(9) = "SoftArtisans.FileUp"
theInstalledObjects(10) = "SoftArtisans.FileManager"
theInstalledObjects(11) = "JMail.Message"
theInstalledObjects(12) = "CDONTS.NewMail"
theInstalledObjects(13) = "Persits.MailSender"
theInstalledObjects(14) = "LyfUpload.UploadFile"
theInstalledObjects(15) = "Persits.Upload.1"
theInstalledObjects(16) = "w3.upload"
For i=0 to 16
Response.Write "<TR class=bg><TD> " & theInstalledObjects(i) & "<font color=888888> "
select case i
case 7
Response.Write "(FSO 文本文件读写)"
case 8
Response.Write "(ACCESS 数据库)"
case 9
Response.Write "(SA-FileUp 文件上传)"
case 10
Response.Write "(SA-FM 文件管理)"
case 11
Response.Write "(JMail 邮件发送)"
case 12
Response.Write "(WIN虚拟SMTP 发信)"
case 13
Response.Write "(ASPEmail 邮件发送)"
case 14
Response.Write "(LyfUpload 文件上传)"
case 15
Response.Write "(ASPUpload 文件上传)"
case 16
Response.Write "(w3 upload 文件上传)"
end select
Response.Write "</font></td><td height=25>"
If Not IsObjInstalled(theInstalledObjects(i)) Then
Response.Write "<font color=red><b>×</b></font>"
Else
Response.Write "<b>√</b> " & getver(theInstalledObjects(i)) & ""
End If
Response.Write "</td></TR>" & vbCrLf
Next
%>
</table>
<%
Function IsObjInstalled(strClassString)
On Error Resume Next
IsObjInstalled = False
Err = 0
Dim xTestObj
Set xTestObj = Server.CreateObject(strClassString)
If 0 = Err Then IsObjInstalled = True
Set xTestObj = Nothing
Err = 0
End Function
''''''''''''''''''''''''''''''
Function getver(Classstr)
On Error Resume Next
getver=""
Err = 0
Dim xTestObj
Set xTestObj = Server.CreateObject(Classstr)
If 0 = Err Then getver=xtestobj.version
Set xTestObj = Nothing
Err = 0
End Function
%><br>
<%end if
else%>
<HTML><HEAD><TITLE>后台登陆</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="img/admin.css" type=text/css rel=stylesheet>
<script language=javascript>
function login(){
if (document.form1.adminname.value==""){alert("请输入用户名？");document.form1.adminname.
focus();return false}
if (document.form1.adminpass.value==""){alert("请输入密码？");document.form1.adminpass.
focus();return false}
if (document.form1.s.value==""){alert("请输入验证码？");document.form1.s.focus();
return false}
return true}
</script>
</HEAD>
<body onkeydown=return(!(event.keyCode==78&&event.ctrlKey)) scroll=no><br><br><br>
<table width="300" align=center border="0" cellpadding="0" cellspacing="0" rules=none
class=3d><tr class="uptitle" height="22"><td><b> <img src=img/ie.gif border=0
width=15 height=15 align=absMiddle> 北大青鸟(华腾教育)培训中心网站后台登陆
</b></td></tr>
<tr class="bg"><td><img src=img/adminlogin.gif border=0 align=absMiddle>
</td></tr><tr><td class="hr"></td></tr>
<tr>
<TD height=25 align=center><form name="form1" method="post" action="admin
.asp?action=login" onsubmit="return login()">
用户名：<input type="text" name="adminname" style=width:150px autocomplete="off"
class="ht"></td></tr><tr><td height=25 align=center>
密 码：<input type="password" name="adminpass" style=width:150px class="ht">
</td></tr><tr><td height=25 align=center>
认证码：<input name="code" type="text" size="7" maxlength="4" class="ht">
<img src="inc/code.asp" style="width:40;
height=15" border=0 align=absmiddle><%call br%></td></tr><tr><td height=25 align=center>
<input type="submit" name="Submit" value="登 录" class="adminbutton">
<input type="reset" name="reset" value="清 空" class="adminbutton">
</TD></TR>
<tr><td class="hr"></td></tr><TR>
<TD height=22 ALIGN=RIGHT> Copyright©2004-2005 北大 Design Studio </TD></TR>
</table>
</body></html>
<%end if
call closedata()%>
ASP.NET 源代码仅供参考，可以当做学习资料讨论使用，勿做他用
