comparing dates

[prakashG]

EC_date.txt file has dates as below:

2020-05-26
2020-05-27
2020-05-28
2020-05-29
2020-06-01
2020-06-02
2020-06-03

I want the read date to match with current date.
But the match is not happening.

Code: Select all

#EscapeChar `

FormatTime, TimeString,currentdatetime, yyyy-MM-dd
MsgBox The current date (long format) is %TimeString%.

FileRead,File1,Y:\EC_date.txt
i := 0

Loop,Parse,File1, `n
{
	i := i + 1
	Line1 := A_LoopField
			    
	If (Line1 = TimeString )
		{
		msgbox, i is %i%
		Break		
		}
}
Return

[SKAN]

Hi Prakash,

Remove the return inside the loop and place it outside the loop after }.
As is, the loop won't iterate more than once because of the return

[garry]

@SKAN , thanx

Code: Select all

FormatTime, TimeString,currentdatetime, yyyy-MM-dd
File1=
(
2020-05-26
2020-05-27
2020-05-28
2020-05-29
2020-06-01
2020-06-02
2020-06-03
)
i=0
Loop,Parse,File1, `n,`r
{
i++
x:=a_loopfield
if (x=Timestring)
  break
}
msgbox,Line-%i%=%x%
exitapp

[prakashG]

Tried that. Actually my code has return outside, but while posting here, i made mistake.
anyway, the If (Line1 = TimeString ) code is not working. I suppose it should be simple string match (date as a string). But not working.

[SKAN]

Tried that. Actually my code has return outside, but while posting here, i made mistake.
anyway, the If (Line1 = TimeString ) code is not working. I suppose it should be simple string match (date as a string). But not working.

Update your post then.

[prakashG]

edited the code.

[SKAN]

edited the code.

Good.

Line1 has a trailing `r and hence not matching the TimeString

Change your loop to Loop, Parse, File1, `n, `r

[prakashG]

It worked. Thank you.
May i know how did you debug that `r ? is there a way to see all control characters in text file?

[SKAN]

It worked. Thank you.
May i know how did you debug that `r ? is there a way to see all control characters in text file?

I use my own function to view binary content. You may use a Hex viewer/editor to view any file.
But when a string comparison fails, just do something like

Code: Select all

MsgBox % StrLen(Line1)

to make sure there are no extra chars in source string.

[prakashG]

thank you

[BoBo]

@prakashG You can use Notepad2 (free) that offers the option to show (and create) these line-endings (EOL-characters: [`r|`n`r|`n].

[gregster]

Afaik, most editors that are actually used for programming have an option to show these EOL characters.

Generally, I like this page for examining strings for invisible characters: https://www.soscisurvey.de/tools/view-chars.php