⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 theme.asp

📁 应用于高等院校党团思想教育
💻 ASP
字号:

<script language="javascript">
function openScript(url, width, height) {
        var Win = window.open(url,"openScript",'width=' + width + ',height=' + height + ',resizable=0,scrollbars=no,top=20,menubar=no,status=no' );
}

function PopWindow()
{ 
openScript('messanger.asp?action=newmsg',420,320); 
}
var nn = !!document.layers;
var ie = !!document.all;

if (nn) {
  netscape.security.PrivilegeManager.enablePrivilege("UniversalSystemClipboardAccess");
  var fr=new java.awt.Frame();
  var Zwischenablage = fr.getToolkit().getSystemClipboard();
}
function a(){
el=event.srcElement
if (el.tagName=='A') el.target=(globalTarget.value)
}

function JM_setTarget(){
globalTarget.value=(globalTarget.value=='_blank')?'':'_blank';
globalTarget.children[0].src=(globalTarget.value=='')?'<%=ForumUrl%><%=picurl%>w.gif':'<%=ForumUrl%><%=picurl%>nw.gif';
setVMcookie(globalTarget.value);
}
function submitonce(theform){
//if IE 4+ or NS 6+
if (document.all||document.getElementById){
//screen thru every element in the form, and hunt down "submit" and "reset"
for (i=0;i<theform.length;i++){
var tempobj=theform.elements[i]
if(tempobj.type.toLowerCase()=="submit"||tempobj.type.toLowerCase()=="reset")
//disable em
tempobj.disabled=true
}
}
}
</script>
<script> 
var currentpos,timer; 
function initialize() 
{timer=setInterval("scrollwindow()",1);} 
function sc(){clearInterval(timer);} 
function scrollwindow() 
{currentpos=document.body.scrollTop; window.scroll(0,++currentpos); 
if (currentpos != document.body.scrollTop) sc();} 
document.onmousedown=sc 
document.ondblclick=initialize 
function New(para_URL) 
{var URL =new String(para_URL) 
window.open(URL,'','resizable,scrollbars')} 
</SCRIPT>
<script language="JavaScript1.2"> 
NS6 = (document.getElementById&&!document.all) 
IE = (document.all) 
NS = (navigator.appName=="Netscape" && navigator.appVersion.charAt(0)=="4") 
tempBar='';barBuilt=0;ssmItems=new Array(); 
moving=setTimeout('null',1) 
function moveOut() { 
if ((NS6||NS)&&parseInt(ssm.left)<0 || IE && ssm.pixelLeft<0) { 
clearTimeout(moving);moving = setTimeout('moveOut()', slideSpeed);slideMenu(10)} 
else {clearTimeout(moving);moving=setTimeout('null',1)}}; 
function moveBack() {clearTimeout(moving);moving = setTimeout('moveBack1()', waitTime)} 
function moveBack1() { 
if ((NS6||NS) && parseInt(ssm.left)>(-menuWidth) || IE && ssm.pixelLeft>(-menuWidth)) { 
clearTimeout(moving);moving = setTimeout('moveBack1()', slideSpeed);slideMenu(-10)} 
else {clearTimeout(moving);moving=setTimeout('null',1)}} 
function slideMenu(num){ 
if (IE) {ssm.pixelLeft += num;} 
if (NS||NS6) {ssm.left = parseInt(ssm.left)+num;} 
if (NS) {bssm.clip.right+=num;bssm2.clip.right+=num;}} 
function makeStatic() { 
if (NS||NS6) {winY = window.pageYOffset;} 
if (IE) {winY = document.body.scrollTop;} 
if (NS6||IE||NS) { 
if (winY!=lastY&&winY>YOffset-staticYOffset) { 
smooth = .2 * (winY - lastY - YOffset + staticYOffset);} 
else if (YOffset-staticYOffset+lastY>YOffset-staticYOffset) { 
smooth = .2 * (winY - lastY - (YOffset-(YOffset-winY)));} 
else {smooth=0} 
if(smooth > 0) smooth = Math.ceil(smooth); 
else smooth = Math.floor(smooth); 
if (IE) bssm.pixelTop+=smooth; 
if (NS6||NS) bssm.top=parseInt(bssm.top)+smooth 
lastY = lastY+smooth; 
setTimeout('makeStatic()', 1)}} 

