Results 1 to 10 of 10

Thread: (RESOLVED) Dir list and File list

  1. #1
    Swatty
    Guest

    (RESOLVED) Dir list and File list

    Is there a tool I can use in Access to find directories and files on a machine or in the connected network.

    It should be something like you have in VB.

    I must develop it in Access for the moment.
    Later it will be transfered to VB6 , so I could reuse things i make in access.

    Any help app.

  2. #2
    Bouncy Member darre1's Avatar
    Join Date
    May 2001
    Location
    Peterborough, UK
    Posts
    3,828
    you can use the DriveListBox, DirListBox and FileListBox controls for this.

    you can also use the Dir() function to search for files
    Confucious say, "Man standing naked in biscuit barrel not necessarily ****ing crackers."

    Don't forget to format your code in your posts

  3. #3
    I'm about to be a PowerPoster! Hack's Avatar
    Join Date
    Aug 2001
    Location
    Searching for mendhak
    Posts
    58,333
    VB Code:
    1. Private Sub Form_Load()
    2. Drive1.Drive = "C:"
    3. End Sub
    4.  
    5. Private Sub Drive1_Change()
    6. Dir1.Path = Drive1.Drive
    7. End Sub
    8.  
    9. Private Sub Dir1_Change()
    10. File1.Path = Dir1.Path
    11. End Sub

  4. #4
    Fanatic Member joltremari's Avatar
    Join Date
    Sep 2000
    Location
    Mississippi
    Posts
    674

    VB Code:
    1. Private Sub Command77_Click()
    2.  
    3. If Dir("C:\My Documents\") <> "" Then
    4.     MsgBox "WooHoo!"
    5. Else
    6.     MsgBox "Crap!"
    7. End If
    8.  
    9. End Sub
    "I have not failed. I've just found 10,000 ways that won't work."
    'Thomas Edison'

    "If we knew what it was we were doing it wouldn't be called research, would it?"
    'Albert Einstein'

    VB6

  5. #5
    Fanatic Member joltremari's Avatar
    Join Date
    Sep 2000
    Location
    Mississippi
    Posts
    674

    Just in case you didn't know....

    Same for a file
    VB Code:
    1. Private Sub Command77_Click()
    2. If Dir("C:\My Documents\spreadsheet.xls") <> "" Then
    3.  
    4.     MsgBox "Yep!"
    5. Else
    6.     MsgBox "Nope!"
    7. End If
    8.  
    9. End Sub
    JO
    "I have not failed. I've just found 10,000 ways that won't work."
    'Thomas Edison'

    "If we knew what it was we were doing it wouldn't be called research, would it?"
    'Albert Einstein'

    VB6

  6. #6
    Bouncy Member darre1's Avatar
    Join Date
    May 2001
    Location
    Peterborough, UK
    Posts
    3,828
    Originally posted by joltremari

    VB Code:
    1. Private Sub Command77_Click()
    2.  
    3. If Dir("C:\My Documents\") <> "" Then
    4.     MsgBox "WooHoo!"
    5. Else
    6.     MsgBox "Crap!"
    7. End If
    8.  
    9. End Sub
    straight from MSDN
    Confucious say, "Man standing naked in biscuit barrel not necessarily ****ing crackers."

    Don't forget to format your code in your posts

  7. #7
    Swatty
    Guest
    Can't find them in my toolbox.

    Where are they located in access ???

  8. #8
    Fanatic Member joltremari's Avatar
    Join Date
    Sep 2000
    Location
    Mississippi
    Posts
    674
    Where are what located?
    "I have not failed. I've just found 10,000 ways that won't work."
    'Thomas Edison'

    "If we knew what it was we were doing it wouldn't be called research, would it?"
    'Albert Einstein'

    VB6

  9. #9
    Swatty
    Guest
    Where are what located?
    The tools to let the user choose a file trough a drivelist and a filelist. But in Access

  10. #10
    Swatty
    Guest
    Found something that is available in the Northwind.mdb

    Used this works fine.

    Everyone who even has tried to help me THANKS.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width