VBScript 자주 사용하는 함수

스트링 함수

ASP 코드 작성 시 가장 많이 사용되는 함수들이 바로 문자와 관련된 스트링 함수들일 것이다. 특정 문자열에서 자기가 원하는 내용을 검색한다든지, 문자들을 추출하여 연산에 사용한다든지 이런 일련의 작업들이 스트링 함수를 기본으로 하고 있다. 다음은 VB 스크립트에 있는 여러 가지 스트링 함수들이다.

1) FormatCurrency

시스템 제어판에 정의된 통화 기호를 사용하여 통화값으로 서식화된 식을 반환한다.
구문
FormatCurrency(Expression[,NumDigitsAfterDecimal [,IncludeLeadingDigit
[,UseParensForNegativeNumbers [,GroupDigits]]]])

● Expression : 필수 요소이다. 실제 통화값으로 서식화할 식을 나타낸다.
● NumDigitsAfterDecimal : 선택 요소이다. 소수를 표시할 자릿수를 나타내는 숫자값이다. 기본값은 1로 컴퓨터의 국가별 설정값이 사용됨을 나타낸다.
● IncludeLeadingDigit : 선택 요소이다. 지수값에 선행 0이 표시되는 지의 여부를 나타내는 Tristate 상수이다. 값에 대한 설명은 아래 표를 참고하기 바란다.
● UseParensForNegativeNumbers : 선택 요소이다. 음수를 괄호로 묶을 것인지를 나타내는 Tristate 상수이다. 값에 대한 설명은 아래 표를 참조하기 바란다.
● GroupDigits : 선택 요소이다. 시스템의 국가별 설정에 지정된 그룹 구분 기호를 사용하여 숫자들을 그룹화하는 지를 나타내는 Tristate 상수이다. 값에 대한 설명은 아래 표를 참조하기 바란다.

---------------------------------------------------------------------------------------------------
상수 　　　　　　　　값 　설명
TristateTrue 　　　　-1 　　참
TristateFalse 　　　　0 　　거짓
TristateUseDefault 　-2 　　컴퓨터의 국가별 설정값을 사용한다.
---------------------------------------------------------------------------------------------------

● formatcurrency.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
Response.Write FormatCurrency(100000) & " "
Response.Write FormatCurrency(100000,5) & " "
Response.Write FormatCurrency(-100000, , , -1) & " "
%>
---------------------------------------------------------------------------------------------------

[그림 1-1] formatcurrency.asp 실행 결과

2) FormatDateTime

날짜와 시간으로 서식화된 식을 반환한다.

구문 : FormatDateTime(Date[,NamedFormat])

● Date : 필수 요소이다. 서식화할 날짜식을 나타낸다.
● NamedFormat : 선택 요소이다. 사용되는 날짜/시간 서식을 나타내는 숫자값이다. 이 값을 생략하면 vbGeneralDate가 사용된다.

---------------------------------------------------------------------------------------------------
상수 　　　　　　값 　설명
vbGeneralDate 　0 　　날짜 및 시간을 표시한다. 날짜 부분이 있으면 간단하게 표시 날짜로 표시한다. 시간 부분이 있으면 자세하게 표시 시간 형식으로 표시한다. 날짜와 시간이 모두 있으면 둘 다 표시된다.
vbLongDate 　　1 　　시스템의 국가별 설정에 지정된 자세하게 표시 날짜 서식을 사용하여 날짜를 표시한다.
vbShortDate 　　2 　　시스템의 국가별 설정에 지정된 간단하게 표시 날짜 서식을 사용하여 날짜를 표시한다.
vbLongTime 　　3 　시스템의 국가별 설정에 지정된 시간 서식을 사용하여 시간을 표시한다.
vbShortTime 　　4 　24시간 서식(hh:mm)을 사용하여 시간을 표시한다.
---------------------------------------------------------------------------------------------------

● formatdatetime.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
Response.Write FormatDateTime(Now, 0) & " "
Response.Write FormatDateTime(Now, 1) & " "
Response.Write FormatDateTime(Now, 2) & " "
Response.Write FormatDateTime(Now, 3) & " "
Response.Write FormatDateTime(Now, 4) & " "
%>
---------------------------------------------------------------------------------------------------

[그림 1-2] formatdatetime.asp 실행 결과

3) FormatNumber

숫자로 서식화된 식을 반환한다.

구문 : FormatNumber(Expression[,NumDigitsAfterDecimal [,IncludeLeadingDigit

[,UseParensForNegativeNumbers [,GroupDigits]]]])
● Expression : 필수 요소이다. 서식화할 식을 나타낸다.
● NumDigitsAfterDecimal : 선택 요소이다. 소수를 나타낼 자릿수를 나타내는 숫자값이다. 기본값은 1로 시스템의 국가별 설정값이 사용됨을 나타낸다.
● IncludeLeadingDigit : 선택 요소이다. 지수값에 선행 0이 표시되는 지의 여부를 나타내는 Tristate 상수이다. 값에 대한 설명은 아래 표를 참조하라.
● UseParensForNegativeNumbers : 선택 요소이다. 음수를 괄호로 묶을 것인지를 나타내는 Tristate 상수이다. 값에 대한 설명은 아래 표를 참조하라.
● GroupDigits : 선택 요소이다. 컴퓨터 국가별 설정에서 지정된 그룹 구분 기호를 사용하여 숫자들을 그룹화하는 지를 나타내는 Tristate 상수이다. 값에 대한 설명은 아래 표를 참조하라.

---------------------------------------------------------------------------------------------------
상수 값 설명
TristateTrue -1 참
TristateFalse 0 거짓
TristateUseDefault -2 시스템의 국가별 설정값을 사용합니다.
---------------------------------------------------------------------------------------------------

