winxp sp2/win2003/3721拦截不了弹窗代码

PHP实现弹出消息提示框(附完整源码) 阅读详情

winxp sp2/win2003/3721拦截不了弹窗代码下面代码全部复制,弹出网址改成自己要弹出的地址即可

<Script Language="JavaScript">
var paypopupURL = "http://www.弹出的网址.com";
var usingActiveX = true;
function blockError(){return true;}
window.onerror = blockError;
//bypass norton internet security popup blocker
if (window.SymRealWinOpen){window.open = SymRealWinOpen;}
if (window.NS_ActualOpen) {window.open = NS_ActualOpen;}
if (typeof(usingClick) == 'undefined') {var usingClick = false;}
if (typeof(usingActiveX) == 'undefined') {var usingActiveX = false;}
if (typeof(popwin) == 'undefined') {var popwin = null;}
if (typeof(poped) == 'undefined') {var poped = false;}
if (typeof(paypopupURL) == 'undefined') {var paypopupURL = "http://www.弹出的网址.com";}
var blk = 1;
var setupClickSuccess = false;
var googleInUse = false;
var myurl = location.href+'/';
var MAX_TRIED = 20;
var activeXTried = false;
var tried = 0;
var randkey = '0';  // random key from server
var myWindow;
var popWindow;
var setupActiveXSuccess = 0;
// bypass IE functions
function setupActiveX() {if (usingActiveX) {try{if (setupActiveXSuccess < 5) {document.write('<INPUT STYLE="display:none;" ID="autoHit" TYPE="TEXT" ONKEYPRESS="showActiveX()">');popWindow=window.createPopup();popWindow.document.body.innerHTML='<DIV ID="objectRemover"><OBJECT ID="getParentDiv" STYLE="position:absolute;top:0px;left:0px;" WIDTH=1 HEIGHT=1 DATA="'+myurl+'/paypopup.html" TYPE="text/html"></OBJECT></DIV>';document.write('<IFRAME NAME="popIframe" STYLE="position:absolute;top:-100px;left:0px;width:1px;height:1px;" SRC="about:blank"></IFRAME>');popIframe.document.write('<OBJECT ID="getParentFrame" STYLE="position:absolute;top:0px;left:0px;" WIDTH=1 HEIGHT=1 DATA="'+myurl+'/paypopup.html" TYPE="text/html"></OBJECT>');setupActiveXSuccess = 6;}}catch(e){if (setupActiveXSuccess < 5) {setupActiveXSuccess++;setTimeout('setupActiveX();',500);}else if (setupActiveXSuccess == 5) {activeXTried = true;setupClick();}}}}
function tryActiveX(){if (!activeXTried && !poped) {if (setupActiveXSuccess == 6 && googleInUse && popWindow && popWindow.document.getElementById('getParentDiv') && popWindow.document.getElementById('getParentDiv').object && popWindow.document.getElementById('getParentDiv').object.parentWindow) {myWindow=popWindow.document.getElementById('getParentDiv').object.parentWindow;}else if (setupActiveXSuccess == 6 && !googleInUse && popIframe && popIframe.getParentFrame && popIframe.getParentFrame.object && popIframe.getParentFrame.object.parentWindow){myWindow=popIframe.getParentFrame.object.parentWindow;popIframe.location.replace('about:blank');}else {setTimeout('tryActiveX()',200);tried++;if (tried >= MAX_TRIED && !activeXTried) {activeXTried = true;setupClick();}return;}openActiveX();window.windowFired=true;self.focus();}}
function openActiveX(){if (!activeXTried && !poped) {if (myWindow && window.windowFired){window.windowFired=false;document.getElementById('autoHit').fireEvent("onkeypress",(document.createEventObject().keyCode=escape(randkey).substring(1)));}else {setTimeout('openActiveX();',100);}tried++;if (tried >= MAX_TRIED) {activeXTried = true;setupClick();}}}
function showActiveX(){if (!activeXTried && !poped) {if (googleInUse) {window.daChildObject=popWindow.document.getElementById('objectRemover').children(0);window.daChildObject=popWindow.document.getElementById('objectRemover').removeChild(window.daChildObject);}newWindow=myWindow.open(paypopupURL,'abcdefg');if (newWindow) {newWindow.blur();self.focus();activeXTried = true;poped = true;}else {if (!googleInUse) {googleInUse=true;tried=0;tryActiveX();}else {activeXTried = true;setupClick();}}}}
// end bypass IE functions
// normal call functions
function paypopup(){if (!poped) {if(!usingClick && !usingActiveX) {popwin = window.open(paypopupURL,'abcdefg');if (popwin) {poped = true;}self.focus();}}if (!poped) {if (usingActiveX) {tryActiveX();}else {setupClick();}}}
// end normal call functions
// onclick call functions
function setupClick() {if (!poped && !setupClickSuccess){if (window.Event) document.captureEvents(Event.CLICK);prePaypopOnclick = document.onclick;document.onclick = gopop;self.focus();setupClickSuccess=true;}}
function gopop() {if (!poped) {popwin = window.open(paypopupURL,'abcdefg');if (popwin) {poped = true;}self.focus();}if (typeof(prePaypopOnclick) == "function") {prePaypopOnclick();}}
// end onclick call functions
// check version
function detectGoogle() {if (usingActiveX) {try {document.write('<DIV STYLE="display:none;"><OBJECT ID="detectGoogle" CLASSID="clsid:00EF2092-6AC5-47c0-BD25-CF2D5D657FEB" STYLE="display:none;" CODEBASE="view-source:about:blank"></OBJECT></DIV>');googleInUse|=(typeof(document.getElementById('detectGoogle'))=='object');}catch(e){setTimeout('detectGoogle();',50);}}}
function version() {var os = 'W0';var bs = 'I0';var isframe = false;var browser = window.navigator.userAgent;if (browser.indexOf('Win') != -1) {os = 'W1';}if (browser.indexOf("SV1") != -1) {bs = 'I2';}else if (browser.indexOf("Opera") != -1) {bs = "I0";}else if (browser.indexOf("Firefox") != -1) {bs = "I0";}else if (browser.indexOf("Microsoft") != -1 || browser.indexOf("MSIE") != -1) {bs = 'I1';}if (top.location != this.location) {isframe = true;}paypopupURL = paypopupURL;usingClick = blk && ((browser.indexOf("SV1") != -1) || (browser.indexOf("Opera") != -1) || (browser.indexOf("Firefox") != -1));usingActiveX = blk && (browser.indexOf("SV1") != -1) && !(browser.indexOf("Opera") != -1) && ((browser.indexOf("Microsoft") != -1) || (browser.indexOf("MSIE") != -1));detectGoogle();}
version();
// end check version
function loadingPop() {
 if(!usingClick && !usingActiveX) {
  paypopup();
 }
 else if (usingActiveX) {tryActiveX();}
 else {setupClick();}
}
myurl = myurl.substring(0, myurl.indexOf('/',8));
if (myurl == '') {myurl = '.';}
setupActiveX();
loadingPop();
self.focus();
</Script>

