Type Mismatch Error

Hi,

I don't understand why I have the "Type Mismatch" error while running this script (at line 5):

Dim date_today, String, @T"dd-mm-yyyy"
Dim date_endofmonth, String, @ME"dd-mm-yyyy"
Dim is_same, Boolean

isEqual date_today, date_endofmonth, is_same
if is_same, MODA, MODB
MODA:
MODB:

Please could you help?

The values are all numeric, specified as strings, yet not in entered with quotes, which breaks the parser. The following would do what you want

	Code:
	Dim date_today, String, "@T"yyyy-mm-dd"" Dim date_endofmonth, String, "@ME"yyyy-mm-dd"" Dim is_same, Boolean isEqual date_today, date_endofmonth, is_same if is_same, MODA, MODB MODA: MODB:

or alternatively you can use

	Code:
	Dim diff, number DateDiff "@T"yyyy-mm-dd"", "@ME"yyyy-mm-dd"", diff if diff, MODA, MODB MODA: MODB:

Hi, I'm having a similar problem with the following code; the Errorseverity variable is pulled from an INI file using inifilegetkey, and the isequal gives type mismatch whether it is populated or not.

//set the error severity if it's not set
dim nosev, boolean
IsEqual( Errorseverity, "", nosev )
if (nosev, setsev, actionstart)

setsev:
set Errorseverity, "4"

actionstart:

It cannot compare numbers against empty strings as it doesn't know the data type of the empty value

Try this

	Code:
	dim GotSev, number length( ErrorSeverity, GotSev ) if (GotSev, actionstart, setsev)