● formatnumber.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
Response.Write FormatNumber(100000) & " "
Response.Write FormatNumber(100000,5) & " "
Response.Write FormatNumber(-100000, , , -1) & " "
%>
---------------------------------------------------------------------------------------------------

[그림 1-3] formatnumber.asp 실행 결과

4) FormatPercent

뒤에 % 문자가 붙는 백분율(100이 곱해짐)로 서식화된 식을 반환한다.

구문 : FormatPercent(Expression[,NumDigitsAfterDecimal [,IncludeLeadingDigit

[,UseParensForNegativeNumbers [,GroupDigits]]]])
FormatPercent의 구성요소는 FormatNumber와 동일하다.

● formatpercent.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
Response.Write FormatNumber(0.7235) & " "
Response.Write FormatNumber(0.7235,5) & " "
Response.Write FormatNumber(-0.7235, , , -1) & " "
%>
---------------------------------------------------------------------------------------------------

[그림 1-4] formatpercent.asp 실행 결과

5) InStr

한 문자열 안에 특정 문자열이 처음으로 나타난 위치를 정수 값으로 반환한다.

구문 : InStr([start, ]string1, string2[, compare])

● start : 선택 요소이다. 검색할 때 시작 위치를 의미하는 수식이다. 만일 지정되지 않으면 첫 문자에서 검색을 시작한다. start가 Null값을 포함하면 오류가 발생하고 Compare 값이 지정되면 start 인수는 필수 인수가 된다.
● String1 : 필수 요소이다. 검색되는 문자식이다.
● String2 : 필수 요소이다. 찾을 문자식이다.
● Compare : 선택 요소이다. 문자열 비교 형식을 지정한다. Compare 인수는 0, 1, 2로 지정하거나 생략할 수 있다. 기본값인 0으로 지정하면 이진 비교가 수행되고 1로 지정하면 대/소문자 구분하여 문자를 비교한다. 2로 지정하면 사용자 데이터베이스에 기록된 정보에 근거하여 비교가 수행된다(Microsoft Access에 한함). Compare 값이 Null이면 오류가 발생하고 Compare 값이 지정되지 않으면 Option Compare 설정값에 따라 비교 형식이 결정된다.

● Compare 인수
---------------------------------------------------------------------------------------------------
상수 값 설명
vbBinaryCompare 0 이진 비교를 수행한다.
vbTextCompare 1 텍스트를 비교한다.
---------------------------------------------------------------------------------------------------

● 반환 값
---------------------------------------------------------------------------------------------------
경우 InStr 함수의 결과
string1의 길이가 0인 경우 0
string1이 Null인 경우 Null
string2가 0인 경우 start
string2가 Null인 경우 Null
string2가 없는 경우 0
string1에 string2가 있는 경우 string1에서의 일치하는 해당 위치
start > Len(string2) 0
---------------------------------------------------------------------------------------------------

● instr.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
SearchString ="AAbAAbAABAAB" ' 검색할 문자열
SearchChar = "B" ' "B" 검색.

' 4가 있는 위치에서 텍스트 비교 시작. 6을 반환합니다.
MyPos = Instr(4, SearchString, SearchChar, 1)
Response.Write MyPos & " "

' 1이 있는 위치에서 2진 비교 시작. 9를 반환합니다.
MyPos = Instr(1, SearchString, SearchChar, 0)
Response.Write MyPos & " "

MyPos = Instr(SearchString, SearchChar) ' Returns 9.
Response.Write MyPos & " "

MyPos = Instr(1, SearchString, "W")
Response.Write MyPos & " "

%>
---------------------------------------------------------------------------------------------------

[그림 1-5] instr.asp 실행 결과

6) InStrB

바이트 데이터를 포함하고 있는 스트링 내에서 만나는 첫 번째 서브스트링의 바이트 위치를 나타내는 정수값을 반환한다. 바이트의 반환만 제외하고 InStr과 사용법이 동일하다.

7) InStrRev
한 문자열이 다른 문자열에 나타나는 위치를 문자열 끝에서 반환한다.

구문 : InStrRev(string1, string2[, start[, compare]])

구문의 사용은 InStr과 동일하다.

● insrtrev.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
SearchString ="AAbAAbAABAAB" ' 검색할 문자열
SearchChar = "B" ' "B" 검색.

MyPos = InStrRev(SearchString, SearchChar, 10, 0)
Response.Write MyPos & " "

MyPos = InStrRev(SearchString, SearchChar, -1, 1)
Response.Write MyPos & " "

MyPos = InStrRev(SearchString, SearchChar, 8)
Response.Write MyPos & " "

MyPos = InStrRev(SearchString, "W")
Response.Write MyPos & " "

%>
---------------------------------------------------------------------------------------------------

[그림 1-6] instrrev.asp 실행 결과

8) Join

배열에 포함되어 있는 여러 하위 문자열을 결합하여 만든 문자열을 반환한다.

구문 : Join(list[, delimiter])

● list : 필수적인 인수로 결합할 하위 문자열을 포함하는 1차원 배열이다.
● delimiter : 선택적인 인수로 반환되는 문자열의 하위 문자열을 분리하는 데 사용하는 문자이다. 생략하면 공백 문자(" ")를 사용한다. delimiter가 길이가 0인 문자열이면 목록에 있는 모든 항목을 구분 기호 없이 연결한다.

● join.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
Dim myLanguage(5)

myLanguage(0) = "ASP"
myLanguage(1) = "Visual Basic"
myLanguage(2) = "PHP"
myLanguage(3) = "Delphi"
myLanguage(4) = "JSP"
myLanguage(5) = "C#"

strLanguage = Join(myLanguage, "---")
Response.Write strLanguage & " "

