Use this little function I have for logging to the event log:
This assumes you are declaring objShell as
function LogtoEvent (MSG,success)
select case success
case 1 objShell.LogEvent EVENT_SUCCESS, MSG ' 1 is a success
case 0 objShell.LogEvent EVENT_FAILURE, MSG ' 0 is a error
case 2 objShell.LogEvent EVENT_WARNING, MSG ' 2 is a warning
case 3 objShell.LogEvent EVENT_INFORMATION, MSG
you just call LogtoEvent in your script like so:
Set objShell = wscript.createObject("wscript.shell")
You dont need to really clear variables as you only really do that if they are not needed again in the script but there is not much point if its the end anyway as it will be free automatically once the script is done.
LogtoEvent "THE MESSAGE",1
BTW I think the difference between Set objFSO = CreateObject("Scripting.FileSystemObject") and wscript.shell is that the FSO has more functions for file system operations but I am not sure.
Also Scripting.FileSystemObject probably cant access the event log. I would probably use both to be safe.