搜索文章：

首页  |  Java技术  |  Asp.net  |  Asp编程  |  VC/C++  |  Delphi  |  VB编程
上一篇：Dreamweaver 4 & UltraDev 4两个BUG(字体设置不能保存和行号显示错位)的解决方法 >>

一个DHTML的例子——3D文字

作者： unknow
<HTML><HEAD><TITLE>3D文字</TITLE>
<META content="text/html; CHARSET=GB2312" http-equiv=Content-Type>
<META content=EN-US name=MS.LOCALE>
<META content=noindex name=ROBOTS>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR>
<SCRIPT language=VBScript>
<!--
@# Sets initial variables and letter starting positions

Sub Window_OnLoad()
    call SG1.Scale(0.50, 0.50, 0.50)
    call SG2.Scale(0.50, 0.50, 0.50)
    call SG3.Scale(0.50, 0.50, 0.50)
    call SG4.Scale(0.50, 0.50, 0.50)
    call SG1.Rotate(0, 0, 0)
    call SG2.Rotate(90, 0, 0)
    call SG3.Rotate(0, 90, 0)
    RotateAll
end sub

@# sets rotation speed and behavior as well as creating loop

Sub RotateAll
    Call SG1.Rotate(4,6,2)
    Call SG2.Rotate(4,6,2)
    Call SG3.Rotate(4,6,2)
    Call SG4.Rotate(4,6,2)
    FILK = Window.SetTimeOut("Call RotateAll", 10, "VBSCript")
End Sub
-->
</SCRIPT>
</HEAD>
<BODY bgColor=white>
<OBJECT classid=CLSID:369303C2-D7AC-11D0-89D5-00A0C90833E6 id=SG4
style="HEIGHT: 400px; LEFT: 25%; POSITION: absolute; TOP: 25%; WIDTH: 400px; ZINDEX: 0"><PARAM NAME="Line0001" VALUE="SetLineStyle(0)"><PARAM NAME="Line0002" VALUE="SetFillColor(164, 164, 255)"><PARAM NAME="Line0003" VALUE="SetFillStyle(1)"><PARAM NAME="Line0004" VALUE="SetFont(@#Arial@#, 180, 700, 0, 0, 0)"><PARAM NAME="Line0005" VALUE="Text(@#你好！@#, -95, 87)"></OBJECT>
<OBJECT classid=CLSID:369303C2-D7AC-11D0-89D5-00A0C90833E6 id=SG1
style="HEIGHT: 400px; LEFT: 25%; POSITION: absolute; TOP: 25%; WIDTH: 400px; ZINDEX: 0"><PARAM NAME="Line0001" VALUE="SetLineStyle(1)"><PARAM NAME="Line0002" VALUE="SetLineColor(0, 0, 0)"><PARAM NAME="Line0003" VALUE="SetFillStyle(0)"><PARAM NAME="Line0004" VALUE="SetFont(@#Arial@#, 180, 700, 0, 0, 0)"><PARAM NAME="Line0005" VALUE="Text(@#你好！@#, -95, 87)"></OBJECT>
<OBJECT classid=CLSID:369303C2-D7AC-11D0-89D5-00A0C90833E6 id=SG3
style="HEIGHT: 300px; LEFT: 25%; POSITION: absolute; TOP: 25%; WIDTH: 400px; ZINDEX: 1"><PARAM NAME="Line0001" VALUE="SetLineStyle(1)"><PARAM NAME="Line0002" VALUE="SetLineColor(66,158, 144)"><PARAM NAME="Line0003" VALUE="SetFillStyle(0)"><PARAM NAME="Line0004" VALUE="SetFont(@#Arial@#, 280, 700, 0, 0, 0)"><PARAM NAME="Line0005" VALUE="Text(@#函数@#, -95, 87)"></OBJECT>
<OBJECT classid=CLSID:369303C2-D7AC-11D0-89D5-00A0C90833E6 id=SG2
style="HEIGHT: 400px; LEFT: 25%; POSITION: absolute; TOP: 25%; WIDTH: 400px; ZINDEX: 2"><PARAM NAME="Line0001" VALUE="SetLineStyle(1)"><PARAM NAME="Line0002" VALUE="SetLineColor(255, 111,210)"><PARAM NAME="Line0003" VALUE="SetFillStyle(0)"><PARAM NAME="Line0004" VALUE="SetFont(@#Arial@#, 180, 700, 0, 0, 0)"><PARAM NAME="Line0005" VALUE="Text(@#啊@#, -95, 0)"></OBJECT></BODY></HTML>
下一篇：如何做页面自动刷新，又不用让用户按回车键来提交数据！（大功告成） >>
相关文章：
© 2006   www.java-asp.net