function buildBar() { 
if(barText.indexOf('<IMG')>-1) {tempBar=barText} 
else{for (b=0;b<barText.length;b++) {tempBar+=barText.charAt(b)+"<BR>"}} 
document.write('<td align="center" rowspan="'+ssmItems.length+1+'" width="'+barWidth+'" bgcolor="'+barBGColor+'" valign="'+barVAlign+'"><p align="center"><font face="'+barFontFamily+'" Size="'+barFontSize+'" COLOR="'+barFontColor+'"><B>'+tempBar+'</B></font></p></TD>')}

function initSlide() { 
if (NS6){ssm=document.getElementById("thessm").style;bssm=document.getElementById("basessm").style; 
bssm.clip="rect(0 "+document.getElementById("thessm").offsetWidth+" "+document.getElementById("thessm").offsetHeight+" 0)";ssm.visibility="visible";} 
else if (IE) {ssm=document.all("thessm").style;bssm=document.all("basessm").style 
bssm.clip="rect(0 "+thessm.offsetWidth+" "+thessm.offsetHeight+" 0)";bssm.visibility = "visible";} 
else if (NS) {bssm=document.layers["basessm1"]; 
bssm2=bssm.document.layers["basessm2"];ssm=bssm2.document.layers["thessm"]; 
bssm2.clip.left=0;ssm.visibility = "show";} 
if (menuIsStatic=="yes") makeStatic();}

function buildMenu() {
	if (IE||NS6) {document.write('<DIV ID="basessm" style="visibility:hidden;Position : Absolute ;Left : '+XOffset+' ;Top : '+YOffset+' ;Z-Index : 20;width:'+(menuWidth+barWidth+10)+'"><DIV ID="thessm" style="Position : Absolute ;Left : '+(-menuWidth)+' ;Top : 0 ;Z-Index : 20;" onmouseover="moveOut()" onmouseout="moveBack()">')} 
	if (NS) {document.write('<LAYER name="basessm1" top="'+YOffset+'" LEFT='+XOffset+' visibility="show"><ILAYER name="basessm2"><LAYER visibility="hide" name="thessm" bgcolor="'+menuBGColor+'" left="'+(-menuWidth)+'" onmouseover="moveOut()" onmouseout="moveBack()">')} 
	if (NS6){document.write('<table border="0" cellpadding="0" cellspacing="0" width="'+(menuWidth+barWidth+2)+'" bgcolor="'+menuBGColor+'"><TR><TD>')}
	document.write('<table border="0" cellpadding="0" cellspacing="1" width="'+(menuWidth+barWidth+2)+'" bgcolor="'+menuBGColor+'">');

	for(i=0;i<ssmItems.length;i++) {
		if (!ssmItems[i][3]) {
			ssmItems[i][3]=menuCols;ssmItems[i][5]=menuWidth-1
		} else if(ssmItems[i][3]!=menuCols) ssmItems[i][5]=Math.round(menuWidth*(ssmItems[i][3]/menuCols)-1);
		if (ssmItems[i-1]&&ssmItems[i-1][4]!="no") {
			document.write('<TR>')
		}
		if (!ssmItems[i][1]) {
			document.write('<td bgcolor="'+hdrBGColor+'" HEIGHT="'+hdrHeight+'" ALIGN="'+hdrAlign+'" VALIGN="'+hdrVAlign+'" WIDTH="'+ssmItems[i][5]+'" COLSPAN="'+ssmItems[i][3]+'"> <font face="'+hdrFontFamily+'" Size="'+hdrFontSize+'" COLOR="'+hdrFontColor+'"><b>'+ssmItems[i][0]+'</b></font></td>');
		} else {
			if(!ssmItems[i][2]) ssmItems[i][2]=linkTarget;
//			document.write('<TD BGCOLOR="'+linkBGColor+'" onmouseover="bgColor=\''+linkOverBGColor+'\'" onmouseout="bgColor=\''+linkBGColor+'\'" HEIGHT="'+hdrHeight+'" WIDTH="'+ssmItems[i][5]+'" COLSPAN="'+ssmItems[i][3]+'" style="Cursor:hand;" ALIGN="'+linkAlign+'" onclick="location.href=\''+ssmItems[i][1]+'\'"><FONT face="'+linkFontFamily+'" Size="'+linkFontSize+'">'+ssmItems[i][0]+'</TD>');
			document.write('<TD BGCOLOR="'+linkBGColor+'" onmouseover="bgColor=\''+linkOverBGColor+'\'" onmouseout="bgColor=\''+linkBGColor+'\'" HEIGHT="'+hdrHeight+'" WIDTH="'+ssmItems[i][5]+'" COLSPAN="'+ssmItems[i][3]+'"><ILAYER><LAYER onmouseover="bgColor=\''+linkOverBGColor+'\'" onmouseout="bgColor=\''+linkBGColor+'\'" WIDTH="100%" ALIGN="'+linkAlign+'"><DIV ALIGN="'+linkAlign+'"><FONT face="'+linkFontFamily+'" Size="'+linkFontSize+'"><A HREF="'+ssmItems[i][1]+'" target="'+ssmItems[i][2]+'" CLASS="ssmItems">'+ssmItems[i][0]+'</DIV></LAYER></ILAYER></TD>');
		}
			

		if (ssmItems[i][4]!="no"&&barBuilt==0) {buildBar();barBuilt=1;}
		if (ssmItems[i][4]!="no") {document.write('</TR>')}
	}
	document.write('</table>') 
	if (NS6){document.write('</TD></TR></TABLE>')} 
	if (IE||NS6) {document.write('</DIV></DIV>')} 
	if (NS) {document.write('</LAYER></ILAYER></LAYER>')} 

	theleft=-menuWidth;
	lastY=0;
	setTimeout('initSlide();', 1);
} 