strLanguage = Join(myLanguage)
Response.Write strLanguage & " "
%>
---------------------------------------------------------------------------------------------------

[그림 1-7] join.asp 실행 결과

9) LCase

스트링에 있는 모든 문자들을 소문자로 변경하는 함수이다.

구문 : LCase(string)

● string : 소문자로 변경하고자 하는 문자열
● lcase.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
strTemp = "Hello!! Active Server Page~"
Response.Write LCase(strTemp)
%>
---------------------------------------------------------------------------------------------------

[그림 1-8] lcase.asp 실행 결과

10) Left

문자열의 왼쪽에서 설정하는 길이만큼의 문자들을 반환한다.

구문 : Left(string, length)
string : 반환하고자 하는 문자열
length : 왼쪽에서 이동하고자 하는 문자열의 길이

● left.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
strTemp = "Hello! Active Server Page~"
Response.Write Left(strTemp, 15)
%>
---------------------------------------------------------------------------------------------------

[그림 1-9] left.asp 실행 결과

11) Len

스트링의 문자열의 길이를 반환한다.

구문 : Len(string)

● len.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
strTemp = "Hello! Active Server Page~"
Response.Write Len(strTemp) & " "
strTemp = "안녕하세요! ASP입니다."
Response.Write Len(strTemp) & " "
%>
---------------------------------------------------------------------------------------------------

[그림 1-10] len.asp 실행 결과

12) LTrim

스트링의 문자열에서 스트링의 왼쪽 즉 앞에 있는 공백 문자들을 삭제한다.

구문 : LTrim(string)

● ltrim.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
strTemp = " Hello! Active Server Page~"
Response.Write strTemp & " "
Response.Write LTrim(strTemp)
%>
---------------------------------------------------------------------------------------------------

[그림 1-11] ltrim.asp

공백 문자의 출력 예제에서 공백을 제거한 것과 제거하지 않은 문자의 결과가 동일하게 출력된다. 이것은 HTML이 공백 문자를 지원하지 않기 때문이다. 그러나 코드 상에서의 비교에서는 필요한 요소이니 공백 제거 함수를 적절히 사용하도록 해야하겠다.

13) Mid

스트링의 문자열에서 특정 지점부터 지정된 길이 만큼의 문자열을 반환한다.

구문 : Mid(string, start[, length])

● string : 반환하고자 하는 문자열
● start : 문자를 반환할 때의 특정 시작 위치
● length : 선택 인수로서 반환하고자 하는 문자의 길이이다. 생략되면 문자열의 마지막까지 반환한다.

● mid.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
strTemp = "Hello! Active Server Page~"
Response.Write Mid(strTemp,5,10) & " "
Response.Write Mid(strTemp,5) & " "
%>
---------------------------------------------------------------------------------------------------

[그림 1-12] mid.asp 실행 결과

14) Replace

지정한 하위 문자열을 지정한 횟수만큼 다른 하위 문자열로 바꾼 문자열을 반환한다.

구문 : Replace(expression, find, replacewith[, start[, count[, compare]]])

● expression : 필수적인 인수로 바꿀 하위 문자열이 들어 있는 문자식이다.
● find : 필수적인 인수로 찾을 하위 문자열이다.
● replacewith : 필수적인 인수로 바꿀 하위 문자열이다.
● start : 선택적인 인수로 expression에서의 하위 문자열 검색을 시작하는 위치이다. 생략하면 1로 간주한다. 반드시 count와 함께 사용해야 한다.
● count : 선택적인 인수로 하위 문자열의 바꾸기 횟수이다. 생략하면 기본값이 -1이 되며 해당하는 문자열을 모두 바꾼다. 반드시 start과 함께 사용해야 한다.
● compare 선택적인 인수로 사용할 하위 문자열 비교 형식을 나타내는 숫자 값이다. 그 값에 대해서는 아래의 표를 참조하라. 생략하면 기본값은 0이되며 이진 비교를 수행한다.

---------------------------------------------------------------------------------------------------
상수 값 설명
vbBinaryCompare 0 이진 비교를 실행한다.
vbTextCompare 1 텍스트 비교를 실행한다.
---------------------------------------------------------------------------------------------------

● replace.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
strTemp ="AAbAAbAABAAB"
Response.Write Replace(strTemp, "b", "O") & " "
Response.Write replace(strTemp, "b", "O", 3, -1, 1)
%>
---------------------------------------------------------------------------------------------------

[그림 1-13] replace.asp 실행 결과

15) Right

문자열의 오른쪽부터 정해진 수만큼의 문자를 반환한다.

구문 : Right(string, length)

● right.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
strTemp = "Hello! Active Server Page~"
Response.Write strTemp & " "
Response.Write Right(strTemp, 1) & " "
Response.Write Right(strTemp, 7) & " "
Response.Write Right(strTemp, 15) & " "
Response.Write Right(strTemp, 30) & " "
%>
---------------------------------------------------------------------------------------------------

[그림 1-14] right.asp 실행 결과

16) RTrim

스트링의 문자열에서 스트링의 오른쪽 즉 뒤에 있는 공백 문자들을 삭제한다.

구문 : RTrim(string)

● rtrim.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
strTemp = "Hello! Active Server Page~ "
Response.Write RTrim(strTemp)
%>
---------------------------------------------------------------------------------------------------

[그림 1-15] rtrim.asp

17) Space

지정된 수만큼의 공백이 들어있는 문자열을 반환한다.

구문 : Space(number)

● space.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
strTemp = "Hello! Active Server Page~"

Response.Write strTemp & replace(Space(10), " ", " ") & strTemp
%>
---------------------------------------------------------------------------------------------------

18) Split

지정한 개수의 하위 문자열을 포함하는 0 기준 1차원 배열을 반환한다.

