Thanks for yor replies. I have been playing with the script Mart posted and it seems to work for what I need. Here is what I have so far. I am a little worried about having the script running all the time on the laptops. I thought about bundling it as an EXE with AdminScriptEditor and starting it as a service, but it seems that it wont have access to the HKCU when it runs under alternative credentials so I figure I will just put it in the startup folder and run it hidden. I wanted to run it as a service so I could set it to restart in the event of a failure. Not sure how to do that otherwise. Also, the way I've written it, it can only be stopped by using task manager. I was hoping someone out there would have some suggestions for polishing it up a little. Thanks
 Code:
 
$ = SetConsole ("Hide")
Break on

If KeyExist ("HKLM\Software\MyMobile")
	;Do nothing
		Else
	$ = WriteValue ("HKLM\Software\MyMobile","LastRunDate","",REG_SZ)
EndIf

$wmiColl = GetObject("WinMgmts:root/cimv2").ExecQuery("Select * FROM Win32_NetworkAdapter")

:StartAgain


For Each $wmiObj in $wmiColl
$test = $wmiObj.name
	If InStr($test, "Wireless")
		;NetConnectionStatus returns 0 for not connected and 2 for connected.
		If $wmiObj.NetConnectionStatus = 2
			If Exist ("\\SERVER\Folder\Mobile.bat")
					$LastRunDate = ReadValue ("HKLM\Software\MyMobile","LastRunDate")
						If $LastRunDate = @DATE 
							; Do nothing
						Else
							Shell "%COMSPEC% /c \\Server\Folder\Mobile.bat"
							$ = WriteValue ("HKLM\Software\MyMobile","LastRunDate","@DATE",REG_SZ)
						EndIf 
			EndIf
		EndIf
		Sleep 60
	EndIf
Next
Goto StartAgain