VBS "/"

Question

이것은 내가 무엇을 가지고 지난 후 문자열의 일부를 제거

Dim pathAfter 
pathAfter = "product/subproduct/item" 

내가 달성하기 위해 할 수있는 일 이? RegEx를 사용해 보았지만 수용 할만한 해결책이 아닙니다.

Answer 1

는 지난 / 그 지점 개까지 읽을 찾기 - 1

pathAfter = left$(pathBefore, instrrev(pathBefore, "/") - 1) 

Answer 2

이 코드보십시오 :

Dim pathBefore, pathAfter, temp, i 
pathBefore = "product/subproduct/item/item" 
temp = Split(pathBefore,"/") 
For i=0 To UBound(temp)-1 
    pathAfter = pathAfter & temp(i) & "/" 
Next 
pathAfter = Left(pathAfter,Len(pathAfter)-1) 
MsgBox pathAfter 

출력 :

Answer 3

@Gurman :

을

>> s = "product/subproduct/item/item" 
>> a = Split(s, "/") 
>> ReDim Preserve a(UBound(a) - 1) 
>> WScript.Echo Join(a, "/") 
>> WScript.Echo goFS.GetParentFolderName(s) 
>> WScript.Echo Left(s, InstrRev(s, "/") - 1) 
>> 
product/subproduct/item 
product/subproduct/item 
product/subproduct/item