ayuda para copiar archivo..

[juanksepulv]

Iniciado por Insomnia

Hola

Utiliza el control CommonDialog (lo tienes que añadir desde Proyecto / Componentes / Microsoft Common Dialog...)

Luego pones un código parecido a este:

Código:

        With CommonDialog1
            .Filter = "Todos los archivos (*.*) | *.*"
            .InitDir = Left(Pedido.Text, pos) & "Documentacion" 'Directorio en el que se abre por defecto
            .ShowSave 'Mostrar ventana guardar
            If .FileName = "" Then Exit Sub 'Si no selecciona nada
            Texto97.Text = .FileName 'en filename guarda se guarda la ruta seleccionada por el usuario
        End With

--Saludos--

gracias por el dato,