OfficeXP_menu过程版_PHP教程
<?php
/**
* 仿officexp风格的左边版面列表
* --------------------------------------------------------------------------------
* blood 于 2/19/2002 4:47:11 pm 加贴在 visual basic
*
* 徐祖宁(唠叨) 移植于 2/28/2002
* 更正部分错误
*
*/
if($key == ""):
echo <<<eod
<html>
<head>
<title>menu sample</title>
<script language="javascript">
if (window != top) top.location.href = location.href;
</script>
</head>
<frameset cols="161,*">
<frame marginwidth="0" src="$php_self?key=menu" name="menu" scrolling=no noresize>
<frame marginwidth="0" src="$php_self?key=about" name="main" scrolling=auto noresize>
</frameset>
</html>
eod;
endif;
if($key == "menu"):
/**
*
* $menuon 定义分类菜单数目
* $menubackcolor 定义分类菜单背景颜色
* $menufontsize 定义分类菜单字体
* $menubarheight 定义分类菜单高度
* $itemtextcolor 定义分类菜单项目文字颜色
* $itembackcolor 定义分类菜单项目背景颜色
* $topmenuheight 定义分类菜单与顶部的间距
* $selecteditemdarkborder 定义分类菜单项目在鼠标移动到上面时的暗边框颜色
* $selecteditemlightborder 定义分类菜单项目在鼠标移动到上面时的亮边框颜色
* $selecteditembackgroundcolor 定义分类菜单项目在鼠标移动到上面时的背景颜色
* $menusubsectionbackcolor 定义二级菜单背景颜色
* $menusubsectionfontcolor 定义二级菜单菜单字体颜色
* $deftarget 定义菜单项目超连接默认目标框架
*/
$topmenuheight = 0; //设置分类菜单与顶部的间距
$menubarheight = 20; //设置分类菜单高度
$menufontsize = "9pt"; //设置菜单字体大小
//我们使用仿office xp风格的外观，也可以使用普通外观。
$menu_mode = false;
if($menu_mode) {
//普通菜单外观
$menubackcolor = "lightgrey"; //设置背景颜色
$itembackcolor = "#7f7f7f"; //设置菜单项目背景色
$itemtextcolor = "#ffffff"; //设置菜单项目文字颜色
$selecteditemdarkborder = "#ffffff"; //设置菜单项目在鼠标移动到上面时的暗边框颜色
$selecteditemlightborder = "#000000"; //设置菜单项目在鼠标移动到上面时的亮边框颜色
$selecteditembackgroundcolor = ""; //设置菜单项目在鼠标移动到上面时的背景颜色
$menusubsectionbackcolor = "lightgrey"; //设置二级菜单背景颜色
$menusubsectionfontcolor="black"; //设置二级菜单字体颜色
}else {
//仿office xp风格外观
$menubackcolor = "lightgrey"; //设置背景颜色
$itembackcolor = "lightgrey"; //设置菜单项目背景色
$itemtextcolor = "#000000"; //设置菜单项目文字颜色
$selecteditemdarkborder = "#08246b"; //设置菜单项目在鼠标移动到上面时的暗边框颜色
$selecteditemlightborder = "#08246b"; //设置菜单项目在鼠标移动到上面时的亮边框颜色
$selecteditembackgroundcolor = "#b5bed6"; //设置菜单项目在鼠标移动到上面时的背景颜色
$menusubsectionbackcolor = "darkgray"; //设置二级菜单背景颜色
$menusubsectionfontcolor = "black"; //设置二级菜单字体颜色
}
$deftarget = "main"; //设置菜单项目超连接默认目标框架
echo <<<eod
<style>
td { font-size: $menufontsize; font-family:"verdana", "arial", "宋体"; }
</style>
<body leftmargin=0 topmargin=0 rightmargin=0 bgcolor="$menubackcolor">
eod;
$menuon = 0; //对菜单数目初始化
/**
* 绘制菜单方法：
* menustartsection($seq, $label)
* 制作分类菜单
* $seq = 分类菜单序列号，使用菜单序列号控制启动是显示顺序
* $label = 分类菜单标题
* menuadditem($label, $description, $url, $target="")
* 制作菜单项目
* $label = 项目标题
* $description = 项目简介
* $url = 超连接地址
* $target = 超连接目标框架，默认为$deftarget
* menuaddsubsection($label)
* 制作二级分类菜单。
* $label = 二级分类菜单标题
* menuaddsubsectionline()
* 制作项目分割线，使用高度为2的图片
* menuendsection()
* 分类菜单结束
* menusectionasitem($label, $description, $url, $target="")
* 制作带超连接的分类菜单，类似菜单项目，可以直接使用
* $label = 分类菜单标题
* $description = 分类菜单简介
* $url = 超连接地址
* $target = 超连接目标框架，默认为$deftarget
*/
/**
* 函数定义
*/
function menuadditem($itemlabel, $statustext, $url, $target="") {
global $deftarget,
$selecteditemdarkborder,
$selecteditemlightborder,
$itemtextcolor,
$selecteditembackgroundcolor,
$menufontsize ;
if($target == "") $target = $deftarget;
$url = rawurldecode($url);
echo <<<eod
<tr><td width="100%" align=left style="cursor:hand;" title="$statustext" onmouseover="this.bordercolordark=$selecteditemdarkborder;this.bordercolorlight=$selecteditemlightborder;this.style.backgroundcolor=$selecteditembackgroundcolor;this.style.color=black;status=$statustext;" onmouseout="this.bordercolordark=;this.bordercolorlight=;this.style.backgroundcolor=;status=;" onclick="window.open($url,$target);"><font color="$itemtextcolor">$itemlabel</font></td></tr>
eod;
}
function menuaddsubsection($itemlabel) {
global $menusubsectionbackcolor,
$menufontsize,
$menusubsectionfontcolor;
echo <<<eod
<tr bgcolor="$menusubsectionbackcolor"><td align=center width="100%"><font color="$menusubsectionfontcolor">$itemlabel</font></td></tr>
eod;
}
function menuaddsubsectionline() {
echo <<<eod
<tr valign="center">
<td align=center width="100%" height="2" bgcolor="white">
<table border=0 cellspacing=0 cellpadding=0 width="100%" height="1">
<tr valign="center" height="2">
<td bgcolor="white"></td>
</tr>
</table>
</td>
</tr>
eod;
}
function menusectionasitem($sectionseq, $sectionname, $sectiondesc, $url, $target="") {
global $deftarget,
$menubackcolor,
$menubarheight,
$menufontsize;
if($target == "") $target = $deftarget;
$url = rawurldecode($url);
$mh = $menubarheight-2;
echo <<<eod
<table border=0 cellspacing=0 cellpadding=0 width="100%" height="1">
<tr valign="center" height="1">
<td bgcolor="white"></td>
</tr>
</table>
<table bgcolor="$menubackcolor" border=1 cellspacing=0 cellpadding=0 bordercolor="$menubackcolor" width="100%" height="smh">
<tr height="100%" valign="center">
<td border=3 valign="middle" width="100%" height="100%" bordercolordark=lightgrey bordercolorlight=lightgrey align=center style="cursor:hand;" title="$sectiondesc" onmouseover="status=$sectiondesc;" onmouseout="status=;" onclick="window.open($url,$target);"><font color="#000000">$sectionname</font></td>
</tr>
</table>
<table border=0 cellspacing=0 cellpadding=0 width="100%" height="1">
<tr height="1">
<td bgcolor="black"></td>
</tr>
</table>
eod;
}
function menustartsection($sectionseq, $sectionname) {
global $menubackcolor,
$menubarheight,
$menufontsize,
$menusection,
$itembackcolor;
$mh = $menubarheight-2;
echo <<<eod
<table bgcolor="$menubackcolo" border=0 cellspacing=0 cellpadding=0 width="100%" height="1">
<tr height="1">
<td bgcolor="white"></td>
</tr>
</table>
<table bgcolor="$menubackcolor" border=1 cellspacing=0 cellpadding=0 bordercolor="$menubackcolor" width="100%" height="$mh">
<tr valign="center" height="100%">
<td nowrap border=3 width="100%" height="100%" bordercolordark=lightgrey bordercolorlight=lightgrey align=center style="cursor:hand;" title="$sectionname" onmouseover="status=$sectionname;" onmouseout="status=;" onclick="startsection(menusection$sectionseq);">$sectionname</td>
</tr>
</table>
<table border=0 cellspacing=0 cellpadding=0 width="100%" height="1">
<tr height="1">
<td bgcolor="black"></td>
</tr>
</table>
<div name=menusection$sectionseq id=menusection$sectionseq style="display:none;overflow:hidden; height:1px;marginright:0px;">
<table bgcolor=$itembackcolor style="marginright=0px;" border=1 cellspacing=0 cellpadding=0 bordercolor="$itembackcolor" width="100%">
eod;
}
function menuendsection() {
echo <<<eod
</table>
</div>
eod;
}
/**
* 创建菜单
*/
menustartsection(2, "代码世界");
menuadditem("joy asp", "欢迎访问joy asp", "$php_self?key=page&id=joy asp");
menuadditem("java 世界", "欢迎访问java 世界", "$php_self?key=page&id=java 世界");
menuadditem("dotnet 时代", "欢迎访问dotnet 时代", "$php_self?key=page&id=dotnet 时代");
menuadditem("visual basic", "欢迎访问visual basic", "$php_self?key=page&id=visual basic");
menuadditem("delphi", "欢迎访问delphi", "$php_self?key=page&id=delphi");
menuendsection();
menustartsection(3, "开心一刻");
menuadditem("传统笑话", "传统笑话", "$php_self?key=page&id=传统笑话");
menuadditem("近代笑话", "近代笑话", "$php_self?key=page&id=近代笑话");
menuaddsubsection("儿童类");
menuadditem("校园笑话", "校园笑话", "$php_self?key=page&id=校园笑话");
menuadditem("幼儿笑话", "幼儿笑话", "$php_self?key=page&id=幼儿笑话");
menuadditem("少年笑话", "少年笑话", "$php_self?key=page&id=少年笑话");
menuaddsubsectionline();
menuadditem("中学时代笑话", "中学时代笑话", "$php_self?key=page&id=中学时代笑话");
menuaddsubsection("成人笑话");
menuadditem("带颜色的笑话", "带颜色的笑话", "$php_self?key=page&id=带颜色的笑话");
menuadditem("笑话林", "笑话林", "$php_self?key=page&id=笑话林");
menuendsection();
menusectionasitem(3, "菜单简介", "菜单简介", "$php_self?key=about");
menustartsection(1, "个人收藏夹");
menuadditem("dotnet 时代", "欢迎访问dotnet 时代", "$php_self?key=page&id=dotnet 时代");
menuendsection();
// 将个人收藏夹定为启动菜单
$menuon = 4;
/**
* 输出javascript脚本
*/
echo <<<eod
<script language=javascript>
var availheight // 定义可利用的高度
var lastsection // 定义将要打开的菜单关闭
var thissection // 定义当前需要打开的菜单
var timerdelay=15 // 定义并设置延时
var menuactive=false // 测定当前活动的菜单
var visibleheight // 定义显示高度，确定是否显示滚动条
var aniratio // 定义菜单显示滑动的速度
function getsizing() {
// 菜单打开时得到的可利用的高度
availheight=document.body.clientheight-$topmenuheight-($menubarheight*$menuon)
if(availheight<=0) {
lastsection.style.display=none;
}else {
// 改变菜单显示滑动速度的比率
aniratio=0.75; // 设定速度
if(availheight>200) {aniratio=0.667;}
if(availheight>500) {aniratio=0.5;} // 根据可利用高度调整速度
lastsection.style.height=availheight;
lastsection.style.overflow=visible;
lastsection.style.display=;
visibleheight=parseint(lastsection.clientheight);
if(visibleheight>availheight) {lastsection.style.overflow=auto;}else{lastsection.style.overflow=hidden;};
}
}
function slidemenu() {
// 菜单滑动函数
if(parseint(lastsection.style.height)>1) {
lastsection.style.height=parseint(parseint(lastsection.style.height)*aniratio);
thissection.style.height=availheight-parseint(lastsection.style.height);
var movetimer=settimeout("slidemenu()",timerdelay) ;
}else {
// 完成菜单滑动，显示新打开的菜单，隐藏前面以打开的菜单
lastsection.style.display=none;
thissection.style.height=availheight;
menuactive=false;
if (visibleheight>availheight) {thissection.style.overflow=auto;};
thissection.style.marginright=0;
lastsection=thissection;
cleartimeout(movetimer);
}
}
function startsection(thesection) {
// 开始滑动菜单，检测是否对菜单进行单击
if(menuactive==false) {
if(lastsection!=thesection) {
menuactive=true;
thissection=thesection;
lastsection.style.overflow=hidden;
thissection.style.overflow=visible;
thissection.style.display=;
visibleheight=parseint(thissection.clientheight);
thissection.style.overflow=hidden;
thissection.style.display=none;
thissection.style.height=1;
lastsection.style.height=availheight-1;
lastsection.style.display=;
thissection.style.display=;
slidemenu()
}
}
}
window.onresize=getsizing
// 启动时打开默认的序号为第一个的菜单
lastsection=document.all.menusection1;
lastsection.style.display=;
getsizing();
</script>
</body>
eod;
endif;
if($key == "page"):
echo <<<eod
<style>
body { font-size: 9pt; font-family:"verdana", "arial", "宋体"; }
</style>
<body>
<center>
<br>
<br>
欢迎访问 $id
</center>
</body>
eod;
endif;
if($key == "about"):
echo <<<eod
<style>
body { font-size: 9pt; font-family:"verdana", "arial", "宋体"; }
</style>
<body>
<center>
<br>
<br>
关于此菜单
<br>
<br>
说明，此菜单程序只能使用在ie 5以上的版本使用，netspace下不能使用，推荐使用ie 6正式中文版
</center>
</body>
eod;
endif;
?>
Alat AI Hot
Undresser.AI Undress
Apl berkuasa AI untuk mencipta foto bogel yang realistik
AI Clothes Remover
Alat AI dalam talian untuk mengeluarkan pakaian daripada foto.
Undress AI Tool
Gambar buka pakaian secara percuma
Clothoff.io
Penyingkiran pakaian AI
Video Face Swap
Tukar muka dalam mana-mana video dengan mudah menggunakan alat tukar muka AI percuma kami!
Artikel Panas
Alat panas
Notepad++7.3.1
Editor kod yang mudah digunakan dan percuma
SublimeText3 versi Cina
Versi Cina, sangat mudah digunakan
Hantar Studio 13.0.1
Persekitaran pembangunan bersepadu PHP yang berkuasa
Dreamweaver CS6
Alat pembangunan web visual
SublimeText3 versi Mac
Perisian penyuntingan kod peringkat Tuhan (SublimeText3)
Topik panas
iOS 17: Cara menukar gaya jam iPhone dalam mod siap sedia
Sep 10, 2023 pm 09:21 PM
Siap sedia ialah mod skrin kunci yang diaktifkan apabila iPhone dipalamkan ke dalam pengecas dan berorientasikan dalam orientasi mendatar (atau landskap). Ia terdiri daripada tiga skrin berbeza, satu daripadanya dipaparkan masa skrin penuh. Teruskan membaca untuk mengetahui cara menukar gaya jam anda. Skrin ketiga StandBy memaparkan masa dan tarikh dalam pelbagai tema yang boleh anda leret secara menegak. Sesetengah tema juga memaparkan maklumat tambahan, seperti suhu atau penggera seterusnya. Jika anda menahan sebarang jam, anda boleh bertukar antara tema yang berbeza, termasuk Digital, Analog, Dunia, Suria dan Terapung. Terapung memaparkan masa dalam nombor gelembung besar dalam warna yang boleh disesuaikan, Solar mempunyai fon yang lebih standard dengan reka bentuk suar matahari dalam warna yang berbeza, dan Dunia memaparkan dunia dengan menyerlahkan
Kunci versi utama win7 terkini yang tersedia versi 2021
Jul 08, 2023 pm 02:37 PM
Kaedah utama untuk mengaktifkan sistem win7 ultimate adalah melalui kod pengaktifan win7 atau alat pengaktifan win7 Secara amnya, kod pengaktifan win7 tulen memerlukan wang, jadi di manakah saya boleh mencari kunci utama win7 percuma? Hari ini saya akan berkongsi dengan anda beberapa kunci utama win7 terkini yang tersedia untuk mengaktifkan sistem. 1. Kekunci pengaktifan Win7 Ultimate Edition: FJGCP-4DFJD-GJY49-VJBQ7-HYRR2VQ3PY-VRX6D-CBG4J-8C6R2-TCVBD2Y4WT-DHTBF-Q6MMK-KYK6X-VKM6G342DG-6YVWCVR8-CBG4J-8C6R2-TCVBD2Y4WT-DHTBF-Q6MMK-KYK6X-VKM6G342DG-6YJVWC9-DC92D
Apakah yang dimaksudkan dengan atribut identiti dalam SQL?
Feb 19, 2024 am 11:24 AM
Apakah Identity dalam SQL? Contoh kod khusus diperlukan Dalam SQL, Identity ialah jenis data khas yang digunakan untuk menjana nombor penambahan automatik. Ia sering digunakan untuk mengenal pasti setiap baris data dalam jadual. Lajur Identiti sering digunakan bersama dengan lajur kunci utama untuk memastikan setiap rekod mempunyai pengecam unik. Artikel ini akan memperincikan cara menggunakan Identiti dan beberapa contoh kod praktikal. Cara asas untuk menggunakan Identity ialah menggunakan Identit semasa membuat jadual.
Bagaimana SpringBoot memantau peristiwa perubahan kunci redis
May 26, 2023 pm 01:55 PM
1. Gambaran Keseluruhan Fungsi Pemberitahuan ruang kekunci membolehkan pelanggan menerima acara yang mengubah suai perubahan Rediskey dalam beberapa cara dengan melanggan saluran atau corak. Semua arahan yang mengubah suai kunci kekunci. Semua kunci yang menerima perintah LPUSHkeyvalue[value…]. Semua kunci tamat tempoh dalam pangkalan data db. Acara diedarkan melalui fungsi langganan dan penerbitan Redis (pub/sub), jadi semua pelanggan yang menyokong fungsi langganan dan penerbitan boleh terus menggunakan fungsi pemberitahuan ruang kekunci tanpa membuat sebarang pengubahsuaian. Kerana fungsi langganan dan penerbitan semasa Redis menggunakan strategi fireandforget, jika program anda
短视频的定义是什么
Dec 23, 2020 pm 02:56 PM
短视频的定义是指在各种新媒体平台上播放的、适合在移动状态和短时休闲状态下观看的、高频推送的视频内容，一般是在互联网新媒体上传播的时长在5分钟以内的视频；内容融合了技能分享、幽默搞怪、时尚潮流、社会热点、街头采访、公益教育、广告创意、商业定制等主题。短视频有着生产流程简单、制作门槛低、参与性强等特点。
Definisi dan fungsi kunci utama komposit MySQL
Mar 15, 2024 pm 05:18 PM
Kunci utama komposit dalam MySQL merujuk kepada kunci utama yang terdiri daripada pelbagai medan dalam jadual, yang digunakan untuk mengenal pasti setiap rekod secara unik. Tidak seperti kunci utama tunggal, kunci utama komposit dibentuk dengan menggabungkan nilai berbilang medan. Apabila membuat jadual, anda boleh menentukan kunci utama komposit dengan menentukan berbilang medan sebagai kunci utama. Untuk menunjukkan definisi dan fungsi kunci utama komposit, kami mula-mula membuat jadual bernama pengguna, yang mengandungi tiga medan: id, nama pengguna dan e-mel, dengan id ialah kunci utama dan pengguna yang meningkat secara automatik
Apa itu Discuz? Definisi dan pengenalan fungsi Discuz
Mar 03, 2024 am 10:33 AM
"Meneroka Discuz: Definisi, Fungsi dan Contoh Kod" Dengan perkembangan pesat Internet, forum komuniti telah menjadi platform penting untuk orang ramai mendapatkan maklumat dan bertukar pendapat. Di antara banyak sistem forum komuniti, Discuz, sebagai perisian forum sumber terbuka yang terkenal di China, digemari oleh majoriti pembangun dan pentadbir laman web. Jadi, apa itu Discuz? Apakah fungsi yang ada padanya, dan bagaimana ia boleh membantu tapak web kami? Artikel ini akan memperkenalkan Discuz secara terperinci dan melampirkan contoh kod khusus untuk membantu pembaca mengetahui lebih lanjut mengenainya.
Cara membuat sempadan tersuai dalam Microsoft Word
Nov 18, 2023 pm 11:17 PM
Ingin menjadikan muka depan projek sekolah anda kelihatan menarik? Tiada apa-apa yang menonjolkannya daripada penyerahan lain seperti sempadan yang cantik dan elegan pada halaman utama buku kerja anda. Walau bagaimanapun, sempadan satu baris standard dalam Microsoft Word telah menjadi sangat jelas dan membosankan. Oleh itu, kami menunjukkan kepada anda langkah-langkah untuk mencipta dan menggunakan sempadan tersuai dalam dokumen Microsoft Word. Cara Membuat Sempadan Tersuai dalam Microsoft Word Mencipta sempadan tersuai adalah sangat mudah. Walau bagaimanapun, anda memerlukan sempadan. Langkah 1 – Muat Turun Sempadan Tersuai Terdapat banyak sempadan percuma di internet. Kami telah memuat turun sempadan seperti ini. Langkah 1 – Cari di Internet untuk sempadan tersuai. Sebagai alternatif, anda boleh pergi ke keratan
