Missing Flash Drive Causes VBScript To Abort Copying

[steve.marks59]

My OS: XP-PRO SP3

I use the VBScript below to copy files and folders to different drives. This script allows my folders to retain their custom icons when copied. One of the destination folders "N:\APPS" is on a USB flash drive . I have discovered if my flash drive is not connected the script aborts the copying process when it can't find the drive. I would like to know if the script can be modified to ignore non existing destinations and continue
to copy to the other valid destinations. I realize I could write the script so the copying to the flash drive would be the last operation but I am interested in finding out if this script could be modified as I explained above.

                   On Error Resume Next
             Const OverwriteExisting = True
                set args = wscript.Arguments  
     set objShell = CreateObject("Shell.Application" )  
 
Set objFolder = objShell.NameSpace("D:\Program Files" ) 
                     if not objFolder is nothing then  
                             for each item in args   
                       objFolder.CopyHere item, 16  
                                           next  

Set objFolder = objShell.NameSpace("N:\APPS" ) 
                     if not objFolder is nothing then  
                             for each item in args   
                       objFolder.CopyHere item, 16  
                                           next 

Set objFolder = objShell.NameSpace("W:\APPS" ) 
                     if not objFolder is nothing then  
                             for each item in args   
                       objFolder.CopyHere item, 16  
                                           next 

Set objFolder = objShell.NameSpace("X:\APPS" ) 
                     if not objFolder is nothing then  
                             for each item in args   
                       objFolder.CopyHere item, 16  
                                           next 

                                           End If 
                                           End If 
                                           End If 
                                           End If