Domino 9 und frühere Versionen > ND6: Entwicklung

Type mismatch - versteh ich nicht...

<< < (2/3) > >>

spirix:
Hi Dirk, Hi m3,

ich fasse mich mal kurz, deklariert sind die Variablen richtig und in sCurrentYear$ steht auch was drin ;)


--- Code: ---Sub Click(Source As Button)
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Dim sCurrentMonth As String
Dim sCurrentYear As String
Dim sMessageBoxSelectString As String
Dim sFirstDay As String

Set uidoc = workspace.CurrentDocument

sCurrentMonth$ = uidoc.FieldGetText("DiaMonat")
sCurrentYear$ = uidoc.FieldGetText("Jahr")
sMessageBoxSelectString$ = "Gewählten Monat füllen? " + sCurrentMonth$ + " " + sCurrentYear$ 

sFirstDay$ = getFirstDayOfMonth(sCurrentMonth$, Cint(sCurrentYear$))
Messagebox sFirstDay$ 'TEST

If Messagebox(sMessageBoxSelectString$, 36, "Monat erstellen") = 6 Then
Messagebox ("Monat wird gefüllt") 'TEST
Else
Messagebox  ("Abbruch") 'TEST
End If


End Sub


--- Ende Code ---

Axel:
Ich habe deinen Code auf die Schnelle mal getestet.

Wenn ich die beiden Variablen so fülle

sCurrentMonth$ = "Januar"
sCurrentYear$ = "2007"

dann funktionierts.

Was hat denn dein Jahr-Feld für einen Typ?


Axel
 

m3:
Ich hab den Code jetzt mal so laufen lassen (mit einem Test-Dokument mit den Feldern).Klappt wunderbar.

IMHO hat es was mit den Feldeigenschaften bzw. deren Inhalt.

spirix:
Hm, das Jahr-Feld ist bei mir vom Typ Text. Das Monatsfeld ist eine Dialogliste.

m3:
Mach mal

--- Code: ---sMessageBoxSelectString$ = "Gewählten Monat füllen? |" & sCurrentMonth$ & "| |" & sCurrentYear$ &  "| |" & CStr( CInt(sCurrentYear$ ) ) & "|"
--- Ende Code ---

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete