[RESOLVED] Process multiple Files

[randem]

lokiloki2,

What is the purpose of this code:

For X = 0 To (List1.ListCount - 1)
 
List1.ListIndex = X
Next

[dglienna]

This allows you to select multiple filenames to open directly into the CDC.

Private Sub cmdOpen_Click()
  ' CancelError is True.
   On Error GoTo ErrHandler
   ' Set Flags
    CommonDialog1.Flags = cdlOFNAllowMultiselect Or cdlOFNLongNames
   ' Set filters.
   CommonDialog1.Filter = "All Files (*.*)|*.*|Text" & _
      "Files (*.txt)|*.txt|Batch Files (*.bat)|*.bat"
   ' Specify default filter.
   CommonDialog1.FilterIndex = 2
   ' Display the Open dialog box.
   CommonDialog1.ShowOpen
   ' Call the open file procedure.
 '  OpenFile (CommonDialog1.FileName)
   Exit Sub
 
ErrHandler:
' User pressed Cancel button.
   Exit Sub
 
End Sub

[lokiloki2]

Should not have been in the code. My bad.

If List1.ListCount = 0 Then GoTo ext

[lokiloki2]

Dglienna,

The code you posted, will that run the .exe on each file ?

[lokiloki2]

For X = 0 To (List1.ListCount - 1)
 
List1.ListIndex = X
Next

Doesn't belong, was testing out some code and forgot to delete this.

[dglienna]

Dglienna,

The code you posted, will that run the .exe on each file ?

I'm not sure. I think it will open each one in a separate instance. I know that's the case with Word, for instance. I've never really tried to use it.

[lokiloki2]

This will not work.

The exe I run on each file listed in the Listbox produces a checksum that I need to save to a textfile. If multiple files are selected in the CommonDialog, only the last line in the listbox gets processed. I need to process each file if someone selects more than one file.

THX