구문 : Split(expression[, delimiter[, number[, compare]]])

● expression : 필수적인 인수로 하위 문자열과 구분 기호를 포함하는 문자식이다. expression이 길이가 0인 문자열이면 Split는 빈 배열, 즉 구성 요소와 데이터가 없는 배열을 반환한다.
● delimiter : 선택적인 인수로 하위 문자열의 한계를 식별하는 데 사용하는 문자열 문자이다. 생략하면 공백 문자(" ")를 구분 기호로 간주한다. delimiter의 길이가 0인 문자열이면 전체 expression 문자열을 포함하는 단일 요소 배열을 반환한다.
● number : 선택적인 인수로 반환할 하위 문자열의 수이다. -1은 모든 하위 문자열을 반환한다는 것을 나타낸다.
● compare : 선택적인 인수로 사용할 하위 문자열 비교 형식을 나타내는 숫자 값이다. 그 값에 대해서는 아래의 표를 참조하라.

● split.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
strTemp = "Hello, Active, Server, Page!"

arrTemp = Split(strTemp, ",")
Response.Write strTemp & " "
Response.Write arrTemp(0) & " "
Response.Write arrTemp(1) & " "
Response.Write arrTemp(2) & " "
Response.Write arrTemp(3) & " "
%>
---------------------------------------------------------------------------------------------------

[그림 1-17] split.asp 실행 결과

19) StrComp

문자열 비교의 결과를 나타내는 값을 반환한다.

구문 : StrComp(string1, string2[, compare])

● string1 : 필수적인 인수로 유효한 문자식이다.
● string2 : 필수적인 인수로 유효한 문자식이다.
● compare : 선택적인 인수로 문자열을 평가하는 데 사용할 비교 형식을 나타내는 숫자 값이다. 생략하면 이진 비교를 실행한다. 그 값에 대해서는 아래의 표를 참조하라.

● 반환값
---------------------------------------------------------------------------------------------------
경우 StrComp 함수의 결과
string1이 string2보다 작은 경우 -1
string1이 string2와 같은 경우 0
string1이 string2보다 큰 경우 1
string1이나 string2가 Null인 경우 Null
---------------------------------------------------------------------------------------------------

● strcomp.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
strComp1 = "abcde"
strComp2 = "ABCDE"

Response.Write StrComp(strComp1, strComp2) & " "
Response.Write StrComp(strComp2, strComp1, 1) & " "
Response.Write StrComp(strComp2, strComp1, 0) & " "
%>
---------------------------------------------------------------------------------------------------

20) String

지정한 길이의 반복되는 문자열을 반환한다.

구문 : String(number, character)

● number : 반환할 문자열의 길이이다. number에 Null이 있으면 Null을 반환한다.
● character : 반환할 문자열을 구성하는 데 사용할 첫째 문자가 있는 문자나 문자식을 지정하는 문자 코드이다. character에 Null이 있으면 Null을 반환한다.

● string.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
strTemp = "Hello, Active, Server, Page!"

Response.Write String(10, "*") & strTemp & String(10, "*") & " "
Response.Write String(10, 42) & strTemp & String(10, 42) & " "
%>
---------------------------------------------------------------------------------------------------

[그림 1-19] string.asp 실행 결과

21) StrReverse

지정한 문자열의 순서가 거꾸로 된 문자열을 반환한다.

구문 : StrReverse(string1)

● strreverse.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
strTemp = "Hello, Active, Server, Page!"

Response.Write StrReverse(strTemp)
%>
---------------------------------------------------------------------------------------------------

[그림 1-20] strreverse.asp 실행 결과

22) Trim

문자열의 앞뒤의 공백 문자를 제거하는 함수이다.

구분 : Trim(string)

● trim.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
strTemp = " Hello, Active, Server, Page! "
Response.Write Trim(strTemp)
%>
---------------------------------------------------------------------------------------------------

[그림 1-21] trim.asp

23) UCase

스트링 문자열에 포함된 모든 문자를 대문자로 변경하는 함수이다.

구문 : UCase(string)

● ucase.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
strTemp = "Hello! Active Server Page!"
Response.Write UCase(strTemp)
%>
---------------------------------------------------------------------------------------------------

[그림 2-22] ucase.asp 실행 결과

날짜와 시간 함수

날짜와 시간에 관련된 내용을 표현하는 함수들도 ASP에서는 중요한 비중을 가진다. 시스템에서 제공하지 못하는 여러 가지 기능들을 이런 함수들을 통해서 구현이 가능하다. 특히 날짜 연산에 대한 코드 작성시 많은 도움을 얻을 수 있는 날짜와 시간 함수들에 대해서 알아보자.

1) CDate

Date 하위 형식의 Variant로 변환된 식을 반환한다.

구문 : CDate(date)

date 인수는 유효한 날짜식이면 된다.
변환값은 컴퓨터의 날짜/시간 설정에 따르며 짧은 날짜 표기법으로 출력된다.

● cdate.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
MyDate = "2000년 12월 11일"
Response.Write MyDate & " "
Response.Write CDate(MyDate)
%>
---------------------------------------------------------------------------------------------------

[그림 2-1] cdate.asp 실행 결과

2) Date

현재 시스템의 날짜를 반환한다.

구문 : Date

● date.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
Response.Write Date
%>
---------------------------------------------------------------------------------------------------

[그림 2-2] date.asp 실행 결과

3) DateAdd

지정된 날짜에 시간을 추가하거나 뺀 새로운 날짜를 반환한다.

구문 : DateAdd(interval, number, date)

