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

📄 rte_iframe_select_font.asp

📁 简单的asp论坛源码系统,很适用于初学者!界面简洁,功能齐全
💻 ASP
字号:
<%
'****************************************************************************************
'**  Copyright Notice    
'**
'**  Web Wiz Rich Text Editor(TM)
'**  http://www.richtexteditor.org
'**                                                              
'**  Copyright (C)2001-2008 Web Wiz(TM). All Rights Reserved.   
'**  
'**  THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS UNDER LICENSE FROM 'WEB WIZ'.
'**  
'**  IF YOU DO NOT AGREE TO THE LICENSE AGREEMENT THEN 'WEB WIZ' IS UNWILLING TO LICENSE 
'**  THE SOFTWARE TO YOU, AND YOU SHOULD DESTROY ALL COPIES YOU HOLD OF 'WEB WIZ' SOFTWARE
'**  AND DERIVATIVE WORKS IMMEDIATELY.
'**  
'**  If you have not received a copy of the license with this work then a copy of the latest
'**  license contract can be found at:-
'**
'**  http://www.webwizguide.com/license
'**
'**  For more information about this software and for licensing information please contact
'**  'Web Wiz' at the address and website below:-
'**
'**  Web Wiz, Unit 10E, Dawkins Road Industrial Estate, Poole, Dorset, BH15 4JD, England
'**  http://www.webwizguide.com
'**
'**  Removal or modification of this copyright notice will violate the license contract.
'**
'****************************************************************************************



'*************************** SOFTWARE AND CODE MODIFICATIONS **************************** 
'**
'** MODIFICATION OF THE FREE EDITIONS OF THIS SOFTWARE IS A VIOLATION OF THE LICENSE  
'** AGREEMENT AND IS STRICTLY PROHIBITED
'**
'** If you wish to modify any part of this software a license must be purchased
'**
'****************************************************************************************


Response.AddHeader "pragma","cache"
Response.AddHeader "cache-control","public"
Response.CacheControl =	"Public"

%>
<!-- #include file="browser_page_encoding_inc.asp" -->
<title>Fonts</title>
<%
'***** START WARNING - REMOVAL OR MODIFICATION OF THIS CODE WILL VIOLATE THE LICENSE AGREEMENT ******
Response.Write("<!--//" & _
vbCrLf & "/* *******************************************************" & _
vbCrLf & "Software: Web Wiz Rich Text Editor " & _
vbCrLf & "Info: http://www.richtexteditor.org" & _
vbCrLf & "Copyright: (C)2001-2008 Web Wiz(TM). All rights reserved" & _
vbCrLf & "******************************************************* */" & _
vbCrLf & "//-->")
'***** END WARNING - REMOVAL OR MODIFICATION OF THIS CODE WILL VIOLATE THE LICENSE AGREEMENT ******
%>
<script language="JavaScript">
//Function to select font
function mouseClick(fontType){
	self.parent.initialiseCommand(fontType);
}

//Function to hover item
function overItem(iconItem) {
	iconItem.style.backgroundColor='#CCCCCC';
}

//Function to moving off item
function outItem(iconItem) {
	iconItem.style.backgroundColor='#FFFFFF';
}
</script>
<style type="text/css">
.pStyle { font-size: 14px; color: #000000; }
</style>
</head>
<body bgcolor="#FFFFFF" leftmargin="2" topmargin="2" marginwidth="2" marginheight="2">
<table width="100%"  border="0" cellspacing="0" cellpadding="3">
  <tr onMouseover="overItem(this)" onMouseout="outItem(this)" OnClick="mouseClick('Arial, Helvetica, sans-serif')" style="cursor: default;">
    <td width="100%" class="pStyle" style="font-family: Arial, Helvetica, sans-serif;">Arial</td>
  </tr>
  <tr onMouseover="overItem(this)" onMouseout="outItem(this)" OnClick="mouseClick('Times New Roman, Times, serif')" style="cursor: default;">
    <td class="pStyle" style="font-family: Times New Roman, Times, serif;">Times New Roman</td>
  </tr>
  <tr onMouseover="overItem(this)" onMouseout="outItem(this)" OnClick="mouseClick('Courier New, Courier, mono')" style="cursor: default;">
    <td class="pStyle" style="font-family: Courier New, Courier, mono;">Courier</td>
  </tr>
  <tr onMouseover="overItem(this)" onMouseout="outItem(this)" OnClick="mouseClick('Georgia, Times New Roman, Times, serif')" style="cursor: default;">
    <td class="pStyle" style="font-family: Georgia, Times New Roman, Times, serif;">Georgia</td>
  </tr>
  <tr onMouseover="overItem(this)" onMouseout="outItem(this)" OnClick="mouseClick('Verdana, Arial, Helvetica, sans-serif')" style="cursor: default;">
    <td class="pStyle" style="font-family: Verdana, Arial, Helvetica, sans-serif;">Verdana</td>
  </tr>
  <tr onMouseover="overItem(this)" onMouseout="outItem(this)" OnClick="mouseClick('Geneva, Arial, Helvetica, sans-serif')" style="cursor: default;">
    <td class="pStyle" style="font-family: Geneva, Arial, Helvetica, sans-serif;">Geneva</td>
  </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

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