asp 程序怎么得到文件的大小和(音乐播放)长度和类型?
asp程序怎么得到文件的大小和(音乐播放)长度和类型?例如http://www.abc.com/123.mp3根据这个地址算出来这个音乐文件的长度的类型.有的文件是wma...
asp 程序怎么得到文件的大小和(音乐播放)长度和类型?
例如 http://www.abc.com/123.mp3 根据这个地址 算出来这个音乐文件 的长度的类型.有的文件是wma .wav .rm .rmvb. 文件地址现在都在数据库里 (Access 数据库) 我想在添加数据的时候 计算出来大小 音乐播放长度 和类型 并写入数据库里 和gougou.com 搜索结果并不多 请高手指教? 展开
例如 http://www.abc.com/123.mp3 根据这个地址 算出来这个音乐文件 的长度的类型.有的文件是wma .wav .rm .rmvb. 文件地址现在都在数据库里 (Access 数据库) 我想在添加数据的时候 计算出来大小 音乐播放长度 和类型 并写入数据库里 和gougou.com 搜索结果并不多 请高手指教? 展开
展开全部
asp可以获取文件大小,类型,获取音乐文件时间长度做不到
以下函数可以得到文件大小,类型,创建时间等
<%
Function showsize(filename)
FPath=server.mappath(filename)
set fso=server.CreateObject("scripting.filesystemobject")
If fso.fileExists(FPath) Then
Set f = fso.GetFile(FPath)
filetype=f.type
filesize=f.size
adddate=f.DateCreated
Select Case true
Case filesize<1024
fsize=filesize&" B"
Case filesize<1048576
fsize=Round((filesize/1024),2)&" KB"
Case filesize<1073741824
fsize=Round((filesize/1024/1024),2)&" MB"
Case else
fsize=Round((filesize/1024/1024/1024),2)&" GB"
End Select
Response.Write "文件大小:"&fsize&",文件类型:"&filetype&",创建时间:"&adddate
else
Response.Write"文件不存在!"
end if
End Function
%>
调用:<%Call showsize("文件路径及文件名")%>
以下函数可以得到文件大小,类型,创建时间等
<%
Function showsize(filename)
FPath=server.mappath(filename)
set fso=server.CreateObject("scripting.filesystemobject")
If fso.fileExists(FPath) Then
Set f = fso.GetFile(FPath)
filetype=f.type
filesize=f.size
adddate=f.DateCreated
Select Case true
Case filesize<1024
fsize=filesize&" B"
Case filesize<1048576
fsize=Round((filesize/1024),2)&" KB"
Case filesize<1073741824
fsize=Round((filesize/1024/1024),2)&" MB"
Case else
fsize=Round((filesize/1024/1024/1024),2)&" GB"
End Select
Response.Write "文件大小:"&fsize&",文件类型:"&filetype&",创建时间:"&adddate
else
Response.Write"文件不存在!"
end if
End Function
%>
调用:<%Call showsize("文件路径及文件名")%>
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询