split를 이용하여

  Dim src           ' 경로  
  Dim tmpFileArr ' 경로가 .으로  잘라져서 저장될 배열
  Dim fileType    ' 파일의 타입이 저장될 변수
 
  src = request.QueryString("src")
  tmpFileArr = split(src, ".")
  fileType = tmpFileArr(ubound(tmpFileArr))  '배열의 마지막 값(확장자)를 fileType에 저장한다.

ubound(배열이름) 
배열의 마지막 Index를 반환한다..

크기가 아니였군.. (비슷한 개념이겠지만..ㅜ)


예제 코드
<%
 Dim src
 Dim tmpFileArr
 Dim i
 
 src = "임의의
URL주소"
 tmpFileArr =split(src, ".")

 for i=0 to ubound(tmpFileArr)
  response.write (i) & "번째 : " & tmpFileArr(i) & " <br>"
 next

 response.write "ubound의 반환값 : " & ubound(tmpFileArr)

%>



+ Recent posts