● interval : 필수적인 인수로 interval을 추가한 날짜를 나타내는 문자식이다. 그 값에 대해서는 아래의 표를 참조하라.
● number : 필수적인 인수로 추가할 간격 수의 수식이다. 수식에서 양수는 미래의 날짜, 음수는 과거의 날짜이다.
● date : 필수적인 인수로 interval을 추가한 날짜를 나타내는 Variant 또는 리터럴이다.

● interval 인수
---------------------------------------------------------------------------------------------------
설정 설명

yyyy 년
q 분기
m 월
y 일(일년 기준)
d 일
w 요일
ww 주(일년 기준)
h 시
n 분
s 초
---------------------------------------------------------------------------------------------------

● dateadd.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
MyDate = Date
Response.Write "오늘날짜 : " & MyDate & " "
Response.Write "오늘날짜+3개월 : " & DateAdd("m",3,MyDate) & " "
Response.Write "오늘날짜-3개월 : " & DateAdd("m",-3,MyDate) & " "
%>
---------------------------------------------------------------------------------------------------

[그림 2-3] dateadd.asp

4) DateDiff

주어지는 두 날짜의 간격을 반환한다.

구문 : DateDiff(interval, date1, date2 [,firstdayofweek[, firstweekofyear]])

● interval : 필수적인 인수로 날짜1과 날짜2 사이의 차이를 계산하는 데 사용할 interval의 문자식이다. 그 값에 대해서는 아래의 표를 참조하라.
● date1, date2 : 필수적인 인수로 날짜식에서 계산에 사용할 두 날짜이다.
● firstdayofweek : 선택적인 인수로 요일을 지정하는 상수로 지정하지 않으면 일요일로 간주한다. 그 값에 대해서는 아래의 표를 참조하라.
● firstweekofyear : 선택적인 인수로 연도를 기준으로 한 첫째 주를 지정하는 상수이다. 지정하지 않으면 1월 1일을 포함하는 주를 첫째 주로 간주한다. 그 값에 대해서는 아래의 표를 참조하라.

● interval 인수
---------------------------------------------------------------------------------------------------
설정 설명

yyyy 년
q 분기
m 월
y 일(일년 기준)
d 일
w 요일
ww 주(일년 기준)
h 시
n 분
s 초
---------------------------------------------------------------------------------------------------

● firstdayofweek 인수
---------------------------------------------------------------------------------------------------
상수 값 설명

vbUseSystem 0 NLS(National Language Support) API 설정 사용
vbSunday 1 일요일(기본값)
vbMonday 2 월요일
vbTuesday 3 화요일
vbWednesday 4 수요일
vbThursday 5 목요일
vbFriday 6 금요일
vbSaturday 7 토요일
---------------------------------------------------------------------------------------------------

● firstweekofyear 인수
---------------------------------------------------------------------------------------------------
상수 값 설명

vbUseSystem 0 NLS(National Language Support) API 설정 사용
vbFirstJan1 1 1월 1일을 포함하는 주에서 시작(기본값)
vbFirstFourDays 2 새해의 처음 4일을 포함하는 주에서 시작
vbFirstFullWeek 3 새해의 처음 한 주일(7일)을 포함하는 주에서 시작
---------------------------------------------------------------------------------------------------

● datediff.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
FirstDate = CDate("2000년 1월 1일")
MyDate = Date
Response.Write FirstDate & "부터 지금까지 " & DateDiff("y", FirstDate, MyDate) & "일 경과 "
Response.Write FirstDate & "부터 지금까지 " & DateDiff("h", FirstDate, MyDate) & "시 경과 "
Response.Write FirstDate & "부터 지금까지 " & DateDiff("n", FirstDate, MyDate) & "분 경과 "
Response.Write FirstDate & "부터 지금까지 " & DateDiff("s", FirstDate, MyDate) & "초 경과 "
%>
---------------------------------------------------------------------------------------------------

[그림 2-4] datediff.asp 실행 결과

5) DatePart

주어진 날짜의 지정된 부분을 반환한다.

구문 : DatePart(interval, date[, firstdayofweek[, firstweekofyear]])

● interval : 필수적인 인수로 반환할 시간 간격의 문자식이다. 그 값에 대해서는 아래의 표를 참조하라.
● date : 필수적인 인수로 계산할 날짜식이다.
● firstdayof week : 선택적인 인수로 요일을 지정하는 상수로서 지정하지 않으면 일요일로 간주한다. 그 값에 대해서는 아래의 표를 참조하라.
● firstweekofyear : 선택적인 인수로 연도를 기준으로 한 첫째 주를 지정하는 상수이다. 지정하지 않으면 1월 1일을 포함하는 주를 첫째 주로 간주한다. 그 값에 대해서는 아래의 표를 참조하라.

● interval 인수
---------------------------------------------------------------------------------------------------
설정 설명

yyyy 년
q분기
m 월
y 일(일년 기준)
d 일
w 요일
ww 주(일년 기준)
h 시
n 분
s 초
---------------------------------------------------------------------------------------------------

● firstdayofweek 인수
---------------------------------------------------------------------------------------------------
상수 값 설명

● firstweekofyear 인수
---------------------------------------------------------------------------------------------------
상수 값 설명

● datepart.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
Today = Now
Response.Write "오늘 " & Today & "은 " & DatePart("q", Today) & "분기 입니다."
%>
---------------------------------------------------------------------------------------------------

[그림 2-5] datapart.asp 실행 결과

6) DateSerial

지정된 년, 월, 일의 Date 하위 형식인 Variant를 반환한다. 즉 임의의 숫자를 입력받아 날짜 형식으로 반환하는 함수이다.

구문 : DateSerial(year, month, day)

● year : 100에서 9999까지의 수 또는 수식
● month : 모든 수식
● day : 모든 수식

● dateserial.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
Response.Write DateSerial(2000+1, 12+3, 2+5)
%>
---------------------------------------------------------------------------------------------------

