BVB Source Codes

V2.0 flowers chat rooms Show MIDISEND.ASP Source code

Return Download V2.0 flowers chat rooms: download MIDISEND.ASP Source code - Download V2.0 flowers chat rooms Source code - Type:.ASP
  1. <!--#INCLUDE FILE="inc_config.asp"-->
  2. <html>
  3. <head>
  4. <title>点歌台</title>
  5. <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
  6. <style type="text/css">
  7. <!--
  8. body      {  font-size: 10.4pt }
  9. td        {  font-size: 10.4pt }
  10. .normal   {  <%=m_button%> ; font-size: 10.4pt}
  11. .over     {  <%=m_buttonover%> ; font-size: 10.4pt}
  12. .down     {  <%=m_buttondown%> ; font-size: 10.4pt}
  13. -->
  14. </style>
  15. </head>
  16.  
  17. <body text="<%=m_text2%>" bgcolor="<%=m_bg2%>">
  18. <%
  19. if request("midi")="" then response.end
  20. if request("midi")="noname" then midin="无名"
  21. if request("midi")="lowheart" then midin="心太软"
  22. if request("midi")="tian" then midin="甜蜜蜜"
  23. if request("midi")="love2000" then midin="恋曲2000"
  24. if request("midi")="crysea" then midin="泪海"
  25. if request("midi")="huanzu" then midin="还珠"
  26. if request("midi")="wind" then midin="风中奇缘"
  27. if request("midi")="heart" then midin="动心"
  28. if request("midi")="donotask" then midin="别问我是谁"
  29. if request("midi")="think" then midin="想说爱你不容易"
  30. if request("midi")="thank" then midin="谢谢你的爱"
  31. if request("midi")="little" then midin="有一点点动心"
  32. if request("midi")="dream" then midin="半梦半醒"
  33. if request("midi")="hero" then midin="真心英雄"
  34. if request("midi")="birthday" then midin="祝你生日快乐"
  35. if request("midi")="foryou" then midin="特别的爱给特别的你"
  36. if request("midi")="letme" then midin="让我欢喜让我忧"
  37. if request("midi")="promise" then midin="诺言(李翊君)"
  38. if request("midi")="nextlife" then midin="来生缘"
  39. if request("midi")="choose" then midin="选择"
  40. if request("midi")="yihan" then midin="遗憾"
  41. if request("midi")="realy" then midin="真的有你"
  42. if request("midi")="know" then midin="知不知"
  43.  
  44. application.lock
  45. for i =1 to 39
  46.               application("systemsay" & i)  = application("systemsay" & i+1)
  47.           application("sexsay" & i)     = application("sexsay" &i+1)
  48.           application("me" & i)         = application("me" & i+1)
  49.           application("color" & i)      = application("color" & i+1)
  50.           application("showip" & i)     = application("showip" & i+1)
  51.           application("mood" & i)       = application("mood" & i+1)
  52.           application("to" & i)         = application("to" & i+1)
  53.           application("siliao" & i)     = application("siliao" & i+1)
  54.           application("zixiao" & i)     = application("zixiao" & i+1)
  55.           application("page" & i)       = application("page" & i+1)
  56.           application("tuan" & i)       = application("tuan" & i+1)
  57.           application("tietu" & i)      = application("tietu" & i+1)
  58.           application("saytime" & i)    = application("saytime" & i+1)
  59. next
  60.               application("systemsay" & 40) = "function"
  61.           application("me" & 40)        = session("user")
  62.           application("sexsay" & 40)    = session("sex")
  63.           application("color" & 40)     = "#5F417C"
  64.           application("showip" & 40)    = session("ip")
  65.           application("mood" & 40)      = ""
  66.           application("to" & 40)        = Server.HTMLEncode(trim(request("name")))
  67.           application("siliao" & 40)    = trim(request("towhoway"))
  68.           application("zixiao" & 40)    = ""
  69.           application("page" & 40)      = "var_who点了首『"& midin &"』给 var_to,您是否要收听? 〖<a href='can.asp?midi="& request("midi") &"' target='frm_can'>收听</a>〗"
  70.           application("tuan" & 40)      = ""
  71.           application("tietu" & 40)     = ""
  72.           application("saytime" & 40)   = time
  73. application.unlock
  74. %>
  75. <br><br>
  76. <center><strong>您的歌曲已放送,谢谢您!</strong><br><br>
  77. <input type="button" value="返回" class="normal" onmouseover="this.className='over'" onmousedown="this.className='down'" onmouseout="this.className='normal'" onclick="javascript:history.go(-1)">
  78. <input type="button" value="关闭" class="normal" onmouseover="this.className='over'" onmousedown="this.className='down'" onmouseout="this.className='normal'" onclick="javascript:window.close()">
  79. </center>
  80. </body>
  81. </html>
downloadMIDISEND.ASP Source code - Download V2.0 flowers chat rooms Source code
Related Source Codes/Software:
WebSMS online chat system - A web-based chat tool, it does not need to install... 2016-09-16
Non-mainstream chat rooms (support virtual space) - This chat room mainly conveniently in the virtual ... 2016-09-16
Dream chatroom v1.2 Build 0523 - Based on "love strings if chat rooms" program modi... 2016-09-16
One hundred million people chat v3.0 - Classification of support chat, public and private... 2016-09-16
X-chat System v1.5 - Adopted more advanced technology of XMLHTTP + XML ... 2016-09-16
Red dragonfly chat rooms v4.00 dongdong beautify the version to be error-free - 1, the application to modify the program online, i... 2016-09-16
Ichat2.5 formal version of the video chat program - Ichat2.5 formal version of the video chat program 2016-09-16
Draw two alumni source code - This source code is free release, free communicati... 2016-09-16
Sega school green version of the site management system - Sega school green version 2016-09-16
Free and unfettered access statistics system - A set of simple, rapid access statistics program, ... 2016-09-16
envoy - Python Subprocesses for Humans ™. 2017-05-08
wide - 2017-05-08
vincent - A Python to Vega translator 2017-05-08
debugging-stories - A collection of debugging stories. PRs welcome :-)... 2017-05-08
cms.js - The Javascript Site Generator ... 2017-05-08
flannel - flannel is a network fabric for containers, design... 2017-05-08
nu - Nu is an interpreted Lisp that builds on the Objec... 2017-05-07
gobyexample - Go by Example https://gobye... 2017-05-07
nova - OpenStack Compute (Nova) ht... 2017-05-07
mio - Metal IO library for Rust 2017-05-07

 Back to top