ASP实现播放Flash的例子
程序员文章站
2022-07-02 14:46:40
<%mingcheng=request("mingcheng")sec=request("score")sessi...
<!-- #include file = "db.fun" -->
<%
mingcheng=request("mingcheng")
sec=request("score")
session("mingcheng")=mingcheng
session("sec")=sec
if session("id")="" then
response.redirect "qzhuce."
response.end
end if
dim time1
sec=request("score")
set conn = getmdbconnection("score.mdb")
time1=cstr(date)
sql2="select * from mmd where nickname="&session("id")&""
set zy2 = conn.execute( sql2 )
old = zy2("mgdf")
response.write old
zy2.close
if cint(old) <= cint(sec) and cint(old)<>0 then
sql1="update mmd set mgdf ="&old&",time1="&time1&" where nickname ="&session("id")&""
else
sql1="update mmd set mgdf ="&sec&",time1="&time1&" where nickname ="&session("id")&""
end if
set zy1 = conn.execute( sql1 )
zy1.close
%>
<html>
<head>
<title> m&ms</title>
<meta http-equiv="content-type" content="text/html; charset=gb2312" >
</head>
<body bgcolor=#ffffff marginwidth=0 marginheight=0 leftmargin=0 topmargin=0>
<object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000"
codebase="https://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0"
width=550 height=400>
<param name="_cx" value="14552">
<param name="_cy" value="10583">
<param name="movie" value="/mms/search_score.swf?user=<%=session("id")%>&score=<%=sec%>">
<param name="src" value="/mms/search_score.swf?user=<%=session("id")%>&score=<%=sec%>">
<param name="wmode" value="window">
<param name="play" value="0">
<param name="loop" value="-1">
<param name="quality" value="high">
<param name="salign" value>
<param name="menu" value="-1">
<param name="base" value>
<param name="scale" value="showall">
<param name="devicefont" value="0">
<param name="embedmovie" value="0">
<param name="bgcolor" value>
<param name="swremote" value><embed src="/edu/uploadpic/2007-12/200712913312635.swf"" quality="high" bgcolor="#ffffff" width="550" height="400" ype="application/x-shockwave-flash" pluginspage="https://www.macromedia.com/shockwave/download/index.cgi?p1_prod_version=shockwaveflash">
</object>
</body>
</html>
<%
mingcheng=request("mingcheng")
sec=request("score")
session("mingcheng")=mingcheng
session("sec")=sec
if session("id")="" then
response.redirect "qzhuce."
response.end
end if
dim time1
sec=request("score")
set conn = getmdbconnection("score.mdb")
time1=cstr(date)
sql2="select * from mmd where nickname="&session("id")&""
set zy2 = conn.execute( sql2 )
old = zy2("mgdf")
response.write old
zy2.close
if cint(old) <= cint(sec) and cint(old)<>0 then
sql1="update mmd set mgdf ="&old&",time1="&time1&" where nickname ="&session("id")&""
else
sql1="update mmd set mgdf ="&sec&",time1="&time1&" where nickname ="&session("id")&""
end if
set zy1 = conn.execute( sql1 )
zy1.close
%>
<html>
<head>
<title> m&ms</title>
<meta http-equiv="content-type" content="text/html; charset=gb2312" >
</head>
<body bgcolor=#ffffff marginwidth=0 marginheight=0 leftmargin=0 topmargin=0>
<object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000"
codebase="https://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0"
width=550 height=400>
<param name="_cx" value="14552">
<param name="_cy" value="10583">
<param name="movie" value="/mms/search_score.swf?user=<%=session("id")%>&score=<%=sec%>">
<param name="src" value="/mms/search_score.swf?user=<%=session("id")%>&score=<%=sec%>">
<param name="wmode" value="window">
<param name="play" value="0">
<param name="loop" value="-1">
<param name="quality" value="high">
<param name="salign" value>
<param name="menu" value="-1">
<param name="base" value>
<param name="scale" value="showall">
<param name="devicefont" value="0">
<param name="embedmovie" value="0">
<param name="bgcolor" value>
<param name="swremote" value><embed src="/edu/uploadpic/2007-12/200712913312635.swf"" quality="high" bgcolor="#ffffff" width="550" height="400" ype="application/x-shockwave-flash" pluginspage="https://www.macromedia.com/shockwave/download/index.cgi?p1_prod_version=shockwaveflash">
</object>
</body>
</html>
上一篇： 精心总结的10条超可爱的，宝宝搞笑语录
下一篇： 轻松一刻到了，生活需要加点料
推荐阅读
-
Android编程实现播放视频时切换全屏并隐藏状态栏的方法
-
ASP.NET Web Api 2实现多文件打包并下载文件的实例
-
asp.net(c#)编程实现将彩色图片变灰阶图片的方法示例
-
解读ASP.NET 5 & MVC6系列教程（12）：基于Lamda表达式的强类型Routing实现
-
在ASP.NET 2.0中操作数据之十：使用 GridView和DetailView实现的主/从报表
-
asp.net使用FCK编辑器中的分页符实现长文章分页功能
-
Java程序中添加播放MIDI音乐功能的实现方法详解
-
asp.net(C#)实现功能强大的时间日期处理类完整实例
-
ASP.NET Core中自定义路由约束的实现
-
Flash AS实现的蝌蚪摆尾动画的教程