Rem : =========== 获得文件名,不包括路径部分 Rem : =========== file 必须存在 Function GetFileName( file ) If fso.fileexists(file)=False Then Err.Raise vbObjectError+128, "GetFileName", "File : " & file & " does not exist" Dim errMsg On Error Resume
vbs 代码 :GetFileName
最新推荐文章于 2024-06-12 15:35:57 发布
![](https://img-home.csdnimg.cn/images/20240711042549.png)