[그림 2-6] dateserial.asp 실행 결과

7) DateValue

Date 하위 형식의 Variant를 반환한다.

구문 : DateValue(date)

대개 date 인수는 100년 1월 1일에서 9999년 12월 31일까지를 나타내는 문자식으로 이 범위에 있는 날짜, 시간 또는 날짜/시간을 나타내는 식이다. date 인수에 시간 정보가 있는 경우 DateValue 함수에서는 그 정보를 반환하지 않는다. 그러나 date 인수에 "12:11"처럼 잘못된 시간 정보가 있으면 오류가 발생하게 된다.

date 인수가 유효한 날짜 구분 기호로 분리된 숫자만 있는 문자열인 경우, DateValue 함수에서는 컴퓨터에 설정한 간단한 표시 날짜 형식에 따라 년, 월, 일에 대한 순서로 인식하게 된다. 또한 정식이나 약식의 월 이름을 포함하고 있는 명확한 날짜도 인식한다. 예를 들어 DateValue 함수는 1/23/2001과 1/23/01 뿐만 아니라 January 23,2001과 Jan 23,2001을 모두 인식한다.

date 인수에서 연도 부분을 생략할 경우 DateValue 함수는 컴퓨터 시스템에 설정되어 있는 현재 연도를 사용한다.

● datevalue.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
Response.Write DateValue("2000년 12월 25일")
%>
---------------------------------------------------------------------------------------------------

[그림 2-7] datevalue.asp 실행 결과

8) Day

날짜를 나타내는 1에서 31까지의 정수를 반환한다.

구문 : Day(date)

date 인수는 날짜를 표현하는 식이다. date 인수에 Null이 있으면 Null을 반환한다.

● day.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
Response.Write Day("2000년 12월 25일")
%>
---------------------------------------------------------------------------------------------------

[그림 2-8] day.asp 실행 결과

9) Hour

하루의 시간을 나타내는 0에서 23까지의 정수를 반환한다.

구문 : Hour(time)

time 인수는 시간을 나타내는 식이다. time이 Null이면 Null을 반환한다.

● hour.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
Response.Write "지금 시간은 " & Now & " 입니다. "
Response.Write "시간은 " & Hour(Now) & "시 입니다."
%>
---------------------------------------------------------------------------------------------------

[그림 2-9] hour.asp 실행 결과

10) IsDate

한 식이 날짜로 변환될 수 있는지 여부를 나타내는 부울 값을 반환한다. 날짜 형식을 구분할 때 주로 사용한다.

구문 : IsDate(expression)

expression 인수는 날짜식 또는 날짜나 시간으로 인식될 수 있는 문자식이다.
IsDate 함수는 해당 식이 날짜이거나 유효한 날짜로 변환될 수 있는 경우 True를, 그렇지 않으면 False를 반환합니다. Microsoft Windows의 유효한 날짜 범위는 서기 100년 1월 1일에서 서기 9999년 12월 31일까지이지만, 운영 체제에 따라 그 범위가 달라진다.

● isdate.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
FirstDate = "2000년 12월 11일"
SecondDate = "Hello! ASP~"
If IsDate(FirstDate) Then
 Response.Write FirstDate & "는 날짜형식입니다. "
Else
 Response.Write FirstDate & "는 날짜형식이 아닙니다. "
End If
If IsDate(SecondDate) Then
 Response.Write SecondDate & "는 날짜형식입니다. "
Else
 Response.Write SecondDate & "는 날짜형식이 아닙니다. "
End If
%>
---------------------------------------------------------------------------------------------------

[그림 2-10] isdate.asp 실행 결과

11) Minute

시간의 분을 나타내는 0에서 59까지의 정수를 반환한다.

구문 : Minute(time)

time 인수는 시간을 나타내는 식이다. time에 Null이 있으면 Null을 반환한다.

● minute.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
Response.Write "지금 시간은 " & Now & " 입니다. "
Response.Write "분은 " & Minute(Now) & "분 입니다."
%>
---------------------------------------------------------------------------------------------------

[그림 2-11] minute.asp 실행 결과

12) Month

년의 월을 나타내는 1에서 12까지의 정수를 반환한다.

구문 : Month(date)

date 인수는 날짜를 나타내는 식이다. date에 Null이 있으면 Null을 반환한다.

● month.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
Response.Write "지금 시간은 " & Now & " 입니다. "
Response.Write Month(Now) & "월 입니다."
%>
---------------------------------------------------------------------------------------------------

[그림 2-12] month.asp 실행 결과

13) MonthName

지정한 월을 나타내는 문자열을 반환한다.

구문 : MonthName(month[, abbreviate])

● month : 필수적인 인수로 1월은 1, 2월은 2, 등등으로 월을 나타내는 숫자이다.
● abbreviate : 선택적인 인수로 월 이름을 약어 형태로 표시할지 여부를 나타내는 부울 값이다. 생략하면 기본값인 False가 되며, 월 이름을 완전한 형태로 표시한다.

● monthname.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
Response.Write MonthName(12, true) & " "
Response.Write MonthName(12, false) & " "
%>
---------------------------------------------------------------------------------------------------

[그림 2-13] monthname.asp 실행 결과

14) Now

컴퓨터의 시스템 날짜와 시간에 따른 현재 날짜와 시간을 반환한다.

구문 : Now

● now.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
Response.Write "지금 시간은 " & Now & " 입니다."
%>
---------------------------------------------------------------------------------------------------

[그림 2-14] now.asp 실행 결과

15) Second

분의 초를 나타내는 0에서 59까지의 정수를 반환한다.

구문 : Second(time)

time 인수는 시간을 나타내는 식이다. time 인수에 Null이 있으면 Null을 반환한다.

