Wie ein Datum-String in klassischen Asp verwandeln
-
01-07-2019 - |
Frage
Ich bin ein wenig blockheaded jetzt ...
ich ein Datum Zeichenfolge im europäischen Format haben tt.mm.jjjj und müssen es zu transformieren mm.dd.yyyy mit klassischen ASP. Jede schnelle Ideen?
Lösung
Wenn sein immer in diesem Format Sie Split verwenden könnte
d = split(".","dd.mm.yyyy")
s = d(1) & "." & d(0) & "." & d(2)
Dies würde für Termine wie 1.2.99 erlaubt auch
Andere Tipps
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")
OK, ich habe gerade eine Lösung ich:
payment_date = MID(payment_date,4,3) & LEFT(payment_date,3) & MID(payment_date,7)
Dies ist eine Möglichkeit, es zu tun mit in Plausibilitätsprüfung für Termine gebaut:
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
ich meine eigene Datum Manipulation Funktionen, die ich in all meinem Apps nutzen, aber es war auf dieser Probe ursprünglich zugrunde:
Lizenziert unter: CC-BY-SA mit Zuschreibung
Nicht verbunden mit StackOverflow