ie重的activex控件使用

1.tree控件
<!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>
<SCRIPT LANGUAGE="JavaScript">
<!--
    function init(){
        TreeView.LineStyle = 1;
        TreeView.Style = 7;
    }
//-->
</SCRIPT>
<SCRIPT LANGUAGE="JavaScript" for="TreeView" event="Click">
<!--
    if (TreeView.Nodes.Count > 0){
        index = TreeView.SelectedItem.index;
        caption.value = TreeView.SelectedItem.Text;
    }
//-->
</SCRIPT>
<SCRIPT LANGUAGE="VBScript">
<!--
    Dim index
    Dim strNodeText
    Dim strCaption
    Sub addItem()
        On Error Resume Next 
        
        strNodeText = strNode.value        
        strCaption = caption.value
        If Len(strNodeText)=0 Then Exit Sub 
        If Len(caption.value)>0 Then
            TreeView.Nodes.Add index, 4, , strNodeText
        Else
            TreeView.Nodes.Add , 0, ,strNodeText
        End If
    End Sub 
    Sub delItem()
        On Error Resume Next 
        If Len(strCaption)>0 Then
            TreeView.Nodes.Remove index
        End if
    End Sub 
//-->
</SCRIPT>
</BODY>
</HTML>
2.时间控件
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE> Microsoft Date and Time Picker Control, version 6.0 </TITLE>
</HEAD>

<BODY onload="init()">
<OBJECT ID="DatePicker" WIDTH="120" HEIGHT="25" codebase="http://activex.microsoft.com/controls/vb6/MSComCt2.cab"   CLASSID="CLSID:20DD1B9E-87C4-11D1-8BE3-0000F8754DA1">
</OBJECT>
<div id="result"></div>
<SCRIPT LANGUAGE="JavaScript">
<!--
    function init(){
        DatePicker.CalendarBackColor = 8421631;
        DatePicker.CalendarForeColor = 65280;
        DatePicker.CalendarTitleBackColor = 16744576;
        DatePicker.CalendarTitleForeColor = 65535;
        DatePicker.CalendarTrailingForeColor = 255;
        DatePicker.CheckBox=true;
    }
//-->
</SCRIPT>
<SCRIPT LANGUAGE="JavaScript" for="DatePicker" event="Change">
<!--
    result.innerHTML = "GMT：" + DatePicker.Value + "<BR>Custom:" + DatePicker.Year + "年" + DatePicker.Month + "月" + DatePicker.Day + "日";
//-->
</SCRIPT>
</BODY>
</HTML>

3.滚动条控件
<!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>
<SCRIPT LANGUAGE="JavaScript">
<!--
    function init(){
        currentValue.value=0;
        Slider.max=100;
        maxValue.value=Slider.max;
    }

    function setValue(){
        Slider.value=currentValue.value;
    }
    
    function setMax(){
        Slider.max=maxValue.value;
    }

//-->
</SCRIPT>
<SCRIPT LANGUAGE="JavaScript" for="Slider" event="Scroll">
<!--
    currentValue.value=Slider.value;
//-->
</SCRIPT>
</BODY>
</HTML>

4.windows对话框控件
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE> Microsoft Common Dialog Control, version 6.0 </TITLE>
</HEAD>

<BODY>
<input type="button" value="打开" onclick="showOpen()" \>
<input type="button" value="颜色" onclick="showColor()" \>
<input type="button" value="保存" onclick="showSave()" \>
<input type="button" value="帮助" onclick="showHelp()" \>
<input type="button" value="打印" onclick="showPrinter()" \>
<input type="button" value="字体" onclick="showFont()" \>
<BR \><BR \>
[结果]:
<BR \>
<div id="result" width="100%"></div>
<OBJECT ID="CDC" CLASSID="CLSID:F9043C85-F6F2-101A-A3C9-08002B2F49FB">
</OBJECT>
<SCRIPT LANGUAGE="JavaScript">
<!--    

    function showHelp(){
        CDC.ShowHelp();        
    }
    
    function showPrinter(){
        CDC.ShowPrinter();    
    }
    
    function showOpen(){
        CDC.InitDir = "%windir%";
        CDC.Filter = "文本文件(*.txt)|*.txt|全部文件(*.*)|*.*";
        CDC.DialogTitle = "打开文件";
        CDC.ShowOpen();
        result.innerText = "文件名：" + CDC.FileName;
    }

    function showSave(){        
        CDC.DialogTitle = "保存结果";
        CDC.Filter = "文本文件(*.txt)|*.txt|全部文件(*.*)|*.*";
        CDC.ShowSave();
        result.innerText = "文件名：" + CDC.FileName;    
    }

    function showFont(){
        CDC.ShowFont();
        result.innerText = "字体：" + CDC.FontName + ",大小：" + CDC.FontSize + CDC.FontBold?",粗体":"" + CDC.FontItalic?",斜体":"" ;
    }
        
    function showColor(){
        CDC.ShowColor();
        result.innerHTML = "<font color='#" + CDC.color.toString(16) + "'>颜色值(RGB):#" + CDC.color.toString(16) + ",颜色值(Long):" + CDC.color + "</font>";        
    }
//-->
</SCRIPT>
</BODY>
</HTML>

5.tab 控件
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE> Microsoft TabStrip Control, version 6.0 </TITLE>
</HEAD>

<BODY onload="init()">
<input type="text" value="" id="result" \>
<BR \>
<OBJECT ID="TabStrip" WIDTH="400" HEIGHT="300" CLASSID="CLSID:1EFB6596-857C-11D1-B16A-00C0F0283628">
</OBJECT>
<SCRIPT LANGUAGE="JavaScript">
<!--
    function init(){
        TabStrip.Tabs.Clear();
        TabStrip.MultiRow=true;
//        TabStrip.Tabs.Add ([pvIndex],[pvKey],[pvCaption],[pvImage]);
        TabStrip.Tabs.Add (1, "tab1", "笔");
        TabStrip.Tabs.Add (2, "tab2", "墨");
        TabStrip.Tabs.Add (3, "tab3", "纸");
        TabStrip.Tabs.Add (4, "tab4", "砚");
    }
//-->
</SCRIPT>
<SCRIPT LANGUAGE="JavaScript" for="TabStrip" event="Click">
<!--
    result.value = TabStrip.SelectedItem.Caption;
//-->
</SCRIPT>
</BODY>
</HTML>

6进度条控件
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE> Microsoft ProgressBar Control, version 6.0 </TITLE>
</HEAD>

<BODY onload="init()">
<input type="text" id="result" \>
<BR \>
<OBJECT ID="ProgressBar" WIDTH="300" HEIGHT="10" CLASSID="CLSID:35053A22-8589-11D1-B16A-00C0F0283628">
</OBJECT>
<SCRIPT LANGUAGE="JavaScript">
<!--
    function init(){
        ProgressBar.Max = 100;
        setInterval ("Progressing()",100);
    }
    function Progressing(){
        if (ProgressBar.Value<ProgressBar.Max)
        {
            ProgressBar.Value++;
            result.value = ProgressBar.Value * 100 / ProgressBar.Max + "%" ;
        }        
    }
//-->
</SCRIPT>
</BODY>
</HTML>
posted on 2006-11-23 23:17  自由港  阅读(1391)  评论(1)  编辑  收藏  举报