Como adjuntar archivos a una carpeta desde vs.net

[ppr]

hola :$, alguien puede indicarme como puedo adjuntar archivos en todo formato incluso documentos scaneados como imagen a una determinada carpeta desde una aplicacion vs.net? necesito una guia uurgentisimo muchas gracias.......

[Trulala de cordoba]

hola
No me queda bien claro lo que queres hacer, pero creo que te estas refiriendo a que podas copiar archivos de un lado a otro.
Si es esto lo que queres hacer podes usar la libreria System.OI en la que tenes el objeto File.Copy()

Cualquier cosa avisa

[ppr]

hola Cristian, disculpa si no fui clara, lo quiero es q cuando haga click en un boton adjuntar me abra una ventana en la cual yo pueda explorar las unidades y carpetas hasta seleccionar algun archivo y poder copiarlo a una determinada carpeta de mis unidades al hacer clik en aceptar, :$, q herramientas uso y q comandos :$ porfa....

[Trulala de cordoba]

Hola como te va

Te dejo un ejemplo.
Espero te sirva
Saludos.

CSHARP

OpenFileDialog myOpen = new OpenFileDialog();
myOpen.ShowDialog();
myArchivo = myOpen.FileName;
txtfoto.Text = Path.GetFileName(myArchivo);

VBNET

Dim myOpen As New OpenFileDialog()
myOpen.ShowDialog()
myArchivo = myOpen.FileName
txtfoto.Text = Path.GetFileName(myArchivo)

[ppr]

Iniciado por Trulala de cordoba

Hola como te va

Te dejo un ejemplo.
Espero te sirva
Saludos.

CSHARP

OpenFileDialog myOpen = new OpenFileDialog();
myOpen.ShowDialog();
myArchivo = myOpen.FileName;
txtfoto.Text = Path.GetFileName(myArchivo);

VBNET

Dim myOpen As New OpenFileDialog()
myOpen.ShowDialog()
myArchivo = myOpen.FileName
txtfoto.Text = Path.GetFileName(myArchivo)

///////////////////////
MUchas gracias por la ayuda, no se q haria sin este foro :D. me funciono esto:
System.IO.File.Copy(miArchivo, dir)
ahora tengo otro problema, cuando ya existe el archivo dentro la carpeta me sale una excepcion que dice q el archivo ya existe, como hago para sobreescribirla?
gracias :D

[Peterpay]

File.Exists(archivo) para verificar si existe

si existe peudes hacer

File.Delete()

y de nuevo copiarlo

[ppr]

Iniciado por Peterpay

File.Exists(archivo) para verificar si existe

si existe peudes hacer

File.Delete()

y de nuevo copiarlo

Muchas me funciona de maravilla

[MKiske]

Iniciado por ppr

Muchas me funciona de maravilla

aqui dejo una parte de algo que ojala sirva

Function Buscar_Carpeta(ByVal Titulo As String, ByVal Path_Inicial As Object) As String

Dim objShell As Object
Dim objFolder As Object
Dim o_Carpeta As Object

' Nuevo objeto Shell.Application
objShell = CreateObject("Shell.Application")

On Error Resume Next
'Abre el cuadro de diálogo para seleccionar
objFolder = objShell.BrowseForFolder( _
0, _
Titulo, _
0, _
Path_Inicial)

objFolder = objShell.BrowseForFolder(0, Titulo, 0, Path_Inicial)

' Devuelve solo el nombre de carpeta
o_Carpeta = objFolder.Self

' Devuelve la ruta completa seleccionada en el diálogo
Buscar_Carpeta = o_Carpeta.Path

Exit Function


End Function


aqui adjuntar el archivo y lo cpas a la carpeta que deseas

Dim myOpen As New OpenFileDialog()
Dim myArchivo As String
myOpen.ShowDialog()
myArchivo = myOpen.FileName
Label15.Text = Path.GetFileName(myArchivo)
Label1.Text = ""

Dim Dir As String

' Le pasa la leyenda del cuadro de iálogo y el path inicial

Dir = Buscar_Carpeta(" ... Seleccione una carpeta ", 0)
System.IO.File.Copy(myArchivo, Dir)