BVB Source Codes

Seven VIP jubilee dance CMS management system Show MusicAdd.asp Source code

Return Download Seven VIP jubilee dance CMS management system: download MusicAdd.asp Source code - Download Seven VIP jubilee dance CMS management system Source code - Type:.asp
  1. <!--#include file="../../Sql_Conn.asp"-->
  2. <!--#include file="../../Inc/Inc.Asp"-->
  3. <!--#include file="../../Inc/Config.asp"-->
  4. <%
  5. action=request("action")
  6. if action="add" then
  7. From_url = Cstr(Request.ServerVariables("HTTP_REFERER"))
  8. Serv_url = Cstr(Request.ServerVariables("SERVER_NAME"))
  9.  if mid(From_url,8,len(Serv_url)) <> Serv_url then
  10.      response.write "<br><p align=center><font color='red' style='font-size:9pt'>对不起,为了系统安全,请到本站访问此页面。</font></p>"
  11.      response.end
  12.  end If
  13.  if UserLogined<>True then
  14.      response.write"<script>alert(' 请登陆后操作,谢谢您的支持 !')</script><script type='text/javascript'>parent.sea_pop.close();</script>"
  15.      response.end
  16.  end if
  17. SdID=request("SdID")
  18. SdUrl=request("SdUrl")
  19.    uploadtype="mp3|wma|wav"
  20.    F_Ext = Mid(SdUrl, InStrRev(SdUrl, ".") + 1)
  21.    FileExt="."&LCase(F_Ext) '转为小写
  22.  
  23.    uploadsuc=false
  24.    Forumupload=split(LCase(uploadtype),"|")
  25.    for i=0 to ubound(Forumupload)
  26.         if fileEXT="."&trim(Forumupload(i)) then
  27.         uploadsuc=true
  28.         exit for
  29.         else
  30.         uploadsuc=false
  31.         end if
  32.    next
  33.    if uploadsuc=false then
  34.         response.write "<script>alert(' 对不起,只支持 "&uploadtype&" 等格式的歌曲!');history.back(1);</script>"
  35.         response.end
  36.    end if
  37.    set RsShopB=conn.execute("SELECT * FROM Ylmv_ShopData where UserName='"&Ylmv_Com_Name&"' and SdClass=1 and SdUrl='"&SdUrl&"' and SdID='"&SdID&"'")
  38.    if not RsShopB.eof then
  39.    Response.Write "<script>alert(' 这首音乐你已经添加过了,请到我的播放列表查看 !');history.back(1);</script>"
  40.    Response.End
  41.    end if
  42.    RsShopB.Close
  43.    Set RsShopB=nothing
  44.  
  45.    set rse=server.createobject("adodb.recordset")
  46.    rse.open "select * from Ylmv_ShopData where id is null",conn,1,3
  47.    rse.addnew
  48.    rse("SdID")=FormatStr(SdID)
  49.    rse("UserID")=Ylmv_Com_Uid
  50.    rse("UserName")=Ylmv_Com_Name
  51.    rse("SdClass")=1
  52.    rse("SdUrl")=FormatStr(SdUrl)
  53.    rse("SdDate")=Now()
  54.    rse.update
  55.    rse.close
  56.    set rse=nothing
  57.    response.write"<script language='javascript'>parent.poperror('添加音乐成功。',true);</script>"
  58.    response.end
  59. elseif action="play" then
  60.  url=request("url")
  61.  url=LCase(url)
  62.  if left(url,5)="music" then
  63.  url=InstallDir&"web/"&url
  64.  else
  65.  url=url
  66.  end if
  67. %>
  68. <base oncontextmenu=self.event.returnValue=false>
  69. <SCRIPT type=text/javascript>document.write("<object id='WMP' name='WMP' width='300' height='65' classid='CLSID:6BF52A52-394A-11d3-B153-00C04F79FAA6' type='application/x-oleobject'><param name='url' value='<%=url%>'><param name='Balance' value='0'><param name='ShowControls' value='1'><param name='ShowPositionControls' value='0'><param name='ShowAudioControls' value='1'><param name='ShowTracker' value='1'><param name='ShowDisplay' value='0'><param name='ShowStatusBar' value='1'><param name='AutoSize' value='0'><param name='ShowGotoBar' value='0'><param name='ShowCaptioning' value='0'><param name='AutoStart' value='1'><param NAME='PlayCount' value='1'><param name='AnimationAtStart' value='0'><param name='TransparentAtStart' value='0'><param name='AllowScan' value='0'><param name='EnableContextMenu' value='0'><param name='ClickToPlay' value='0'><param name='InvokeURLs' value='1'><param name='DefaultFrame' value='datawindow'><param name='volume' value='100'><embed src='<%=url%>' align='baseline' border='0' width='300' height='65' type='application/x-mplayer2' pluginspage='' name='WMP' showcontrols='1' showpositioncontrols='0' showaudiocontrols='1' showtracker='1' showdisplay='0' showstatusbar='1' autosize='0' showgotobar='0' showcaptioning='0' autostart='1' autorewind='0' animationatstart='0' transparentatstart='0' allowscan='1' enablecontextmenu='1' clicktoplay='0' defaultframe='datawindow' Volume='0' invokeurls='0'></embed></object>");</SCRIPT>
  70. <%elseif action="musicplay" then
  71. n=FormatStr(request("n"))
  72. s=FormatStr(request("s"))
  73. u=FormatStr(request("u"))
  74. n=RemoveHTML(n)
  75. s=RemoveHTML(s)
  76. u=RemoveHTML(u)
  77. %>
  78. <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
  79. <html xmlns="http://www.w3.org/1999/xhtml">
  80. <head>
  81. <title><%=s%>:<%=n%> 歌曲试听</title>
  82. <meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
  83. <style type="text/css">
  84. body{margin:0px;padding:0px;background-color:#f1f1f1;}
  85. *{ font-family:Arial;}
  86. #c{margin:0px auto;width:100%; height:220px; font-size:12px;}
  87. .li{font-size:14px;line-height:18px;float:left;list-style-type:none;font-weight:bold;}
  88. #c p{ margin:0 0 0 0;padding:12px 30px 6px 40px; vertical-align:middle;}
  89. #c td{font-weight:bold;}
  90. #t{height:105px;background-color:white;font-size:14px; line-height:30px;}
  91. *{ word-break:break-all;word-wrap:break-word;}
  92. #txt{ color:#777777; line-height:16px;}
  93. #txt a{ color:#777777;font-family:宋体;}
  94. </style>
  95. </head>
  96. <body leftmargin="0" topmargin="0" vlink="#0033CC" link="#0033CC">
  97.         <div id="c">
  98.             <div id="t">
  99.                 <div style="padding: 20px 0px 0px 40px;">
  100.                     歌曲名:
  101.                     <a id="hlinkSongTitle" href="<%=u%>"><%=n%></a><br />
  102.                     歌手名:
  103.                     <%=s%>&nbsp;&nbsp;<br />
  104.                     <li class="li" style="margin-top: 2px;">歌曲链接:</li>
  105.                     <li class="li" style="margin-right: 10px;">
  106.                         <a id="hlinkSongUrl" href="<%=u%>"><%=u%></a></li>
  107.                 </div>
  108.             </div>
  109.             <p id="txt">
  110. <SCRIPT type=text/javascript>document.write("<object id='WMP' name='WMP' width='350' height='68' classid='CLSID:6BF52A52-394A-11d3-B153-00C04F79FAA6' type='application/x-oleobject'><param name='url' value='<%=u%>'><param name='Balance' value='0'><param name='ShowControls' value='1'><param name='ShowPositionControls' value='0'><param name='ShowAudioControls' value='1'><param name='ShowTracker' value='1'><param name='ShowDisplay' value='0'><param name='ShowStatusBar' value='1'><param name='AutoSize' value='0'><param name='ShowGotoBar' value='0'><param name='ShowCaptioning' value='0'><param name='AutoStart' value='1'><param NAME='PlayCount' value='1'><param name='AnimationAtStart' value='0'><param name='TransparentAtStart' value='0'><param name='AllowScan' value='0'><param name='EnableContextMenu' value='0'><param name='ClickToPlay' value='0'><param name='InvokeURLs' value='1'><param name='DefaultFrame' value='datawindow'><param name='volume' value='100'><embed src='<%=u%>' align='baseline' border='0' width='350' height='68' type='application/x-mplayer2' pluginspage='' name='WMP' showcontrols='1' showpositioncontrols='0' showaudiocontrols='1' showtracker='1' showdisplay='0' showstatusbar='1' autosize='0' showgotobar='0' showcaptioning='0' autostart='1' autorewind='0' animationatstart='0' transparentatstart='0' allowscan='1' enablecontextmenu='1' clicktoplay='0' defaultframe='datawindow' Volume='0' invokeurls='0'></embed></object>");</SCRIPT>
  111.             </p>
  112.         </div>
  113.         </div>
  114. </body>
  115. </html>
  116. <%else%>
  117. <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
  118. <html>
  119. <head>
  120. <meta http-equiv="content-type" content="text/html;charset=gb2312">
  121. <title>新建音乐</title>
  122. <link rel="stylesheet" type="text/css" href="common.css" />
  123. <script language = "JavaScript">
  124.     function CheckForm(){
  125.         if (document.myform.SdID.value==""){
  126.             alert("音乐名称不能为空!");
  127.             document.myform.SdID.focus();
  128.             return false;
  129.         }
  130.         if (document.myform.SdUrl.value==""){
  131.             alert("音乐链接不能为空!");
  132.             document.myform.SdUrl.focus();
  133.             return false;
  134.         }
  135.         return true;
  136.     }
  137. </script>
  138. </head>
  139. <body oncontextmenu=self.event.returnValue=false>
  140. <form action="?action=add" method="post" name="myform">
  141.   <table border="0" cellspacing="6" cellpadding="1" class="formhd">
  142.     <tr>
  143.       <td width="70" class="f14" nowrap>音乐名称:</td>
  144.       <td><input type="text" name="SdID" maxlength="20" style="width:290px"><span class="gray">(必填)</span>
  145.       </td>
  146.     </tr>
  147.     <tr>
  148.       <td>&nbsp;</td>
  149.       <td><div class="error">例如:一起走过的日子-刘德华</div></td>
  150.     </tr>
  151.     <tr>
  152.       <td valign="top" class="f14" nowrap>音乐链接:</td>
  153.       <td><textarea name="SdUrl" rows="" cols="39"></textarea>
  154.       <span class="gray">(必填)</span>
  155.       </td>
  156.     </tr>
  157.     <tr>
  158.       <td>&nbsp;</td>
  159.       <td><div class="error">例如:http://www.ccysy.com/music/music/01/一起走过的日子.mp3</div></td>
  160.     </tr>
  161.     <tr>
  162.       <td>&nbsp;</td>
  163.       <td class="formsb"><input name="tj" type="submit" value=" 新建 " onClick="return CheckForm();" > <input name="close" type="button" value=" 返回 " onclick="parent.sea_pop.close()">&nbsp;&nbsp;<a href="http://mp3.baidu.com/" target="_blank">到百度搜索</a>&nbsp;&nbsp;添加完成后可以到我的播放列表查看</td>
  164.     </tr>
  165.   </table>
  166. </form>
  167. </body>
  168. </html>
  169. <%end if%>
  170.  
downloadMusicAdd.asp Source code - Download Seven VIP jubilee dance CMS management system Source code
Related Source Codes/Software:
Jie Yang v0.6.3 article system - System functions: 1, the system settings A confi... 2016-09-21
Download IT mop stand (with site to download the database ACC) - Background management: http://www.xxx.com/admin/ad... 2016-09-21
Pcook CMS bubble guest v3.0 SDCMS version - Developed by Asp+Access, and meet the needs of sma... 2016-09-21
PeterCMS3 v3.2 - PeterCMS is the original sirenCMS and a series of ... 2016-09-21
Subdomain hosting edition v1.9 s taobao, pat - The background site admin 2016-09-21
126oo CMS film station system - This procedure ASP + ACC/ASP + SQL, using new kern... 2016-09-21
Copy the site source code v2.01 - It is ok to cover the folder % S 2016-09-21
ETsale simple product sales management system V3.0 formal version - ETsale3.0 is developed by PHP+MySQL+Smarty+jQuery ... 2016-09-21
Mobile - shop. Tk all source code - Admin admin.php no database. The total data Modi... 2016-09-22
CRYENGINE - CRYENGINE is a powerful real-time game development... 2017-06-11
postal - 2017-06-11
reactide - Reactide is the first dedicated IDE for React web ... 2017-06-11
rkt - rkt is a pod-native container engine for Linux. It... 2017-06-11
uWebSockets - Tiny WebSockets https://for... 2017-06-11
realworld - TodoMVC for the RealWorld - Exemplary fullstack Me... 2017-06-11
goreplay - GoReplay is an open-source tool for capturing and ... 2017-06-10
pyenv - Simple Python version management 2017-06-10
redux-saga - An alternative side effect model for Redux apps ... 2017-06-10
angular-starter - 2017-06-10

 Back to top