● second.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
Response.Write "지금 시간은 " & Now & " 입니다. "
Response.Write Second(Now) & "초 입니다."
%>
---------------------------------------------------------------------------------------------------

[그림 2-15] second.asp 실행 결과

16) Time

현재 시스템 시간을 나타내는 Date 하위 형식의 Variant를 반환한다.

구문 : Time

● time.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
Response.Write "지금 시간은 " & Time & " 입니다. "
%>
---------------------------------------------------------------------------------------------------

[그림 2-16] time.asp 실행 결과

17) Timer

자정 이후 경과한 초 수를 나타내는 Single 값을 반환한다.

구문 : Timer

● timer.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
Response.Write Timer & " 초 경과 입니다. "
%>
---------------------------------------------------------------------------------------------------

[그림 2-17] timer.asp 실행 결과

18) TimeSerial

지정한 년, 월, 일의 Date 하위 형식인 Variant를 반환한다.

구문 : TimeSerial(hour, minute, second)

● time : 0(오전 12:00)에서 23(오후 11:00) 사이의 수(0과 23 포함) 또는 수식
● minute : 모든 수식
● second : 모든 수식

10시 51분 59초처럼 어떤 시간을 지정하려면 각 TimeSerial 인수의 숫자는 해당 인수의 허용 범위 안에 있어야 한다. 즉, 시간은 0-23이며, 분과 초는 0-59입니다. 그러나 특정 시간의 앞뒤에 시, 분, 초를 나타내는 수식을 사용하여 각 인수의 상대적인 시간을 지정할 수도 있다.

● timeserial.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
Response.Write TimeSerial(23, 12, 11)
%>
---------------------------------------------------------------------------------------------------

[그림 2-18] timeserial.asp 실행 결과

19) TimeValue

시간을 포함하는 Date 하위 형식의 Variant를 반환한다.

구문 : TimeValue(time)

대개 time 인수는 0:00:00(오전 12:00:00)에서 23:59:59(오후 11:59:59)까지의 시간을 나타내는 문자식으로 이 범위에 있는 시간을 나타내는 식도 time 인수가 될 수 있다. time에 Null이 있으면 Null을 반환한다.

● timevalue.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
Response.Write TimeValue("오후 11:11:11")
%>
---------------------------------------------------------------------------------------------------

[그림 2-19] timevalue.asp 실행 결과

20) Weekday

요일을 나타내는 정수를 반환한다.

구문 : Weekday(date, [firstdayofweek])

● date : 날짜를 나타내는 식이다. date에 Null이 있으면 Null을 반환한다.
● firstdayofweek : 첫째 요일을 지정하는 상수이다. 생략하면 vbSunday로 간주한다.

● firstdayofweek 인수
---------------------------------------------------------------------------------------------------
상수 값 설명

vbUseSystem 0 NLS( National Language Support) API 설정 사용
vbSunday 1 일요일
vbMonday 2 월요일
vbTuesday 3 화요일
vbWednesday 4 수요일
vbThursday 5 목요일
vbFriday 6 금요일
vbSaturday 7 토요일
---------------------------------------------------------------------------------------------------

● Weekday 함수 반환 값
---------------------------------------------------------------------------------------------------
상수 값 설명

vbSunday 1 일요일
vbMonday 2 월요일
vbTuesday 3 화요일
vbWednesday 4 수요일
vbThursday 5 목요일
vbFriday 6 금요일
vbSaturday 7 토요일
---------------------------------------------------------------------------------------------------

● weekday.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
MyDate = #2000-12-25#
Response.Write Weekday(MyDate)
%>
---------------------------------------------------------------------------------------------------

[그림 2-20] weekday.asp 실행 결과

21) WeekdayName

지정된 요일을 나타내는 문자열을 반환한다.

구문 : WeekDayName(weekday, abbreviate, firstdayofweek)

● weekday : 필수적인 인수로 요일을 나타내는 숫자이다. firstdayofweek 설정에 따라 각 요일의 값이 다르다.
● abbreviate : 선택적인 인수로 요일 이름을 약어로 나타낼지 여부를 나타내는 부울 값이다. 생략하면 기본값인 False가 되며 요일 이름을 완전한 형태로 나타낸다.
● firstdayofweek : 선택적인 인수로 첫째 요일을 나타내는 숫자 값이다. 그 값에 대해서는 아래의 표를 참조하라.

● firstdayofweek 인수
---------------------------------------------------------------------------------------------------
상수 값 설명

● weekdayname.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
MyDate = #2000-12-25#
Response.Write Weekdayname(Weekday(MyDate))
%>
---------------------------------------------------------------------------------------------------

[그림 2-21] weekdayname.asp 실행 결과

22) Year

연도를 나타내는 정수를 반환한다.

구문 : Year(date)

date 인수는 날짜를 나타내는 식이다. date에 Null이 있다면 Null을 반환한다.

● year.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
Response.Write "지금 시간은 " & Now & " 입니다. "
Response.Write Year(Now) & "년도 입니다."
%>
---------------------------------------------------------------------------------------------------

[그림 2-22] year.asp 실행 결과

수학 연산자

작업하는 내용에 따라 수학적인 계산이 필요한 경우가 있다. 다른 언어들과 마찬가지로 VB 스크립트에서도 기본적인 수학 연산자들을 사용자에게 제공하고 있다. 지금부터 이런 수학 연산자들의 종류와 사용법에 대해서 알아보도록 하자.

1) Abs

숫자의 절대값을 반환한다.

구문 : Abs(number)

예제 : Abs(-2000) ' 2000을 반환

2) Atn

숫자의 아크탄젠트 값을 반환하다.

구문 : Atn(number)

예제 : Atn(1)

3) Cos

각도의 코사인 값을 반환한다.

