vba不能提取服务器上文件名,从全路径文件名中获取文件名（不含路径）

从全路径文件名中获取文件名(不含路径)

方法一：

Public Function gf_GetFileName(strFullPath As String) As String

Dim splitList As Variant

splitList = VBA.Split(strFullPath, "")

gf_GetFileName = splitList(UBound(splitList, 1))

End Function

方法二：

'intType=0 获取路径

'intType=1 获取文件名

'intType=2 获取扩展名

Public Function SplitstrFullPath(strFullPath As String, intType As Integer) As String

Dim intSplitPos As Integer, intDotPos As Integer

intSplitPos = InStrRev(strFullPath, "/")

intDotPos = InStrRev(strFullPath, ".")

Select Case intType

Case 0

SplitstrFullPath = Left(strFullPath, intSplitPos - 1)

Case 1

If intDotPos = 0 Then intDotPos = Len(strFullPath) + 1

SplitstrFullPath = Mid(strFullPath, intSplitPos + 1, intDotPos - intSplitPos - 1)

Case 2

If intDotPos = 0 Then intDotPos = Len(strFullPath)

SplitstrFullPath = Mid(strFullPath, intDotPos + 1)

Case Else

Err.Raise vbObjectError + 1, "拆分路径函数", "无效的参数!"

End Select

End Function

vba不能提取服务器上文件名,从全路径文件名中获取文件名（不含路径）相关推荐

php获取当前文件名和路径,PHP 中获取文件名及路径
PHP 中获取文件名及路径为了脚本程序的兼容性,很多时候脚本的名称都不是固定的.所以我们需要通过动态获取当前脚本的路径.文件名来完成某些功能. PHP 中,我们可以使用常量 __FILE__ 来获取 ...
在服务器上虚拟w7,如何在虚拟机中获取Win7 Aero特效(图)
根据国外媒体报道,目前,微软推出了Windows 7模拟XP系统RC版本的OS下载,Windows 7专业版.企业版和旗舰版用户都可以使用该模拟系统来解决一些兼容性问题.但是对于虚拟机中还是存在一些问 ...
linux 读取zip文件内容,如何从linux服务器上的大(30Gb)zip文件中提取文件
1)从大型zip文件中提取我想从linux服务器上的大型zip文件(30Gb)中提取文件.有足够的可用磁盘空间. 我试过jar xf dataset.zip.但是,按钮已满,出现错误,无法提取所有文 ...
vba可以放服务器上处理文档,vba 用服务器运行内存溢出
vba 用服务器运行内存溢出内容精选换一换一个完整的AI CPU算子包含四部分:算子原型定义.对应开源框架的算子适配插件.算子信息库定义和算子实现.算子开发完成后在昇腾AI处理器硬件平台上的编 ...
img服务器上的图片不显示不出来,img标签使用绝对路径无法显示图片
说明:图片的磁盘路径斜杠使用右斜杠"\",而图片的网络路径使用左斜杠"/",注意加以区分. 如果一张图片属于服务器图片或者网络图片,我们必须在img标签里使用网 ...
上传到linux服务器上的EXCEL、图片、文件地址获取不同
场景: 最近写的项目有涉及到读取文件.excel.图片信息到项目中,在本地运行一切正常,放到服务器上的路径就读取不出来了.下面给出解决办法 1.项目中的excel模板的读取方式(模板在resource ...
perl语言：分割路径字符串，获取文件名
#获取path变量内的A1_0.htk文件名$path="C:\Users\ABC\Desktop\ivector\data\A1_0.htk"; @Name = split(/\ ...
python提取文件名数字_在Python中从文件名提取扩展名
是否有从文件名中提取扩展名的功能? #1楼一种选择可能是与点分开: >>> filename = "example.jpeg" >>> fil ...
服务器上文件共享有哪些协议,Windows中的文件共享协议
实验步骤步骤 1:下载实验文件小 i 提示: 在本次实验中,请注意实验工具.实验文件存放路径,不同的文件路径可能会出现不一样的实验结果. 在实验环境中无法连接互联网,请使用您本地的网络环境. 步骤 ...

vba不能提取服务器上文件名,从全路径文件名中获取文件名（不含路径）

vba不能提取服务器上文件名,从全路径文件名中获取文件名（不含路径）相关推荐

最新文章

热门文章