请问如何播放Access库里的Midi歌曲。

文件midi.asp的内容:

 1   
 2id=request("ID")   
 3Set conn = Server.CreateObject("ADODB.Connection")   
 4DBPath = Server.MapPath("RingCode.mdb")   
 5conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath   
 6set rs=server.createobject("ADODB.recordset")   
 7sql="select * from midi where ID=" & id   
 8rs.open sql,conn,1,1   
 9Response.ContentType = "media/midi" //难道是这错了。。。。   
10Response.BinaryWrite rs("Midi") //还是这错了........   
11rs.close   
12set rs=nothing   
13set connGraph=nothing   

文件sing.asp的内容:
......

1<bgsound loop="-1" src="midi.asp?ID=00001"/>

//还是这错了。。。。。
......

请各位大虾们指点一二
---------------------------------------------------------------

MIDI 应该也是二进制文件的传送和保存方法呀

也就是说按道理说跟图片一样呀
---------------------------------------------------------------

sql="select Midi from midi where ID=" & id
rs.open sql,conn,1,1
Response.ContentType = "media/midi"
Response.BinaryWrite rs("Midi")
---------------------------------------------------------------

ok?

Published At
Categories with Web编程
Tagged with
comments powered by Disqus