Hi,
I've a Kixform with a checkbox.
I'm pinging the computer to see if it's powered on or not.
The value of the checkbox is on or off.
But it's only checking once when the Kixform is opened.
How can I refresh the form so that it pings again ?
Here a piece of the code:

DIM $Computer
$Computer = 'NL-KDKF7PM'
If Ping($Computer)
$CheckBox1.Checked = "True"
Else
$CheckBox1.Checked = "False"
EndIf

Function Ping($PC)
DIM $PC
Shell'%comspec% /c ping -n 1 '+$PC+' >nul'
$Ping = NOT @ERROR
EndFunction

$Form.Show
While $Form.Visible
$=Execute($Form.DoEvents())
Loop
Exit 1


Thanks