; bcast.au3
; chris ihm - ihmc(at)dowling.edu
; If not exist announcements page, drop out
; else ask if you want to display it 
; if yes, run ie

; first get and parse ie path
$iepath=RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\IEXPLORE.EXE", "PATH")

; registry path always has ";" appended, calling stringsplit using ";" delimiter just drops it
$array=stringsplit($iepath,";")

; if any path errors try removing semicolon here to see paths
; msgbox(0, "Path to IE", "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\IEXPLORE.EXE\path is " & @CRLF &  $array[1] & @CRLF & @CRLF & "So we are executing: " & @CRLF & $array[1] & "\iexplore.exe")

; change drive and path here to match your environment - if you keep bcast3.exe and your announcement in the same
; directory you need not utilize search drives
If FileExists("q:\announce\announce.html") Then
    $answer = MsgBox(68,"Announcement", "An important announcement has been posted." & @CRLF & "Do you want to view it?")
    If $answer = 7 Then exit
	Run($array[1] & "\iexplore.exe q:\announce\announce.html")
EndIf