当前位置: 首页 > 图文教程 > 网络编程 > ASP > 用ASP实现播放Flash的例子

ASP
在ASP应用中验证用户身份(2)
在ASP应用中验证用户身份(3)
在ASP应用中验证用户身份(4)
在ASP应用中验证用户身份(5)
用ASP开发一个在线考试程序(一)
用ASP开发一个在线考试程序(二)
用ASP开发一个在线考试程序(三)
用ASP开发一个在线考试程序(四)
用表单来提交sql - 1
用表单来提交sql - 2
用表单来提交sql - 3
让您的主页支持各种浏览设备(ASP+篇)(上)
如何用ASP编写网站统计系统(一)
如何用ASP编写网站统计系统(二)
如何用ASP编写网站统计系统(三)
如何用ASP编写网站统计系统(四)
一个免费的邮件列表源程序(一)
一个免费的邮件列表源程序(二)
一个免费的邮件列表源程序(三)
用密码保护页面 (I)

用ASP实现播放Flash的例子


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

       <!-- #include file = "DB.fun" --><br>
  <%<br>
  mingcheng=request("mingcheng")<br>
  sec=Request("score")<br>
  session("mingcheng")=mingcheng<br>
  session("sec")=sec<br>
  If session("ID")="" then <br>
     response.redirect "qzhuce.asp"<br>
     response.end<br>
  End If<br>
  dim time1<br>
  sec=Request("score")<br>
  Set conn = GetMdbConnection("score.mdb")<br>
  time1=Cstr(date)<br>
  SQL2="select * from mmd where nickname=''"&session("id")&"''"<br>
  Set zy2 = Conn.Execute( SQL2 ) <br>
  old = zy2("mgdf")<br>
  ''response.write old<br>
  ''zy2.close<br>
  if cint(old) <= cint(sec) and cint(old)<>0 then<br>
      SQL1="update mmd set mgdf ="&old&",time1=''"&time1&"'' where nickname =''"&session("id")&"''"<br>
  else   <br>
      SQL1="update mmd set mgdf ="&sec&",time1=''"&time1&"'' where nickname =''"&session("id")&"''"<br>
  end if<br>
  Set zy1 = Conn.Execute( SQL1 )<br>
  ''zy1.close<br>
  %><br>
  <HTML><br>
  <HEAD><br>
  <TITLE> m&m''s</TITLE><br>
  <META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312" ><br>
  </HEAD><br>
  <BODY BGCOLOR=#FFFFFF marginwidth=0 marginheight=0 leftmargin=0 topmargin=0><br>
  <OBJECT classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"<br>
  codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0"<br>
  WIDTH=550 HEIGHT=400><br>
  <param name="_cx" value="14552"><br>
  <param name="_cy" value="10583"><br>
  <param name="Movie" value="/mms/search_score.swf?user=<%=session("id")%>&score=<%=sec%>"><br>
  <param name="Src" value="/mms/search_score.swf?user=<%=session("id")%>&score=<%=sec%>"><br>
  <param name="WMode" value="Window"><br>
  <param name="Play" value="0"><br>
  <param name="Loop" value="-1"><br>
  <param name="Quality" value="High"><br>
  <param name="SAlign" value><br>
  <param name="Menu" value="-1"><br>
  <param name="Base" value><br>
  <param name="Scale" value="ShowAll"><br>
  <param name="DeviceFont" value="0"><br>
  <param name="EmbedMovie" value="0"><br>
  <param name="BGColor" value><br>
  <param name="SWRemote" value><embed src="/upload/tech/20091103/20091103094552_eed5af6add95a9a6f1252739b1ad8c24.swf"" quality="high" bgcolor="#FFFFFF" WIDTH="550" HEIGHT="400" YPE="application/x-shockwave-flash" PLUGINSPAGE=&q