Hola a todos! Estoy haciendo un proyecto para la facultad y necesito copiar un archivo(archivo de texto) del directorio de la aplicación, al destino donde seleccione el usuario,mediante el control SaveFileDialog. Tengo una lista con objetos, la cual serializo de forma binaria y la ubico en el directorio de mi aplicación, luego, tengo un método, que deserializa este archivo y carga los objetos en memoria. Luego recorriendo la lista, guardo los objetos en un archivo de texto (por defecto se guarda en el directorio de mi aplicación: Bin/Debug).

Lo que quiero hacer es, mediante el SaveFileDialog, guardar este archivo de texto que genero, en donde el usuario lo desee, el tema que he tratado de que me lo copie en la ruta que selecciona el usuario, pero no he podido hacerlo, alguna sugerencia?

Gracias

Para realizar una copia de cualquier archivo es sumamente sencillo basta con ocupar la instruccion:

Código:

FileCopy(RutaOrigen, RutaDestino)

Para recuperar la ruta seleccionada por el usuario en el SaveFileDialog lo haces con:

Código:

SaveFileDialog.FileName

Así que quedaria mao meno así:

Código:

Imports System.IO.File
Imports System.Windows.Forms
 
Public Class Form1
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim MyDlg As New savefiledialog
 
        With MyDlg
            .Filter = "Archivos de texto (*.txt)|*.txt|Todos los archivos (*.*)|*.*"
            If .ShowDialog = Windows.Forms.DialogResult.OK Then
                FileCopy("C:\Users\arturo_alpha72\Documents\datos alex.txt", .FileName)
            End If
        End With
    End Sub
End Class

Ya me debes las chelas saludos cordiales

Muchas gracias! Ya lo pruebo! Abrazo

Muchas gracias, ya lo pruebo!!!! No pense que fuera tan facil jeje Abrazo

Iniciado por tux2003

Para realizar una copia de cualquier archivo es sumamente sencillo basta con ocupar la instruccion:

Código:

FileCopy(RutaOrigen, RutaDestino)

Para recuperar la ruta seleccionada por el usuario en el SaveFileDialog lo haces con:

Código:

SaveFileDialog.FileName

Así que quedaria mao meno así:

Código:

Imports System.IO.File
Imports System.Windows.Forms
 
Public Class Form1
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim MyDlg As New savefiledialog
 
        With MyDlg
            .Filter = "Archivos de texto (*.txt)|*.txt|Todos los archivos (*.*)|*.*"
            If .ShowDialog = Windows.Forms.DialogResult.OK Then
                FileCopy("C:\Users\arturo_alpha72\Documents\datos alex.txt", .FileName)
            End If
        End With
    End Sub
End Class

Ya me debes las chelas saludos cordiales