User Notice Using VB Script – Acrobat Reader Output

Option Explicit
DIM fso
Set fso = CreateObject("Scripting.FileSystemObject")

If (fso.FileExists("\\FILE_SERVER\NOTICE$\live.pdf")) Then

dim wShell:Set wShell=CreateObject("WScript.Shell")
dim i
i=wShell.Run("AcroRd32.exe \\FILE_SERVER\NOTICE$\live.pdf",1,False)
Set wShell=Nothing

Else
 WScript.Quit()
End if
 WScript.Quit()