![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#5
|
|||
|
|||
|
Actualizacion de programa por usuario sin derecho
Gracias fredo:
En el Foro hace 2 dias salio una noticia acerca de actualizacion de programas y me intereso el tema ya que es aplicable a mi problema y lo resolvi de la siguiente forma: procedure TFormAutentificacion.ButtonAceptarClick(Sender: TObject); var fecha1, fecha2: Double; begin fecha1:= GetFileDateTime('\\servidor\sadval$\sadvalcajero.exe'); fecha2:= GetFileDateTime('c:\Archivos de programa\sadval\sadvalcajero.exe'); if fecha1 > fecha2 then if not CopyFile(PChar('\\servidor\sadval$\sadvalcajero.exe'), PChar('c:\Archivos de programa\sadval\sadvalcajero.exe'),FALSE) then MessageDlg('No he podido copiar el fichero', mtWarning, [mbOk], 0); WinExec(PChar('sadvalcajero.exe'),SW_SHOWNORMAL); end; Trabajando en XP con un usuario con cuenta administrativa trabaja excelentemente pero el caso es que el usuario en cuestion tiene una cuenta limitada por lo que no puede sobreescribir el fichero y me da un error. Como la PC no esta en dominio no me deja darle derecho de escritura. Por lo que quisiera saber si existe en las API algo que me pueda facilitar esa operacion. Saludos Luis Garcia |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
|