VBS and %lOGONSERVER%

Hi guys please can you help me out here, I have a script that copies a file to the pc's system32 directory but I am having difficulty, I would like to set the %netlogon% as the source folder.

at the moment is errors saying "source folder not found" however I replace the source folder with a UNC server name and path it all works fine. I am in a desperate hurry for this so I have put 500 points on it, I would put 10,000 if I could thanks in advanced !!!

'==========================================================================
dim strSource, strDestination
strSource = "\\wfflongham01\netlogon\logo\"
strDestination = "c:\windows\system32\logo\"
'==========================================================================

SynchroniseFiles strSource, strDestination

function SynchroniseFiles(byval strSourceFolder, byval strDestinationFolder)

      CheckForBackSlash strSourceFolder
      CheckForBackSlash strDestinationFolder
      
      dim objFSO
      set objFSO = Createobject("scripting.filesystemobject")
      
      if not objFSO.folderexists(strDestinationFolder) then
            objFSO.createfolder(strDestinationFolder)
      end if

      dim file
      for each file in objFSO.getfolder(strSourceFolder).files
      
            if not objFSO.fileexists(strDestinationFolder & file.name) then
                  objFSO.copyfile file, strDestinationFolder & file.name
            else
                  if file.DateLastModified > objFSO.getfile(strDestinationFolder & file.name).DateLastModified then
                        objFSO.copyfile file, strDestinationFolder & file.name
                  end if
            end if
      next

      set objFSO = nothing

end function


function CheckForBackSlash(byref strFolder)
      if right(strFolder, 1) <> "\" then
            strFolder = strFolder & "\"
      end if
end function