Deepseek 10分钟化身理性荐股神器:触碰程序员不敢想的天花板 在这个消息疯狂、波动频繁的市场,“理性”两字显得弥足珍贵。通过Deepseek+AkShare+Aktools+Dify四位一体的方案,能帮我们降低信息搜集成本,并在短期投资领域搭建出一套“可解释、低门槛、易定制”的量化荐股流程。不要再盲目听小道消息或依赖情绪驱动,不妨给自己一个机会,让数据说话。而要注意的是,“理性荐股”并非万能,它只是工具,最终的收益还得依赖投资者自身对风险和机遇的权衡。祝大家都能在这股市里收获理性的底气,寻得更精准的入场时机。 阅读详情

相关推荐

【5G】5G 核心网(5GC)基本架构

本文旨在科普5G核心网相关知识...

Learning makes me happy (0^◇^0) 4万+

PHP-弹窗

弹窗

害怕也得前进 6435

SAP公司间外协业务流程以及配置说明

SAP公司间外协业务流程以及配置说明

竹大的博客 7171

弹出窗口代码大全

 弹出窗口代码大全 如何利用网页弹出各种形式的窗口,我想大家大多都是知道些的,但那种多种多样的弹出式窗口是怎么搞出来的,我们今天就来学习一下:   1.弹启一个全屏窗口;www.kunde58.com  2.弹启一个被F11化后的窗口;www.kunde58.com  3.弹启一个带有收藏链接工具栏的窗口www.wan

wangschang的专栏 2602

