WEB开发网
开发学院WEB开发ASP 用ASP+XML结合数据库 给服务器减负 阅读

用ASP+XML结合数据库 给服务器减负

 2007-12-15 09:58:16 来源:WEB开发网   
核心提示: <td><input name="textURL" type="text" id="textURL" style="WIDTH: 328px; BACKGROUND-COLOR: darkorange;color: #000000

   <td><input name="textURL" type="text" id="textURL" style="WIDTH: 328px; BACKGROUND-COLOR: darkorange;color: #000000;"></td>
   <td><div align="right">
     <input name="btnNET" type="reset" id="btnNET" value="播放">
    </div></td>
  </tr>
 </table>
</div>
<div id="Layer5" style="position:absolute; width:500px; height:20px; z-index:5; left: 120px; top: 320px;">
 <p><font color="#FFFFFF" size="2">正在播放:
  <input name="textSonger" type="text" class="input" id="textSonger" size="15">
  演唱的
  <input name="textSongName" type="text" class="input" id="textSongName" size="35">
  </font></p>
</div>
<div id="Layer6" style="position:absolute; width:500px; height:150px;
z-index:6; left: 120px; top: 349px;">
 <textarea name="area" cols="68" rows="15" id="area"
  style="BORDER-RIGHT: white double; BORDER-TOP: white double;
BORDER-LEFT: white double;COLOR: #000000; DIRECTION: ltr;
BORDER-BOTTOM: white double;BACKGROUND-COLOR: darkorange;
TEXT-ALIGN: left">
 </textarea>
</div>

<!--各按钮的单击事件-->
<script language="VBScript">
sub play()
textSonger.value=xml(标准化越来越近了)("演唱者")
textSongName.value=xml(标准化越来越近了)("歌名")
textURL.value=""
area.value=xml(标准化越来越近了)("歌词")
player.filename=xml(标准化越来越近了)("URL")

if xml(标准化越来越近了).AbsolutePosition=xml(标准化越来越近了).recordcount then
btnNext.disabled=true
else
btnNext.disabled=false
end if

if xml(标准化越来越近了).AbsolutePosition=1 then
btnPre.disabled=true
else
btnPre.disabled=false
end if
end sub

sub btnLAN_onclick
xml(标准化越来越近了).MoveFirst
while xml(标准化越来越近了)("URL")<>list.value
xml(标准化越来越近了).MoveNext
wend
call play()
end sub

sub btnNET_onclick
player.filename = textURL.value
textSonger.value = ""
textSongName.value = ""
area.value = "自定义网络歌曲"
end sub

sub btnPre_onclick
xml(标准化越来越近了).MovePrevious
list.selectedIndex = list.selectedIndex - 1
call play()
end sub

sub btnNext_onclick
xml(标准化越来越近了).MoveNext
list.selectedIndex = list.selectedIndex + 1
call play()
end sub
</script>
</body>
</html>

   现在,你知道怎么给服务器减负了吗?^-^

   本文旨在探讨,如有错漏,欢迎指正与讨论。
   感谢站长miles这些日子来不倦的帮助,无以回报,唯有灌上此文。

技术交流 永无止境

上一页  1 2 3 4 5 6 

Tags:ASP XML 结合

编辑录入:coldstar [复制链接] [打 印]
赞助商链接