当前页面位置: » 丰搜网 » 文档中心 » 详细内容
语音上传(三)
wav.asp '读取数据
<%@ language=vbscript %>
<% session.timeout=25%>
<%
set conn=server.createobject("adodb.connection")
connstr="provider=sqloledb.1;persist security info=false;user id=sa;initial catalog=database;data source=127.0.0.1;pwd="
conn.open connstr
if err.number<>0 or err then
err.clear
response.write err.description
response.end
%>
<script language="javascript">
alert("网络现在繁忙，数据库连接发生错误，请等待几分钟再访问。")
</script>
<%end if%>
<%
dim rs,id
set rs=server.createobject("adodb.recordset")
sql="select wav from sound where id='"&request("id")&"'"
rs.open sql,conn,1,1
response.contenttype = "audio/x-wav"
response.binarywrite rs("wav").getchunk(7500000)
'rs.close
'set rs=nothing
conn.close
set conn=nothing
%>
play.asp '试听
<!--<embed src="wav.asp?id=6%>" autostart="true" loop="true" height="45" width="320" volume="100"><br>-->
<!-- set showcontrols, showdisplay, showstatusbar 的值设定为 0，则不会显示在视频窗口下相对应的事物 -->
<object id="nsplay" width=300 height=145 classid="clsid:22d6f312-b0f6-11d0-94ab-0080c74c7e95" codebase="http://activex.microsoft.com/activex/controls/mplayer/en/nsmp2inf.cab#version=5,1,52,701" standby="加载 microsoft windows media player 组件..." type="application/x-oleobject">
<param name="filename" value="wav.asp?id=<%=request("id")%>">
<param name="showcontrols" value="1">
<param name="showdisplay" value="1">
<param name="showstatusbar" value="1">
<param name="autosize" value="1">
<embed src="wav.asp?uid=<%=request("id")%>" width="320" height="125" type="application/x-mplayer2" pluginspage="http://www.microsoft.com/windows/downloads/contents/products/mediaplayer/" filename="husteradio.asx" name="nsplay" showcontrols="1" showdisplay="1" showstatusbar="0">
</object>
