I am trying to send one email a day which contains the external IP-address.
The code below sends an email every minute, just for testing purposes.
It works but it is not stable, see screenshot.
Any ideas to help me further?
Henk
OldTime$=mid$(time$,4,2)
NewTime$=OldTime$
do
NewTime$=mid$(time$,4,2)
If NewTime$<>OldTime$ then
OldTime$=NewTime$
print "New Time: ";NewTime$
r=3
a$= "External IP-address= " + WGET$("
api.ipify.org/", 443)
r = EMAIL ("from", "to", "Message from Annex "+ NewTime$, A$)
select case r
case 0
print "Email failed at " + NewTime$
case 1
print "Email success > " + A$
case else
print "Status unknown "
end select
print
endif
loop