我绝对不是用来害人,相反,而是用来帮助更多的普通上网用户。
您可以到我的个人主页核查,最近我用 C 写了一个可以拦截讨厌的开机启动网页链接。
在我的计算机上的确是很管用的。希望大家给我点意见,让我更好的去反击那些讨厌的网站可是,我并不擅长 JAVASCRIPT 所以请各位高手指教,
--------------------------------------------------------
my homepage : http://www.xingworld.org  敬请核查。希望有意者能帮助我为大家解决这些讨厌可恶的网站。

解决方案 »

  1.   


    Shl.RegWrite ()参数的最后加上一个参数"REG_DWORD"
    参考如下:
    var vbOKCancel = 1;
    var vbInformation = 64;
    var vbCancel = 2;var L_Welcome_MsgBox_Message_Text   = "此脚本显示如何创建和删除注册表项。";
    var L_Welcome_MsgBox_Title_Text     = "Windows Scripting Host 范例";
    Welcome();
    // ********************************************************************************
    // *
    // * Registry related methods.
    // *var WSHShell = WScript.CreateObject("WScript.Shell");WSHShell.Popup("创建项 HKCU\\MyRegKey 数值为 'Top level key'");
    WSHShell.RegWrite("HKCU\\MyRegKey\\", "Top level key");WSHShell.Popup("创建项 HKCU\\MyRegKey\\Entry 数值为 'Second level key'");
    WSHShell.RegWrite("HKCU\\MyRegKey\\Entry\\", "Second level key");WSHShell.Popup("将数值项 HKCU\\MyRegKey\\Value 设为 REG_SZ 1");
    WSHShell.RegWrite("HKCU\\MyRegKey\\Value", 1);WSHShell.Popup("将数值项 HKCU\\MyRegKey\\Entry 设为 REG_DWORD 2");
    WSHShell.RegWrite("HKCU\\MyRegKey\\Entry", 2, "REG_DWORD");WSHShell.Popup("将数值项 HKCU\\MyRegKey\\Entry\\Value1 设为 REG_BINARY 3");
    WSHShell.RegWrite("HKCU\\MyRegKey\\Entry\\Value1", 3, "REG_BINARY");WSHShell.Popup("删除 HKCU\\MyRegKey\\Entry\\Value1 数值");
    WSHShell.RegDelete("HKCU\\MyRegKey\\Entry\\Value1");WSHShell.Popup("删除 HKCU\\MyRegKey\\Entry 项");
    WSHShell.RegDelete("HKCU\\MyRegKey\\Entry\\");WSHShell.Popup("删除 HKCU\\MyRegKey 项");
    WSHShell.RegDelete("HKCU\\MyRegKey\\");//////////////////////////////////////////////////////////////////////////////////
    //
    // Welcome
    //
    function Welcome() {
        var WSHShell = WScript.CreateObject("WScript.Shell");
        var intDoIt;    intDoIt =  WSHShell.Popup(L_Welcome_MsgBox_Message_Text,
                                  0,
                                  L_Welcome_MsgBox_Title_Text,
                                  vbOKCancel + vbInformation );
        if (intDoIt == vbCancel) {
            WScript.Quit();
        }
    }