第2个回答 2006-12-18
一个move.asp的静态例子,希望对你有帮助,由于我这里没有现成的数据库,只好做个客户端的例子了。
<iframe src="../asp/play.asp" frameborder="0" scrolling="no" name="player"></iframe>
<br><br>
<table>
<tr>
<%
Dim index,url
for i=1 to 13
if i<10 then
index = "0"&CStr(i)
else
index = CStr(i)
end if
url = "video/"&index&".rmvb" '这里可以取你的数据库url,可以是相对路径,也可以是绝对路径。
%>
<td>
<a href="#" onclick="changeURL(<%= url %>);" ><%= index %></a>
</td>
<%
next
%>
</tr>
</table>
<script>
var ply;
window.onload = function(){
ply = document.frames("player").document.all.player;
}
function changeURL(url){
ply.SetSource(url);
}
</script>
第3个回答 2006-12-26
//访问方式:<a href="#" onClick="window.open('player.asp?id=<%=rs("id")%>','','toolbar=no,menubar=no,height=460, width=418')"><font size="2">播放影片</font></a>
//本帖以下保存为player.asp,下载后把<%=rs("bfdz")%>你自己的电影的播放地址
//QQ:104708249,不行再找我,这个是我ASP的第一个作品的代码,100%可用。
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="Conn.asp"-->
<%
id=Request.Querystring("id")
sql="SELECT * from dianying where id="&id
set rs=conn.execute(sql)
%>
<html>
<head>
</head>
<title>啊K网络播放器V1.5版-->正在播放[<%=rs("dymc")%>]</title>
<body topmargin="0" leftmargin="0" marginwidth="0" marginheight="0" rightmargin="0" bottommargin="0">
<div align="center">
<table width="42%" height="461" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="63" colspan="3">
<object classid="clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA" name="player" width="417" height="337" align="middle" id="player">
<param name="_ExtentX" value="11033">
<param name="_ExtentY" value="8916">
<param name="AUTOSTART" value="-1">
<param name="SHUFFLE" value="0">
<param name="PREFETCH" value="0">
<param name="NOLABELS" value="0">
<param name="SRC" value='<%=rs("bfdz")%>'>
<param name="CONTROLS" value="Imagewindow">
<param name="CONSOLE" value="clip1">
<param name="LOOP" value="0">
<param name="NUMLOOP" value="0">
<param name="CENTER" value="0">
<param name="MAINTAINASPECT" value="0">
<param name="BACKGROUNDCOLOR" value="#000000">
<embed src="<%=rs("bfdz")%>" width="427" height="337" autostart="-1" loop="-1" align="middle" _extentx="12118" _extenty="7938" shuffle="0" prefetch="0" nolabels="0" controls="Imagewindow" console="clip1" numloop="0" center="0" maintainaspect="0" backgroundcolor="#000000" name="player"></embed>
</object></td>
</tr>
<tr>
<td height="61" colspan="3">
<object classid="clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA" width="417" height="60" align="middle" id="RP2">
<param name="_ExtentX" value="11033">
<param name="_ExtentY" value="1588">
<param name="AUTOSTART" value="-1">
<param name="SHUFFLE" value="0">
<param name="PREFETCH" value="0">
<param name="NOLABELS" value="0">
<param name="SRC" value='<%=rs("bfdz")%>'>
<param name="CONTROLS" value="ControlPanel,StatusBar">
<param name="CONSOLE" value="clip1">
<param name="LOOP" value="0">
<param name="NUMLOOP" value="0">
<param name="CENTER" value="0">
<param name="MAINTAINASPECT" value="0">
<param name="BACKGROUNDCOLOR" value="#000000">
<embed src="<%=rs("bfdz")%>" width="427" height="60" autostart="-1" loop="-1" align="middle" _extentx="12171" _extenty="1588" shuffle="0" prefetch="0" nolabels="0" controls="ControlPanel,StatusBar" console="clip1" numloop="0" center="0" maintainaspect="0" backgroundcolor="#000000"></embed>
</object></td>
</tr>
<tr>
<td width="26%" height="21"> </td>
<td width="43%" height="21">
<input type="button" onClick="if (document.player.GetPlayState()==3) document.player.SetFullScreen()" name value="点击放大欣赏ESC返回" ></td>
<td width="28%" height="21"> </td>
</tr>
<tr>
<td width="99%" height="23" colspan="3">
<marquee>啊K提示:避免在高峰期观看本站电影,会导致增加服务器负担。</marquee></td>
</tr>
</table>
</div>
<% sql="UPDATE dianying SET dbcs=dbcs+1 WHERE id="&id
set rs=conn.execute(sql)
%>