요일확인하여 작업 여부 결정하기
*
Dim creent_date As New Date
creent_date = Now

If creent_date.DayOfWeek = 0 Or creent_date.DayOfWeek = 6 Then
end '프로그램 종료
Else
backup() '백업진행
End If

* 프로그램 실행시점의 요일을 확인하여 작업 실행 여부를 결정한다 (.DayOfWeek 메서드 사용 - 요일의 값을 정수로 반환한다)

(0-일, 1-월, 2-화, 3-수, 4-목, 5-금, 6-토)


- 0(일요일), 6(토요일)일 경우 프로그램 종료


- 그외 요일인 경우 작업진행 (예: 백업)



이 게시물을

댓글'1'
교교
  • 2014.04.09

해당 월 가져 올때는 creent_date.Month은 해달 월 값인 4월 즉, 4를 가져오네요

 

 

이 댓글을

공유하기

SEARCH

MENU NAVIGATION