Сначала вы должны прочитать ваш CSV .. я полагаю, что это не слишком большой, так что-то вроде
Dim MyCSV() As String = IO.File.ReadAllLines("c:\my file.csv")
Затем идти вперед с «For Each» строки в вашем CSV
For Each Line In MyCSV.ToArray
Next
В этом для каждого вы должны разделить текущую строку .. и я полагаю, является стандартным CSV, так должно быть «» (я думаю)
Dim MySplitLine() As String = Line.Split(","c)
Наконец (также в для каждого) вы можете переименовать файл с новым именем
If IO.File.Exists("c:\folder 1\folder 2\" & MySplitLine(1) & ".extension") Then
FileSystem.Rename("c:\folder 1\folder 2\" & MySplitLine(1) & ".extension",
"c:\folder 9\folder 8\" & MySplitLine(0) & ".extension")
End If
Не забудьте установить расширение.
Что вы пробовали? Есть много ресурсов о том, как это сделать, если вы выполните быстрый поиск: http://stackoverflow.com/questions/1898/csv-file-imports-in-net http://stackoverflow.com/questions/10784613/how-to-rename-file-in-vb-net – Neal