List Directory- Include Hiden files - Access !?

[ragazzo]

Hi,
I am using this code in access form to list everything in directory but it did`not show hidden or system files.
how works this code to list all files include hidden or system files.?

Private Sub Form_Load()
Dim LoadFiles   As String
Dim strFill     As String

LoadFiles = dir$("c:\*.*")
Do While LoadFiles > ""
strFill = strFill & LoadFiles & ";" 
LoadFiles = dir$
Loop
lstFiles.RowSource = strFill

End Sub

Thank you

[ADezii]

Try:

Dim LoadFiles As String
Dim strFill As String
  
LoadFiles = Dir$("c:\*.*", vbbHidden Or vbSystem)

Do While LoadFiles <> ""
  strFill = strFill & LoadFiles & ";"
  LoadFiles = Dir$
Loop

lstFiles.RowSource = strFill

[ragazzo]

Try:

Dim LoadFiles As String
Dim strFill As String
  
LoadFiles = Dir$("c:\*.*", [B]vbHidden Or vbSystem[/B])

Do While LoadFiles [B]<>[/B] ""
  strFill = strFill & LoadFiles & ";"
  LoadFiles = Dir$
Loop

lstFiles.RowSource = strFill

It Works Many thanks ......

[ADezii]

It Works Many thanks ......

Glad it works for you.