클래식 ASP에서 날짜 문자열을 변환하는 방법

StackOverflow https://stackoverflow.com/questions/91734

  •  01-07-2019
  •  | 
  •  

문제

나 지금 좀 멍하니 있어...

유럽 ​​형식의 날짜 문자열이 있습니다. dd.mm.yyyy 그리고 그것을 다음과 같이 변환해야 합니다. mm.dd.yyyy 클래식 ASP.빠른 아이디어가 있나요?

도움이 되었습니까?

해결책

항상 해당 형식이라면 분할을 사용할 수 있습니다.

d = split(".","dd.mm.yyyy")
s = d(1) & "." & d(0) & "." & d(2)

이는 1.2.99와 같은 날짜도 허용합니다.

다른 팁

Dim arrParts() As String
Dim theDate As Date

arrParts = Split(strOldFormat, ".")
theDate = DateTime.DateSerial(parts(2), parts(1), parts(0))

strNewFormat = Format(theDate, "mm.dd.yyyy")

알겠습니다. 방금 직접 해결책을 찾았습니다.

payment_date = MID(payment_date,4,3) & LEFT(payment_date,3) & MID(payment_date,7)

이는 날짜에 대해 내장된 온전성 검사를 사용하여 이를 수행하는 방법입니다.

Dim OldString, NewString

OldString = "31.12.2008"

Dim myRegExp
Set myRegExp = New RegExp
myRegExp.Global = True
myRegExp.Pattern = "(0[1-9]|[12][0-9]|3[01])[- /.](0[1-9]|1[012])[- /.]((19|20)[0-9]{2})"

If myRegExp.Test Then
    NewString = myRegExp.Replace(OldString, "$2.$1.$3")
Else
    ' A date of for instance 32 December would end up here
    NewString = "Invalid date"
End If

내 모든 앱에서 사용하는 자체 날짜 조작 기능이 있지만 원래는 다음 샘플을 기반으로 했습니다.

http://www.adopenstatic.com/resources/code/formatdate.asp

라이센스 : CC-BY-SA ~와 함께 속성
제휴하지 않습니다 StackOverflow
scroll top