FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Problema con ShellExecute
Hola a todos.
Tengo un problema con esa función. Hay un archivo .BAT que si lo ejecuto manualmente funciona bien, pero si lo ejecuto desde la aplicación me da el error "No se encuentra el archivo de comandos ...getadmin.vbs", entonces supongo que sea problema de la forma como lo ejecuto pero no veo qué cambiar, el código para ejecutarlo que uso es este:
y el archivo .bat contiene lo siguiente: Código:
@echo off IF "%PROCESSOR_ARCHITECTURE%" EQU "amd64" ( >nul 2>&1 "%SYSTEMROOT%\SysWOW64\cacls.exe" "%SYSTEMROOT%\SysWOW64\config\system" ) ELSE ( >nul 2>&1 "%SYSTEMROOT%\system32\cacls.exe" "%SYSTEMROOT%\system32\config\system" ) if '%errorlevel%' NEQ '0' ( echo Solicitando permisos de administrador... Requesting administrative privileges... Anfordern Administratorrechte ... goto UACPrompt ) else ( goto gotAdmin ) :UACPrompt echo Set UAC = CreateObject^("Shell.Application"^) > "%temp%\getadmin.vbs" set params = %*:"="" echo UAC.ShellExecute "cmd.exe", "/c ""%~s0"" %params%", "", "runas", 1 >> "%temp%\getadmin.vbs" "%temp%\getadmin.vbs" del "%temp%\getadmin.vbs" exit /B :gotAdmin pushd "%CD%" CD /D "%~dp0" REM mas otro codigo especifico Muchas gracias. |
#2
|
||||
|
||||
Prueba a ejecutarlo de esta manera:
__________________
Germán Estévez => Web/Blog Guía de estilo, Guía alternativa Utiliza TAG's en tus mensajes. Contactar con el Clubdelphi P.D: Más tiempo dedicado a la pregunta=Mejores respuestas. |
#3
|
||||
|
||||
El programa lo ejecutas manualmente o lo ejecuta alguna tarea programada o servicio?
Prueba a cambiar el 'open' por 'runas'
__________________
Buena caza y buen remar... http://mivaler.blogspot.com |
#4
|
|||
|
|||
Muchas gracias a todas las respuestas.
De momento parece que me funciona con el ajuste poniendo "RUNAS". |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Problema con ShellExecute | jmgc1982 | C++ Builder | 2 | 04-06-2008 12:48:43 |
Problema con ShellExecute | Angel Vicente | API de Windows | 3 | 02-06-2008 11:34:07 |
Problema con ShellExecute() | kagua77 | C++ Builder | 3 | 17-04-2008 01:19:00 |
Problema con shellexecute | ebeltete | API de Windows | 4 | 21-10-2006 00:23:12 |
Problema con ShellExecute | hector_etv | Varios | 1 | 07-08-2005 04:11:47 |
|