Programación General > Visual Basic 6.0 e inferiores

 Copia De Archivos

(1/2) > >>

FRIJU:
Hola Conpañer@s!
                 Alguien tiene hecho por código, la copia de ficheros de un servidor, de una ruta concreta, que posiblemente no el usuario no tenga acceso, pero sin que sepa el usuario enviamos el usuario y contraseña de administrador del servidor y lo copiamos enotra ruta donde el usuario lo pueda leer.

    No se si está claro? :unsure:

Widark:
Hola FRIJU!

Si le entendi bien aqui esta:

--- Código: Text ---Declare Function Backup Lib "Kernel32" Alias "CopyFileA" _(ByVal lpexistingfilename As String, ByVal lpnewfilename As String, ByVal bfailifexists As Long) As Long Rem Esta linea va en un modulo Backup_DB RutaOrigen, RutaDestino Sub Backup_DB(strDBActual As String, strDBBackup As String) Rem Este es tambien va en un modulo  Dim Result As Long        If Dir(strDBActual) = "" Then         MsgBox Chr(34) & RutaDestino & Chr(34) & ". Este no es un nombre valido."      Else         Result = Backup(RutaOrigen, RutaDestino, False)      End If      End Sub  
espero le sirva, saludos.

FRIJU:
hola Widark!
        Muchas gracias por contestar, pero el tema es el siguiente, temgo un fichero o documento en un servidor de mi empresa, yo soy el administrador.
      Quiero que otra persona pueda ver ese documento pero no desde la ubicación que tengo yo, si no realizar una copía de ese documento a otra unidad para que el usuario lo visualice y en cuanto lo visualice lo destrullo.
 El tema es que si  intento entrar a una unidad personal de la empresa, el servidor no le va ha dejar verlo ni copiar por tema de autorizaciones.
Yo lo que quiero mediante código pasarle el usuario y contraseña de administrador
del servidor, para abrirlo de "patas", durante la copia, el servidor sin darse cuenta de esto el usuario y luego despues de haber realizado la copia cerrar la autorización.

 No se si me he explicado, de todas formas Widark muchisimas gracias por tu contestación.
                 :hola: Un saludo.

Widark:
Hola de nuevo!

Pues si te entendi mal, pero en ese caso si me corchaste  :D  yo apenas soy un pinche aprendiz, que pena no poderlo ayudar  :( .

Saludos.

FRIJU:
Hola Widark!
   Lo que importa es la intención, muchismas gracias de todas formas :comp:

Navegación

[0] Índice de Mensajes

[#] Página Siguiente