YOffset=50; 
XOffset=1; 
staticYOffset=30; 
slideSpeed=12 
waitTime=100; 
staticMode="advanced"
menuHeader="功能菜单"
menuBGColor="#FF8000"; 
menuIsStatic="yes"; 
menuWidth=100; 
menuCols=2; 
hdrFontFamily="宋体, Arial, Helvetica"; 
hdrFontSize="1"; 
hdrFontColor="#333333"; 
hdrBGColor="#FFDFD0"; 
hdrAlign="center"; 
hdrVAlign="center"; 
hdrHeight="20"; 
linkFontFamily="宋体, Arial, Helvetica"; 
linkFontSize="1"; 
linkBGColor="#F7EAEA"; 
linkOverBGColor="#FAF3F3"; 
linkTarget="_top"; 
linkAlign="center"; 
barBGColor="#FFDFD0"; 
barFontFamily="宋体, Arial, Helvetica"; 
barFontSize="1"; 
barFontColor="#333333"; 
barVAlign="center"; 
barWidth=15; 
barText="一品网在线功能菜单";
ssmItems[0]=["功能菜单", "", ""] 
ssmItems[1]=["一品首页", "../", ""]
ssmItems[2]=["信息平台", "loginout.asp?mode=login", ""]
ssmItems[3]=["免费上网", "pop_profile.asp?mode=Edit", ""] 
ssmItems[4]=["企业名录", "policy.asp", ""] 
ssmItems[5]=["供求信息", "active.asp", ""] 
ssmItems[6]=["创业指南", "members.asp", ""] 
ssmItems[7]=["企业之家", "events.asp", ""] 
ssmItems[8]=["天天最惠", "bookmark.asp", ""] 
ssmItems[9]=["流行时尚", "active_users.asp", ""] 
ssmItems[10]=["购物广场", "faq.asp", ""]

ssmItems[11]=["时事睇真", "ututu", "",]
ssmItems[12]=["广告管理", "tututu", ""]
	ssmItems[13]=["意见反馈", "index.asp", ""]
	ssmItems[14]=["聊天广场", "admin_mods.asp", ""]
	ssmItems[15]=["网上人才", "admin_announce_home.asp", ""]
	ssmItems[16]=["交友信息", "admin_mods.asp", ""]
	ssmItems[17]=["更多....", "admin_announce_home.asp", ""]
ssmItems[18]=["关于我们", "", "",]
buildMenu();

