2009년 7월 7일 화요일

FullPath 에서 File 이름만 얻기

get_filename ( string filepath ) returns string

int i1
int i2

i2 = len (filepath)
for i1 = i2 to 1 step -1
    if mid (filepath, i1, 1) = "/" or mid (filepath, i1, 1) = "\" then
        return mid (filepath, i1 + 1)
    end if
next

return filepath


댓글 없음:

댓글 쓰기