HappyJoni

I'm writing a program that changes the working directory, depending on who the user is. I use the ChDir command to change directories. I want to make sure that it's actually changing directories. Is there a way to do this?


Private Sub cmbWho_Click()

Dim testdir As String

Select Case cmbWho.ListIndex
Case 0
ChDir ("M:\SCBMAIN\JANEZ\PRHOME")
Case 1
ChDir ("M:\SCBMAIN\KBARRY\PRHOME")
Case 2
ChDir ("M:\SCBMAIN\JBROWER\PRHOME")
Case 3
ChDir ("M:\SCBMAIN\JFELDSTEIN\PRHOME")
Case 4
ChDir ("M:\SCBMAIN\MHENRY\PRHOME")
Case 5
ChDir ("M:\SCBMAIN\PADDY\PRHOME")
End Select

End Sub

Any help/suggestions are greatly appreciated
Joni

sgt_pinky

Call the function "CurDir"

eg:

Note, its good practise to convert directories to either uppercase or lowercase, because otherwise you will compare the directories, and it will think they are different, even though they arent.

HappyJoni

You saved me so much time. I really appreciate your help :-)

Joni

webbone

This is ESPECIALLY important if you have to work in Win9x! Although you might see upper and/or lower case letters in Explorer, all the directory and file functions return lower-case only - I spent a week working on a problem like this because I forgot this icky little fact!