heres a script that takes care of that problem, what it does is disconects the drive and reconects it during logon to completly avoid that problem
i can not take credit for the script at all because i did not write it, but i do use it and it works great, you can also check out the script site i found it at to help you out with other network drive problems, aslo a few good printer scripts too
Pre-requisites
On Line 12 change the server name from '\\alan' to your server name.
Make sure that your server has a share called '\drivers'. Or else change the reference to an actual share on your server.
Instructions to MapNetworkDrive
Copy and paste the script below into notepad.
Change the server name from "\\alan to the name of your server.
Save the file with .vbs extension e.g. Already.vbs.
Double click and check in your Windows Explorer for a new drive called :
drivers on 'alan' (W
' Already.vbs Windows Logon Script
' VBScript to map a network drive.
' Author Guy Thomas
' Version 1.7 - April 24th 2005
' ------------------------------------------------------'
Option Explicit
Dim strDriveLetter, strRemotePath
Dim objNetwork, objShell
Dim CheckDrive, AlreadyConnected, intDrive
' The section sets the variables.
strDriveLetter = "W:"
strRemotePath = "\\alan\drivers"
' This sections creates two objects:
' objShell and objNetwork and counts the drives
Set objShell = CreateObject("WScript.Shell")
Set objNetwork = CreateObject("WScript.Network")
Set CheckDrive = objNetwork.EnumNetworkDrives()
' This section deals with a For ... Next loop
' See how it compares the enumerated drive letters
' with strDriveLetter
On Error Resume Next
AlreadyConnected = False
For intDrive = 0 To CheckDrive.Count - 1 Step 2
If CheckDrive.Item(intDrive) =strDriveLetter _
Then AlreadyConnected =True
Next
' This section uses the If = then, else logic
' This tests to see if the Drive is already mapped.
' If yes then disconnects
If AlreadyConnected = True then
objNetwork.RemoveNetworkDrive strDriveLetter
objNetwork.MapNetworkDrive strDriveLetter, strRemotePath
' The first message box
objShell.PopUp "Drive " & strDriveLetter & _
"Disconnected, then connected successfully."
Else
objNetwork.MapNetworkDrive strDriveLetter, strRemotePath
objShell.PopUp "Drive " & strDriveLetter & _
" connected successfully." End if
WScript.Quit
GL
Life is not a journey to the grave with the intention
of arriving safely in a pretty and well preserved body,
but rather to skid in broadside, thoroughly used up,
totally worn out, and loudly proclaiming
--"WOW-- What a Ride!"