纯VBScript版的Web扫雷程序

<! DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" >  
< html >  
< head >  
< meta  http-equiv ="Content-Type"  content ="text/html; charset=gb2312" >  
< title > Guidy的Web扫雷程序 - 纯VBScript版 </ title >  
< style  type ="text/css" > ...  
@charset "gb2312"; 
body,td {...}{  
Font: 12 Px "宋体", Verdana, Arial, Helvetica, sans-serif; 
Cursor: default; 
} 
body{...}{  
margin: 0px; 
BackGround: buttonface; 
} 
A:link,A:visited,A:active {...}{  
Color:#990000; 
Text-Decoration:None; 
} 
A:hover {...}{  
Color:#FF8000; 
Text-Decoration:UnderLine; 
} 
input {...}{  
Border-Top-Width: 1 Px; 
Padding-Right: 1 Px; 
Padding-Left: 1 Px; 
Border-Left-Width: 1 Px; 
Border-bottom-Width: 1 Px; 
Border-Right-Width: 1 Px; 
Padding-bottom: 1 Px; 
Padding-Top: 1 Px; 
Height: 18 Px; 
Border-Left-Color: #C0C0C0; 
Border-bottom-Color: #C0C0C0; 
Border-Top-Color: #C0C0C0; 
Border-Right-Color: #C0C0C0; 
BackGround-Color: #FFFFFF; 
Color: #000000; 
Font: 9pt "宋体", Verdana, Arial, Helvetica, sans-serif; 
} 
.TdOver{...}{  
border: 1px outset; 

Border-Left-Color: #FFFFFF; 
Border-Top-Color: #FFFFFF; 
Border-Right-Color: #AAAAAA; 
Border-bottom-Color: #AAAAAA; 

BackGround-Color: #FFCCFF; 
} 
.TdOut{...}{  
border: 1px outset; 

Border-Left-Color: #E5E6E7; 
Border-Top-Color: #E5E6E7; 
Border-Right-Color: #E5E6E7; 
Border-bottom-Color: #E5E6E7; 

BackGround-Color: #E5E6E7; 
} 
.Tm0{...}{ BackGround-Color: buttonface;Color: #2E8B57; font-weight:bold;} 
.Tm1{...}{ BackGround-Color: buttonface;Color: #0000FF; font-weight:bold;} 
.Tm2{...}{ BackGround-Color: buttonface;Color: #2E8B57; font-weight:bold;} 
.Tm3{...}{ BackGround-Color: buttonface;Color: #FF0000; font-weight:bold;} 
.Tm4{...}{ BackGround-Color: buttonface;Color: #FF00FF; font-weight:bold;} 
.Tm5{...}{ BackGround-Color: buttonface;Color: #00FFFF; font-weight:bold;} 
.Tm6{...}{ BackGround-Color: buttonface;Color: #FF00FF; font-weight:bold;} 
.Tm7{...}{ BackGround-Color: buttonface;Color: #FFFF00; font-weight:bold;} 
.Tm8{...}{ BackGround-Color: buttonface;Color: #000000; font-weight:bold;} 

</ style >  
</ head >  

< body  onselectstart ="event.returnValue=false;" >  
< table  align ="center" >< tr >< td >  
< fieldset  style ="background-color:bottonface;" >< legend > 扫雷控制面板 </ legend >< table  border ="0"  align ="center"  cellpadding ="0"  cellspacing ="1" >  
< tr >  
< td > 宽度： </ td >  
< td >< input  name ="Tmx"  type ="text"  id ="Tmx"  size ="4"  maxlength ="4"  style ="ime-mode: disabled;" ></ td >  
< td >< input  name ="S1"  type