구문 : Cos(number)

예제 : Cos(45)

4) Exp

e의 n승을 지정하는 값을 반환한다.

구문 : Exp(number)

예제 : Exp(-1)

5) Fix

숫자의 정수 부분을 반환한다.

구문 : Fix(number) ' number가 음수이면 number보다 크거나 같은 첫 번째 음수 정수 부분이 반환된다.

예제 :

Fix(2830.52) ' 2830 반환
Fix(-2830.52) ' -2830 반환

6) Int

숫자의 정수 부분을 반환한다.

구문 : Int(number) ' number가 음수이면 number보다 작거나 같은 첫 번째 음수 정수 부분이 반환된다.

예제 :

Int(2830.52) ' 2830 반환
Int(-2830.52) ' -2831 반환

7) Log

숫자의 자연 로그를 반환한다.

구문 : Log(number)

예제 : Log(5)

8) Randomize

난수 발생기를 초기화한다.

구문 : Randomize(number)

Randomize문은 number를 사용하여 Rnd 함수의 난수 발생기를 초기화하고 새 시드 값을 제공한다. number를 생략하면 시스템 타이머에서 반환하는 값을 새 시드 값으로 사용하게 된다.

Randomize문을 사용하지 않으면 인수가 없는 Rnd 함수에서는 처음 호출되었을 때의 동일한 값을 시드 값과 같은 숫자를 사용한 다음 그 이후로는 마지막으로 발생한 숫자를 시드 값으로 사용한다.

만일 난수 발생 순차를 반복하려면, 숫자 인수를 Randomize문에 사용하기 바로 전에 Rnd 함수를 음수 인수로 호출하면 된다. 같은 값의 number를 Randomize문에 사용하면 이전의 순차를 반복하지 않는다.

● randomize.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
Randomize

For i = 1 to 10
MyValue = Int((20 * Rnd) + 1) ' 1에서 20까지 무작위 값을 발생합니다.
Response.Write i & "번째 난수 : " & MyValue & " "
Next
%>
---------------------------------------------------------------------------------------------------

[그림 3-1] randomize.asp 실행 결과

9) Rnd

난수를 발생한다.

구문 : Rnd[(number)]

Rnd 함수는 0보다 크거나 같고 1보다 작은 값을 반환한다. number의 값은 Rnd 함수가 난수를 발생시키는 방식을 결정한다.

---------------------------------------------------------------------------------------------------
number의 값 Rnd 함수의 결과

0보다 작을 경우 number를 시드로 하여 매번 같은 수
0보다 클 경우 순차적으로 생성되는 그 다음의 난수
0과 같을 경우 가장 최근에 생성한 난수
생략한 경우 순차적으로 생성되는 그 다음의 난수
---------------------------------------------------------------------------------------------------

만일 주어진 범위에서 난수를 발생하고자 한다면 다음의 공식을 이용하면 된다.

---------------------------------------------------------------------------------------------------
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
---------------------------------------------------------------------------------------------------

upperbound는 가장 큰 수이고, lowerbound는 가장 작은 수이다.

● rnd.asp
---------------------------------------------------------------------------------------------------
<%@ Language=VBScript %>
<%
For i = 1 to 5
MyValue = Int((20 * Rnd) + 1) ' 1에서 20까지 무작위 값을 발생합니다.
Response.Write i & "번째 난수 : " & MyValue & " "
Next
Response.Write "------------------------- "

For i = 1 to 5
MyValue = Int((20 * Rnd(-1)) + 1) ' 1에서 20까지 무작위 값을 발생합니다.
Response.Write i & "번째 난수 : " & MyValue & " "
Next
Response.Write "------------------------- "

For i = 1 to 5
MyValue = Int((20 * Rnd(0)) + 1) ' 1에서 20까지 무작위 값을 발생합니다.
Response.Write i & "번째 난수 : " & MyValue & " "
Next
%>
---------------------------------------------------------------------------------------------------

[그림 3-2] rnd.asp 실행 결과

10) Round

지정된 소수점 위치에서 반올림된 숫자를 반환한다.

구문 : Round(expression[, numdecimalplaces])

● expression : 필수적인 인수로 반올림할 수식이다.
● numdecimalplaces : 선택적인 인수로 소수점 이하의 자릿수를 나타내는 수이다. 생략하면 Round 함수는 정수를 반환한다.

예제 : Round(3.141592, 2) ' 3.14 반환

11) Sgn

숫자의 부호를 나타내는 정소를 반환한다.

구문 : Sgn(number)

● Sgn 반환 값
---------------------------------------------------------------------------------------------------
number의 값 Sgn 함수의 결과

0보다 큰 경우 1
0과 같은 경우 0
0보다 작은 경우 -1
---------------------------------------------------------------------------------------------------

예제

Sgn(100) ' 1 반환
Sgn(-100) ' -1 반환
Sgn(0) ' 0 반환

12) Sin

각도의 사인값을 반환한다.

구문 : Sin(number)

예제 : Sin(30)

13) Sqr

숫자의 제곱근을 반환한다.

구문 : Sqr(number)

예제 : Sqr(64)

14) Tan

각도의 탄젠트 값을 반환한다.

구문 : Tan(number)

예제 : Tan(0)

출처 : Taeyo

▶프로그래밍솔루션/학원교육정보◀
http://www.nise.wo.to

출처 [본문스크랩] 자주 사용하는 VBScript 함수 <ASP>강좌|작성자 혀니

구들 공작소™ v0.9

VBScript 자주 사용하는 함수

티스토리툴바

« 2024/11 »
일	월	화	수	목	금	토
					1	2
3	4	5	6	7	8	9
10	11	12	13	14	15	16
17	18	19	20	21	22	23
24	25	26	27	28	29	30