原创著作,产权保护 政府、投票、评选、公安、学校、问卷、视频会议专注发展中小企事业 系统报价 | 支付帐号 | 授权查证
    计算机著作版权登记号:2014SR032463 手机:+86-1373066-4304 | QQ:1213920482 欢迎选择智睿软件系统 欢迎选择智睿软件系统
智睿软件系统
asp获取文件名称及扩展名
来源:智睿 浏览:289 次 发布时间:2023-10-23 16:32:10
'获取文件名(不含扩展名)

Function getFilename(text)
text = Left(text,inStrRev(text,".")-1)
getFilename = text

End Function

 

'获取扩展名

Function getExtn(text)
text = Left(text,inStr(text,".")-1)
getExtn = text
End Function
Function getFileExt(sFileName) 
getFileExt = Mid(sFileName,InstrRev(sFileName,".") + 1) 
End Function

微软office提供在线加载服务:
https://view.officeapps.live.com/op/view.aspx?src=xxx.xlsx
https://view.officeapps.live.com/op/embed.aspx?src=xxx.xlsx
参数:src:文件链接(不支持本地)
view:只读模式,带功能菜单
embed:只读模式,只有内容区
【刷新页面】【加入收藏】【打印此文】 【关闭窗口】
上一篇:智睿公安公众信息管理系统 V 10.5.4 公安内网信息系统,公安信息公众系统 下一篇:HTML在线预览Word,Excel