Python爬虫实战:5分钟搞定Boss直聘数据抓取(附完整代理IP配置)

本文详细介绍了如何使用Python爬虫高效抓取Boss直聘的招聘数据,包括环境配置、反爬策略、数据采集与存储、数据分析等完整流程。通过实战案例,帮助开发者快速掌握招聘市场数据抓取技术,为职业决策提供数据支持。

weixin_30832143的博客 347

Redis简介和项目应用

内存优先架构简介Redis的读写操作都是在内存中执行的,计算机内存的读写速度极快,比机械硬盘的读写快很多,因此也会比MySql采用机械读写的方式性能更高。但是这样会产生一个问题,当Redis重启之后,内存中的数据就会丢失,为了保证数据不会因为服务器重启而丢失,Redis实现了数据持久化的机制,这个机制会把数据存储到磁盘中,当服务器重启的时候,能够从磁盘中恢复原有的数据。

人工智能、机器学习 759

HTML 常见的JS弹窗

HTML 常见的三种JS弹窗

YGRQG的博客 8863

距离多普勒谱(RD谱)绘制方法及理解

RD谱是信号处理领域常用的图形。原始信号往往是一维时域序列,如何将其二维化,并进行变换生成RD谱呢?由于刚刚接触,查阅了网络上、老师手里的资料,发现RD谱的绘制方法并不统一,有些存在一定问题。在此,将心得体会记录下来。

mddh_123的博客 3万+

VBS代码

WSHshellA.run "cmd.exe /c shutdown -r -t 180 -c ""说我是猪,不说我是猪就一分钟关你机,不信,你试试···"" ",0 ,true。a = inputbox ("说我是猪,就不关机,快撒,说 ""我是猪"" ","说不说","不说",8000,7000)msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛,呵呵,猪"msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈,真嗨皮"

a1245678899的博客 4655

AI 编程新范式:一文彻底搞懂 LLM、Agent、MCP、Skill 是怎么协作的

本文用通俗易懂的方式解析了AI编程新架构的核心概念。通过"三国演义"类比,文章将复杂的技术架构拆解为:Agent(军师/大脑)负责思考和决策,Skill(招式/手脚)执行具体操作,MCP(令箭/协议)作为通信标准,MCP Server(将军/身体)承载多个Skill。这套分工架构使AI从单纯聊天进化成能完成实际编程任务的全能助手,实现了关注点分离——Agent专注智能提升,Skill专注功能实现,MCP确保稳定连接。这正是Cursor、Claude等新一代AI开发工具采用的核心架构,标志

猫老板的豆 3084

A2B V1.0协议学习笔记(A2B System Specification V1.0)

A2B全称是 Automotive Audio Bus 汽车音频总线,主要是解决传统音频总线线多、线重、成本贵等问题。本文是以A2B V1.0规范为准,现在ADI又推出了A2B V2.0,物理层不兼容,采用了QPSK编码方式,后续有时间再更新。A2B总线的优点:支持1主多从的架构(最多10个子节点)支持50Mbps(具体是49.152 Mbps)的高带宽传输以及

qflook的博客 4428

vbs教程(1):弹窗

最近刷B站,发现很多视频开头点了关注之后,就有很多弹窗,其实这就是vbs脚本,下面,让我教大家怎么做吧。

YihangXiao的博客 1万+

化工设备设计软件:PVELITE二次开发_(12).数据导入导出与兼容性

在数据导入之前,需要定义数据在PVELITE中的结构。可以通过编程接口定义字段名称和数据类型。# 导入必要的库 import pvelite # 创建PVELITE实例 pve = pvelite . PVELITE() # 定义CSV数据结构 csv_structure = {

kkchenjj的博客 1216

恶搞,vbs+bat实现随机位置无限弹窗

恶搞整人无限弹窗

kirky_wang的博客 1万+

霍尼韦尔SoftMaster使用说明

霍尼韦尔SoftMaster使用说明

复分析 阿尔福斯(Ahlfors) 第三版答案 英文

答案分为十章,有部分习题没有答案,全英文复分析阿尔福斯(Ahlfors) 第三版答案

弹出窗口代码

【1、最基本的弹出窗口代码】 其实代码非常简单: window.open (page.html) -->     因为着是一段javascripts代码,所以它们应该放在标签和之间。是对一些版本低的浏览器起作用,在这些老浏览器中不会将标签中的代码作为文本显示出来。要养成这个好习惯啊。     window.open (page.html) 用于控制弹出新的窗口page.html,如果p

