랭귀지/ASP
[ASP]마지막 문자열
유키공
2017. 12. 26. 10:00
마지막 문자열 구하기
결과 : 서울특별시 강남구 삼성동
Option Explicit Dim str : str = "100|5|0||2028|1090|서울특별시 강남구 삼성동" Response.write SearchAddress(str) Function SearchAddress(byRef paramStr) Dim ipos Dim strLen Dim Result '------------------------------------------------ ' 입력되는 인자의 전체 길이. '------------------------------------------------ strLen = Len(paramStr) '------------------------------------------------ ' 문자 '|' 마지막에 위치하는 자리 수 (정수반환) : 없을땐 0 '------------------------------------------------ ipos = instrRev(paramStr,"|") Result = MID(paramStr,ipos+1,(strLen-ipos)) SearchAddress = Result End Function
결과 : 서울특별시 강남구 삼성동