2012-06-27 4 views
0

Я пишу в vb и используя параметры excels для преобразования .xls документов в pdf. Процесс работает нормально, потому что я использую строку. Мне нужно знать, как-то перебирать исходную папку, а затем конвертировать все файлы в эту папку в pdf и помещать в папку экспорта, сохраняя исходное имя файла. Циклы серьезно являются проклятием моего существования в программировании, хотя я знаю, что вам нужно это для прочного фундамента в этой отрасли.VB looping и Excel

Пример:

Dim excelApplication As ApplicationClass = New ApplicationClass() 
    Dim excelWorkbook As Workbook = Nothing 
    Dim paramSourceBookPath As String = "C:\My_Projects\Testing\filename.xls" 
    Dim paramExportFilePath As String = "C:\My_Projects\Testing\filename.pdf" 

Спасибо заранее.

ответ

0

Попробуйте это:

Dim dir As New IO.DirectoryInfo(path) 
    Dim files As IO.FileInfo() = dir.GetFiles("*.xls") 
    For Each file In files 
     'Do Something 
    Next