一个简单的颜色吸取器(ASP编写)
发表于:2007-06-30来源:作者:点击数:
标签:
%@ Language= VB Script % % ‘’ ASP Code will run on server and Make HTML Page ‘’ Java Script will run on Client Side and Change the background color ‘’ according to movement of Mouse % html SCRIPT ID=clientEventHandlersJS LANGUAGE= jav
<%@ Language=
VBScript %>
<%
‘’ ASP Code will run on server and Make HTML Page
‘’ Java Script will run on Client Side and Change the background color
‘’ a
clearcase/" target="_blank" >ccording to movement of Mouse
%>
<html>
<SCRIPT ID=clientEventHandlersJS LANGUAGE=
javascript>
<!--
function MakeColor(ThisColor) {
document.bgColor = ThisColor;
}
//-->
</SCRIPT>
<center>
<table cellspacing=2 Border="0">
<tr>
<%
Dim I1, I2, I3 ‘’ Looping variables for RGB Color
For I1 = 0 to 15 step 3
For I2 = 0 to 15 step 3
For I3 = 0 to 15 step 3
Color = Hex(I1) & Hex(I1) & Hex(I2) & Hex(I2) & Hex(I3) & Hex(I3)%>
<td bgcolor="#<%=Color%>">
<a href="#" LANGUAGE=javascript OnMouseOver="return MakeColor(‘’#<%=Color%>‘’);">
<img src="clear.gif" width=10 height=10 border="0"></a>
</td>
<%
Next
Next
%>
</tr>
<tr>
<%
Next
%>
</tr>
</table>
</center>
</html>
原文转自:http://www.ltesting.net