|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks 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")%>&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="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) |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |