HI NTDOC,

Thanks for the information I am going to have a look.
I am not sure if it will help but at present I am running this script just on two machines for testing one is XP the other is win 2000.

The code for the DriveMap seems to be the same as the one you have and it is working fine. So I am in a state of confussion. I am goiong to do a search to find all KIX32 files on my server, do you think that the version in the NETLOGON can be diff'. is there away to unregister KIX32?
What is the best way to confirm what verion of KIX32 I am using to run the scripts? At the moment I take it is the KIX32 that is in the same folder that the scripts are stored in. I point to this folder when I am going to DOS.

Again thank you and all the other guys

Code:

Dim $0S, $Msg, $Answer, $RC
$OS=SetOption('Explicit','off')
$OS=SetOption('NoVarsInStrings','On')
$OS=SetOption('WrapAtEOL','On')

$Answer = MessageBox ("Please confirm that you have read and understood the firm's IT policy. If you have any questions relative to this please contact Gary or Rae", "Reminder", 4180)
If $Answer <> 6
   $Msg=MessageBox ( "You are unable to log to the network", "call your IT Administrator", 4112)
   $RC=Logoff(1)
Else 
   ;$ = shutdown("","you are being logged off",45,1,1) 
   $Msg=MessageBox ("You are now being connected to the network","Welcome to Johnsons MME",64,5)
Endif

If InGroup("Domain Users")
    MapDrive("F:", "jmmes", "Vol1")
    MapDrive("G:", "jmmes", "mCalas")
    MapDrive("H:", "jmmes", "caldata")
    MapDrive("I:", "jmmes", "s6system")
    MapDrive("J:", "jmmes", "winapp")
    ; K: Drive Mapped by OS as Home Share
    MapDrive("L:", "jmmes", "abas")
    MapDrive("M:", "jmmes", "vol1")
    MapDrive("N:", "jmmes", "netapps")
    MapDrive("O:", "jmmes", "JMME-FPlan")
    MapDrive("P:", "jmmes", "apps")
    MapDrive("Q:", "jmmes" ,"NotesMME")
    MapDrive("S:", "jmmes", "vol2")
    MapDrive("T:", "jmmes", "templates")
    MapDrive("Y:", "jmmes", "PWCDll")
    
Endif

Function MapDrive($Drive, $Server, $Share)
    Dim $Drive, $Server, $Share, $shell
    Color c+/n

    If $Drive<>"" and $Server<>"" and $Share<>""
        $LogText="Connecting $Drive to \\$Server\$Share"
        ? $LogText
        USE $Drive /Delete /Persistent
        USE $Drive "\\" + $Server + "\" + $Share
        If @error=0
            color g+/n
            $x = " - Success"
            $x
            If val($DOS) >= 5
                $shell=createobject("shell.application")
                $shell.namespace($Drive+"\").self.name=$Share + " on '" + $Server + "'"
                $shell = 0
            Endif
        Else
            color r+/n
            $x = " - Failed: Error " + @error
            $x
            $ErrorState=1
        Endif
        ; Commented out logging
        ;WriteLog ($LogText + $x)
        ;WriteLog2("%temp%\MapDrive.log",$LogText + $x,1)
        Color w+/n
    Else
        ? "Function 'MapDrive' called with invalid parameters: '$Drive', '$Server', '$Share'"
        ; Commented out logging
        ;WriteLog ("Function 'MapDrive' called with invalid parameters: '$Drive', '$Server', '$Share'")
    Endif
Endfunction