MODIFICAR EL NOMBRE DE UN ARCHIVO CON VISUAL BASIC 2019-2022

[vc_row][vc_column][vc_column_text]

Ejemplo de código ne Visual Basic para modificar nombres de archivos contenidos en una carpeta.

Diseño del Formulario:

[/vc_column_text][vc_empty_space height=»20px»][vc_column_text]

Imports System.IO
Public Class Form1

Private Sub browseButton_Click(sender As Object, e As EventArgs) Handles browseButton.Click
   If FolderBrowserDialog1.ShowDialog() = DialogResult.OK Then
        Dim folder As New DirectoryInfo(FolderBrowserDialog1.SelectedPath)
        Dim nomArchivo As String
        For Each file As FileInfo In folder.GetFiles()
            nomArchivo = file.Name
            nomArchivo = nomArchivo.Replace(".sql", "x.sql")
            'MsgBox(nomArchivo)
            My.Computer.FileSystem.RenameFile(FolderBrowserDialog1.SelectedPath & "\" & file.Name, nomArchivo)
            'filesListBox.Items.Add(file.Name)
            filesListBox.Items.Add(FolderBrowserDialog1.SelectedPath & "\" & nomArchivo)
        Next
    End If
End Sub

End Class

Descargar el ejemplo completo click aquí.

[/vc_column_text][/vc_column][/vc_row]