快精灵印艺坊 您身边的文印专家
广州名片 深圳名片 会员卡 贵宾卡 印刷 设计教程
产品展示 在线订购 会员中心 产品模板 设计指南 在线编辑
 首页 名片设计   CorelDRAW   Illustrator   AuotoCAD   Painter   其他软件   Photoshop   Fireworks   Flash  

 » 彩色名片
 » PVC卡
 » 彩色磁性卡
 » 彩页/画册
 » 个性印务
 » 彩色不干胶
 » 明信片
   » 明信片
   » 彩色书签
   » 门挂
 » 其他产品与服务
   » 创业锦囊
   » 办公用品
     » 信封、信纸
     » 便签纸、斜面纸砖
     » 无碳复印纸
   » 海报
   » 大篇幅印刷
     » KT板
     » 海报
     » 横幅

ASP实现播放FLASH的例子

<!-- #include file = "DB.fun" -->
<%
mingcheng=request("mingcheng")
sec=Request("score")
session("mingcheng")=mingcheng
session("sec")=sec
If session("ID")="" then
response.redirect "qzhuce.asp"
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&m\\\'s</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="http://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")%>&amp;score=<%=sec%>">
<param name="Src" value="/mms/search_score.swf?user=<%=session("id")%>&amp;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="search_score.swf" quality="high" bgcolor="#FFFFFF" WIDTH="550" HEIGHT="400" YPE="application/x-shockwave-flash" PLUGINSPAGE="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash">
</OBJECT>
</body>
</html>
返回类别: 教程
上一教程: WAP中的ASP技术(二)
下一教程: ASP OBJECT之:RESPONSE.COOKIES

您可以阅读与"ASP实现播放FLASH的例子"相关的教程:
· ASP直接调用EXCEL数据的例子
· ASP编程中15个异常有用的例子 (二)
· ASP 编程中 20 个异常有用的例子
· ASP 编程中20个异常有用的例子
· ASP直接调用EXCEL数据的例子(不用ODBC)
    微笑服务 优质保证 索取样品