
11/07/2011, 03:02
|
 | | | Fecha de Ingreso: agosto-2007
Mensajes: 1.338
Antigüedad: 17 años, 7 meses Puntos: 18 | |
Respuesta: adjuntar imagenes access 2003 Puedes uasra una funcion similar a esta para copiar las imagenes:
Public Function copiafichero_click(rutaorigenimportar As String,rutadestinoimportar As String)
Dim vr1 As Object
Set vr1 = CreateObject("Scripting.FilesystemObject")
vr1.CopyFile rutaorigenimportar , rutadestinoimportar
Set vr1 = Nothing
End Sub
Un saludo |