wie verwende ich "isDateDMY" richtig?

[Silent_Bob]

Ich hab schon wieder ne Frage.

Wie muss ich IsDate verwenden?

Ich möchte jetzt einfach nur prüfen, ob das vom User eingegebene Datum an sich korrekt ist.

Habe mir dazu die Notes Hilfe zu Rate gezogen, aber ich komme jetzt nicht weiter.

So sieht das Script aus:

Sub Click(Source As Button)
   Dim session As New NotesSession
   Set international = session.International
   If international.IsDateDMY(Inputbox("Datum angeben"))= True Then
      Msgbox "ok"
   Else
      Msgbox "datum falsch"
   End If
End Sub

Als Fehlermeldung erhalte ich "Variant enthält keinen Container".
Was heisst das? Was mach ich wieder falsch?

[koehlerbv]

Wo fuhrwerkst Du denn da rum ? 
Die Klasse NotesInternational ist doch was ganz anderes, als Du suchst.

Du brauchst die LS-Funktion Isdate:

Code

   If IsDate (Inputbox$ ("Datum angeben"))= True Then
      Msgbox "ok"
   Else
      Msgbox "datum falsch"
   End If

Bernhard

[Silent_Bob]

OOps.

Dann hab ich da kräftig was verwechselt.

Bin ja noch anfänger.

Okay, geht. Danke