절대 경로를 상대 경로로 변환하는 ASP 기능입니다. 필요한 친구는 저장할 수 있습니다. 다음과 같이 코드 코드를 복사합니다.
'===============================================
'함수 이름: ChkMapPath
' 기능: 상대 경로를 절대 경로로 변환
'매개변수: strPath ---- 원래 경로
'반환 값: 절대 경로
'===============================================
기능 ChkMapPath(ByVal strPath)
희미한 전체 경로
strPath = 바꾸기(교체(Trim(strPath), /, /), //, /)
strPath =이면 strPath = .
InStr(strPath,:/) = 0이면
fullPath = Server.MapPath(strPath)
또 다른
strPath = 바꾸기(strPath,../,)
fullPath = 트림(strPath)
If Right(fullPath, 1) = / Then
fullPath = 왼쪽(fullPath, Len(fullPath) - 1)
종료 조건
종료 조건
ChkMapPath = 전체 경로
기능 종료