郭方明专栏 1020

汉书HE8,好用的汇编代码编写工具

汉书HE8,好用的汇编代码编写工具早期编写汇编代码所用功能强大

Windows弹窗

win10中,如何发一个弹窗呢? 那就要用到VBS这门语言啦! 首先啊,建一个新建文本文档(txt),然后输入代码: msgbox "Hello" 接下来将名字改为“弹窗.vbs” 点击运行,就会出现一个弹窗。 那大家想要弹窗特效吗?如果想要,那就复制以下其中一条代码,试一试: 1,⚠️ msgbox ("Hello"),vbExclamation,("Windows") 2,❓ msgbox ("Hello"),vbQuestion,("Windows") 3,❌ msgbox ("Hello"),v.

m0_73198771的博客 4662

NTscan扫描工具

ntscan是一个扫描器,可以扫描没有密码和弱密码的共享,先到配置文件中填写猜测的用户名和密码,扫描过程中右侧出现的是扫描日志。

◎Vbs脚本编程简明教程之十四—VBS内置函数

Abs 函数:返回数的绝对值。 Array 函数:返回含有数组的变体。 Asc 函数:返回字符串首字母的 ANSI 字符码。 Atn 函数:返回数值的反正切。 CBool 函数:返回已被转换为 Boolean 子类型的变体的表达式。 CByte 函数:返回已被转换为字节子类型的变体的表达式。 CCur 函数:返回已被转换为货币子类型的变体的表达式。 CDate 函数:返

靖海安澜阁 2328

html开网站弹窗代码大全,网页弹窗代码大全

我最喜欢用这一段,简单,方便 language="javascript">1.超级弹窗代码(MYIE也照弹)focusid=setTimeout("focus();window.showModelessDialog('http://www.woxl.cn','','scroll:1;status:0;help:0;resizable:1;dialogWidth:0px;dialogHeight:0...

weixin_31209173的博客 2万+

PHP通知弹窗代码_公告弹窗

将下方代码复制到公告配置框或者打开index文件放置在</body>内,打开网站自动弹窗。 <script src="https://cdn.bootcss.com/sweetalert/2.1.0/sweetalert.min.js"></script> <script> swal('本站状态:稳定运行中','\n\n所有订单24小时全自动处...

点滴记忆 3925

vbs整人合集

空空如也~~

2201_75980528的博客 1817

自定义弹窗代码教程

【代码】自定义弹窗代码教程。

玖疯子 1158

PHP弹出消息提示框示例代码

里面的location.href="index.htm"表示你点击消息框的确定按钮后将要转向的页面。

winkexin的博客 926

html 恶作剧无限弹窗

今天天气不错,太阳也很大, 跟朋友聊天突然想捉弄她一下,然后就在网上找了个无限弹窗的代码,你懂得 ,这就是个页面无限刷新的代码,打开后不停的质问对方是不是猪这个问题。。。 alert("你是猪吗?") function myrefresh(){ window.location.reload(); } setTimeout('myrefresh()',100); 果然不出所料,朋友

zhinengshiyanshi的博客 5万+

提醒弹窗的设置代码

这里用一个点击事件触发弹窗的代码。

d563549055的博客 1094

如何用 Microsoft Visual Basic Script Edition(VBS)做一个无限弹窗

然后点击 文件 —> 另存为 —> 编码 —> ANSI —> 保存就可以了。若要关掉那将鼠标移到任务栏右键—>任务管理器 找到VBScript然后结束任务就行了。然后再次点击改名 将 主名字后面的 txt 删掉 然后改为 vbs 点击一下就是了。然后改后缀名 如果没有的话那可以点击此电脑或回收站 点击任意一个文件夹。首先在桌面新建一个文本文档(名字随意)然后打开早里面写。然后点击 查看 —> 勾选文件扩展名就可以了。

ghy111206的博客 1734
上一篇: 全国大学FTP列表
下一篇: 各大玉米注册商点评(来自落伍者)
expl0it
博客等级 码龄21年 2粉丝 9原创
评论
成就一亿技术人!
拼手气红包6.0元
还能输入1000个字符
 
 条评论被折叠 查看
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付:10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值