</script>
<a name="top"></a> 
<table width="95%" align="center" cellspacing="0" cellpadding="1"  border="0" bgcolor='<%=Tablebackcolor%>'>
  <tr>
    <td>
      <table width="100%" cellspacing="0" cellpadding="4" border="0">
        <tr bgcolor='<%=Tabletitlecolor%>'>
          <td valign="middle" align=left>
            <%if session.contents("username")="" then%>
            欢迎您,<a href=login.asp><FONT COLOR=<%=TableFontcolor%>>请先登陆</FONT></a> 
            / <a href="reg.asp"><FONT COLOR=<%=TableFontcolor%>>注册</FONT></a> 
            <%else%>
            欢迎您,<b><%=session.contents("username")%></b> <a href="login.asp"><FONT COLOR=<%=TableFontcolor%>>重登陆</FONT></a> 
            / <a href="javascript:openScript('MYMODIFY.ASP?name=<%=session.contents("username")%>',450,530)"><FONT COLOR=<%=TableFontcolor%>>更改信息</FONT></a> 
            / <a href="javascript:openScript('messanger.asp?action=inbox',420,320)"><FONT COLOR=<%=TableFontcolor%>>短消息</FONT></a> 
            / <a href="favlist.asp"><FONT COLOR=<%=TableFontcolor%>>收藏</FONT></a> 
            <%end if%>
            / <a href="toplist.asp?orders=1"><FONT COLOR=<%=TableFontcolor%>>发贴排行</FONT></a> 
            / <a href="query.asp"><FONT COLOR=<%=TableFontcolor%>>搜索</FONT></a> 
            / <a href="javascript:openScript('help.asp',500,400)"><FONT COLOR=<%=TableFontcolor%>>帮助</FONT></a> 
            / <a href="logout.asp"><FONT COLOR=<%=TableFontcolor%>>退出</FONT></a> 
            / <a href="elogin.asp"><FONT COLOR=<%=TableFontcolor%>>管理</FONT></a> 
            / <a href='#' onMouseOver="window.status='万年历。';return true" onMouseOut="window.status='';return true" onClick="window.open('21-date/999999999.htm','gbook','scrollbars=no,resizable=no,width=700,height=415')" title="万年历"><FONT COLOR=<%=TableFontcolor%>>万年历</font></a> 
            / <a href='#' onMouseOver="window.status='世界时差表。';return true" onMouseOut="window.status='';return true" onClick="window.open('21-date/21-date.htm','gbook','scrollbars=no,resizable=no,width=760,height=430')" title="世界时差表"><FONT COLOR=<%=TableFontcolor%>>世界时差表</font></a> 
          </td>
          <td valign="middle" align=right><FONT COLOR=<%=TableFontcolor%>> <a href="<%=ForumURL%>"><FONT COLOR=<%=TableFontcolor%>><img src="PIC/gohome.gif" border="0" alt="返回一品网首页"></FONT></a></FONT> 
          </td>
            </tr>
        </table>
        </td>
    </tr>
</table>
<table width="95%" align="center" cellspacing="0" cellpadding="1"  border="0" bgcolor='<%=Tablebodycolor%>'>
  <tr>
    <td align=right>
<%
ON ERROR RESUME NEXT
if Cint(incept())>Cint(0) then
	if openmsg=0 then
	response.write "<img src="&picurl&"newmail.gif><a href=javascript:openScript('messanger.asp?action=inbox',420,320)>您有新短消息</a>"
	else
	response.write "<script language=JavaScript>JavaScript:PopWindow()</script>"
	end if
end if
%>
    </td>
  </tr>
</table>
<%
'统计留言
function incept()
incept=0
msgRs=conn.execute("Select Count(id) as msgs From Message Where flag=0 And incept='"&trim(session.contents("username"))&"'")
    incept=msgrs("msgs")
	set msgrs=nothing
	if isnull(incept) then incept=0
end function
function allincept()
msgRs=conn.execute("Select Count(id) as msgs From Message Where flag=0 And incept='"&trim(session.contents("username"))&"'")
    allincept=msgrs("msgs")
	set msgrs=nothing
	if isnull(allincept) then allincept=0
end function
function allsend()
msgRs=conn.execute("Select Count(id) as msgs From Message Where flag=0 And sender='"&trim(session.contents("username"))&"'")
    allsend=msgrs("msgs")
	set msgrs=nothing
	if isnull(allsend) then allsend=0
end function
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -