html 生成艺术字

发布: 2007-6-30 18:56 | 作者: admin | 来源: | 查看: 519次 | 进入软件测试论坛讨论

<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<TITLE></TITLE>
<SCRIPT LANGUAGE="VBScript">
Sub Window_Onload()
    TCG.Item("Action1").AT 0.00, "w2.Rotate(0,0,5)", -1
    TCG.Item("Action1").AT 0.00, "s3.Rotate(1,0,0)", -1
    TCG.Item("Action1").Play
End Sub
</SCRIPT>
</HEAD>
<BODY>
<OBJECT classid="clsid:369303C2-D7AC-11D0-89D5-00A0C90833E6"
    id="w1" STYLE="HEIGHT: 350px; POSITION:absolute;
    =>WIDTH: 500px; ZINDEX: 1" VIEWASTEXT>
    <PARAM NAME="Line0001" VALUE="SetLineStyle(1,0)">
    <PARAM NAME="Line0002" VALUE="SetLineColor(0,0,255)">
    <PARAM NAME="Line0003" VALUE="SetFillStyle(1)">
    <PARAM NAME="Line0004" VALUE="SetFont(@#Bertram@#,100,100,0,0,0)">
    <PARAM NAME="Line0005" VALUE="Text(@#Chinaasp@#,-175,-100)">
</OBJECT>
<OBJECT classid="clsid:369303C2-D7AC-11D0-89D5-00A0C90833E6"
    id="w2" STYLE="HEIGHT: 350px; POSITION: absolute;
    =>WIDTH:500px; ZINDEX: 1" VIEWASTEXT>
    <PARAM NAME="Line0001" VALUE="SetLineStyle(1,0)">
    <PARAM NAME="Line0002" VALUE="SetLineColor(0,0,255)">
    <PARAM NAME="Line0003" VALUE="SetFillStyle(1)">
    <PARAM NAME="Line0004" VALUE="SetFont(@#Verdona@#,100,100,0,0,0)">
    <PARAM NAME="Line0005" VALUE="Text(@#艺术字@#,-215,-30)">
</OBJECT>
<OBJECT classid="clsid:369303C2-D7AC-11D0-89D5-00A0C90833E6"
    id="w3" STYLE="HEIGHT: 350px; POSITION: absolute;
    =>WIDTH: 500px; ZINDEX: 1" VIEWASTEXT>
    <PARAM NAME="Line0001" VALUE="SetLineStyle(1,0)">
    <PARAM NAME="Line0002" VALUE="SetLineColor(0,0,255)">
    <PARAM NAME="Line0003" VALUE="SetFillStyle(1)">
    <PARAM NAME="Line0004" VALUE="SetFont(@#Verdona@#,100,100,0,0,0)">
    <PARAM NAME="Line0005" VALUE="Text(@#Centver@#,-225,45)">
</OBJECT>
<OBJECT classid="clsid:369303C2-D7AC-11D0-89D5-00A0C90833E6"
    id="w4" STYLE="HEIGHT: 350px; POSITION: absolute;
    =>WIDTH: 500px; ZINDEX: 1" VIEWASTEXT>
    <PARAM NAME="Line0001" VALUE="SetLineStyle(1,0)">
    <PARAM NAME="Line0002" VALUE="SetLineColor(255,0,0)">
    <PARAM NAME="Line0003" VALUE="SetFillStyle(1)">
    <PARAM NAME="Line0004" VALUE="SetFont(@#隶书@#,100,100,0,0,0)">
    <PARAM NAME="Line0005" VALUE="Text(@#来自 MSDN@#,-225,145)">
</OBJECT>
<OBJECT classid="clsid:B0A6BAE2-AAF0-11D0-A152-00A0C908DB96"
    id="TCG" STYLE="WIDTH:2;HEIGHT:2">
</OBJECT>
</BODY>
</HTML>