当前位置: 首页 > 图文教程 > 网络编程 > ASP > 用ASP编写的“俄罗斯方块游戏”

ASP
ADO如何提供异动功能?(BIG5)
从数据库中动态选取下拉列表的方法
数 据 库 设 计 经 验 谈
用SQL实现分布式数据复制
NT4的ODBC与SQL7相连,不支持中文?
大部分ADO的错误码对应的含义
ASP+中取代ASP的RS(Remote Scripting)技术的Framework
利用Page.IsPostBack属性保持用户输入的Framework
用VB6读写数据库中的图片
VisualInterDev6.0七种实现分页显示的方法
利用ASP获得图象的实际尺寸的示例
5个实用的ASP网站功能(GIB5)
在ASP中用集合成批操作数据库
用asp管理sql server数据库
用asp处理access数据库
使用速度更快的OLEDB取代ODBC连结
对Query字段进行Encode操作的一点看法
用ASP语言实现对SQL SERVER 数据库的操作
Microsoft SQL Server 7.0 备份及恢复相关问题
Microsoft SQL Server 7.0数据库升级转换问题

用ASP编写的“俄罗斯方块游戏”


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 221 ::
收藏到网摘: n/a

  <%If Not Request.QueryString("Ven") = "T" then%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<TITLE></TITLE>
</HEAD>
<SCRIPT LANGUAGE=vbscript>
function Redir()
window.open "<%= right(Request.ServerVariables("SCRIPT_NAME"),len(Request.ServerVariables("SCRIPT_NAME"))-instrrev(Request.ServerVariables("SCRIPT_NAME"),"/",len(Request.ServerVariables("SCRIPT_NAME"))))%>?Ven=T","user","status=no,toolbar=no,menubar=no,height=456,width=304,top=100,left=100,scrollbars=no"
window.history.back(-1)
End function
</SCRIPT>
<BODY onload=Redir()>
</BODY>
</HTML>
<%else%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<TITLE>**VBScript俄罗斯方块游戏**</TITLE>
<Style Type="text/css">
<!--
.normalHI{font-family:verdana,helvetica,arial,sans serif;color:#FFCC00;font-size:10pt;font-weight:bold;Cursor:hand;}
.normalH{font-family:verdana,helvetica,arial,sans serif;color:#000000;font-size:10pt;font-weight:bold;Cursor:hand;}
.normalG{font-family:verdana,helvetica,arial,sans serif;color:#000000;font-size:13pt;font-weight:bold;}
.normal{font-family:verdana,helvetica,arial,sans serif;color:#000000;font-size:10pt;font-weight:bold;}
.normalD{font-family:verdana,helvetica,arial,sans serif;color:#000000;font-size:10pt;font-weight:bold;}
.normalI{font-family:verdana,helvetica,arial,sans serif;color:#00FF00;font-size:10pt;font-weight:bold;}
.normalO{font-family:verdana,helvetica,arial,sans serif;color:#FFFF00;font-size:10pt;font-weight:bold;}
-->
</Style>
</HEAD>
<BODY topmargin=2 leftmargin=2>
<div align="center">
<center>
<table border="0" width="300" cellspacing="0" cellpadding="0"><tr><td width="200">
<center>
<table border="1" bordercolor="#000000" cellspacing="0" cellpadding="0" bgcolor="#000000">
<tr height="18">
<td ID="240" width="18"></td><td ID="241" width="18"></td><td ID="242" width="18"></td><td ID="243" width="18"></td><td ID="244" width="18"></td>
<td ID="245" width="18"></td><td ID="246" width="18"></td><td ID="247" width="18"></td><td ID="248" width="18"></td><td ID="249" width="18"></td>
</tr>
<tr height="18">
<td ID="230" width="18"></td><td ID="231" width="18"></td><td ID="232" width="18"></td><td ID="233" width="18"></td><td ID="234" width="18"></td>
<td ID="235" width="18"></td><td ID="236" width="18"></td><td ID="237" width="18"></td><td ID="238" width="18"></td><td ID="239" width="18"></td>
</tr>
<tr height="18">
<td ID="220" width="18"></td><td ID="221" width="18"></td><td ID="222" width="18"></td><td ID="223" width="18"></td><td ID="224" width="18"></td>
<td ID="225" width="18"></td><td ID="226"