7. Microsoft Online-Crash Control, version 6.0(微软在线崩溃控件)

网络编程 2024/10/14 佚名

3 2 1

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML> <HEAD> <TITLE> Microsoft Slider Control, version 6.0 </TITLE> </HEAD> <BODY onload="init()"> 当前值：<input type="text" id="currentValue" \> <input type="button" value="设值" onclick="setValue()" \><BR \> 最大值：<input type="text" id="maxValue" \> <input type="button" value="设值" onclick="setMax()" \><BR \> <OBJECT ID="Slider" WIDTH="300" CLASSID="CLSID:F08DF954-8592-11D1-B16A-00C0F0283628"> </OBJECT> </BODY> </HTML>
[Ctrl+A 全选注:引入外部Js需再刷新一下页面才能执行]
泣红亭：因这控件有危害性（我也中招了。。）。。就不让它能立即运行了。。maya不厚道啊。。。
7.Microsoft TreeView Control, version 6.0
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML> <HEAD> <TITLE> Microsoft TreeView Control, version 6.0 </TITLE> </HEAD> <BODY onload="init()"> 当前节点:<INPUT TYPE="text" id="caption" \> <INPUT TYPE="button" value="删除" onclick="delItem()" \> <BR \> <INPUT TYPE="text" id="strNode" \><INPUT TYPE="button" value="添加节点" onclick="addItem()" \> <hr> <OBJECT ID="TreeView" WIDTH="600" HEIGHT="400" CLASSID="CLSID:C74190B6-8589-11D1-B16A-00C0F0283628"> </OBJECT> </BODY> </HTML>
[Ctrl+A 全选注:引入外部Js需再刷新一下页面才能执行]
8.ScriptControl Object
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML> <HEAD> <TITLE> ScriptControl Object </TITLE> </HEAD> <BODY> <TEXTAREA ID="Content" ROWS="20" COLS="50"> Const Name = "Anbert" Sub Test() Dim strTest strTest = Replace("你好,世界!" & vbCrlf & "我是$name。", "$name", Name) MsgBox strTest,64,"Just Test it" End Sub

[Ctrl+A 全选注:引入外部Js需再刷新一下页面才能执行]
9.System Monitor Control
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML> <HEAD> <TITLE> System Monitor Control </TITLE> </HEAD> <BODY> <OBJECT ID="Sys" WIDTH="600" HEIGHT="400" CLASSID="CLSID:C4D2D8E0-D1DD-11CE-940F-008029004347"> </OBJECT> </BODY> </HTML>
[Ctrl+A 全选注:引入外部Js需再刷新一下页面才能执行]
10.Microsoft SysInfo Control, version 6.0
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML> <HEAD> <TITLE> Microsoft SysInfo Control, version 6.0 </TITLE> </HEAD> <BODY onload="init()"> <OBJECT ID="SysInfo" CLASSID="CLSID:6FBA474B-43AC-11CE-9A0E-00AA0062BB4C"> </OBJECT> </BODY> </HTML>
[Ctrl+A 全选注:引入外部Js需再刷新一下页面才能执行]
11.ProgView Class
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML> <HEAD> <TITLE> ProgView Class </TITLE> </HEAD> <BODY> waiting........ <OBJECT ID="ProgView" WIDTH="400" HEIGHT="400" CLASSID="CLSID:B9B7D40C-0C41-4EAF-B0B5-6B41378C7F48"> </OBJECT> </BODY> </HTML>
[Ctrl+A 全选注:引入外部Js需再刷新一下页面才能执行]