标题: 怎么得到文件的目录名，有这样的函数吗？ [打印本页]

---

作者: Kitte    时间: 2006-5-14 13:50     标题: 怎么得到文件的目录名，有这样的函数吗？

怎么得到文件的目录名，有这样的函数吗？  
比如，我c:\aa\test.txt  
我想用一个函数取去目录c:\aa

---

作者: 流浪天崖    时间: 2006-5-14 13:51

GetParentFolderName  方法  

描述  
返回字符串，该字符串包含指定的路径中最后一个文件或文件夹的父文件夹。  
语法  
object.GetParentFolderName(path)   
GetParentFolderName  方法的语法有以下部分：   

部分  描述   
object  必选。应为  FileSystemObject  的名称。   
path  必选。指定路径，要返回文件或文件夹的父文件夹名。   




<SCRIPT  LANGUAGE="VBScript">  
Function  GetTheParent(DriveSpec)   
           Dim  fso  
           Set  fso  =  CreateObject("Scripting.FileSystemObject")  
           GetTheParent  =  fso.GetParentFolderName(Drivespec)  
           Set  fso  =  Nothing  
End  Function  
MsgBox  GetTheParent("C:\Program  Files\Internet  Explorer\IEXPLORE.EXE")  
</SCRIPT>

---

欢迎光临 编程开发论坛 (http://bbs.lihuasoft.net/)

Powered by Discuz! 6.0.0