最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
asp 返回一个路径的目录名与父路径
时间：2022-06-29 13:47:37 编辑：袖梨 来源：一聚教程网
'############## 返回一个路径的目录名#########################################################################
function getpath(givepath) '返回一个路径的目录名
dim i,num,path
path=givepath
for i=0 to len(path)-1
if mid(path,len(path)-i,1)="/" or mid(path,len(path)-i,1)="" then
exit for
end if
next
getpath=trim(right(path,i))
end function
'#######################################################################################
function parentn(path) '返回一个路径的父路径
dim i
for i=0 to len(path)-1
if mid(path,len(path)-i,1)="/" or mid(path,len(path)-i,1)="" then
exit for
end if
next
parentn=left(path,len(path)-i-1)
end function
'实例使用方法
getpath(givepath)
parentn(path)