Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Otros entornos y lenguajes > C++ Builder
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 26-02-2009
yelian yelian is offline
No confirmado
 
Registrado: nov 2007
Ubicación: Cuba
Posts: 81
Poder: 0
yelian Va por buen camino
Exclamation Ejecutar Como en C++

Hola a todos en el foro
Quisiera planteal una duda, que puede ser que muchos la tenga al igual que yo.

El problema es como voy a crear una aplicacion que me aga la misma funcion que el Ejecutar Como de windows...

En la aplicacion pondria tres Edit
Edit1- para indicar el programa a ejecutar
Edit2- El ususrio con el que quiero ejecutar ese programa
Edit3- el password del usuario

Si alguien sabe como puedo aser lo anterior que lo plantee ya que estoy seguro que a muchas personas le pueda interesar el tema

Muchas gracias ante todo...
[Saludo]...
Responder Con Cita
  #2  
Antiguo 26-02-2009
Avatar de escafandra
[escafandra] escafandra is offline
Miembro Premium
 
Registrado: nov 2007
Posts: 2.197
Poder: 20
escafandra Tiene un aura espectacularescafandra Tiene un aura espectacular
Hola yelian.
La forma más sencilla de realizar un "ejecutar como" es usar ShellExecute con un truquito. Utilizar en el parámetro lpOperation la opción no documentada "runas":
Código:
ShellExecute(NULL, "runas", "Notepad", 0, NULL, SW_SHOWNA);
Pero para lo que tu pretendes tenemos dos opciones más potentes, las APIs CreateProcessWithLogonW y CreateProcessAsUser. Personalmente creo que es más fácil de usar la primera:
Código:
   PROCESS_INFORMATION piProcInfo;
   STARTUPINFOW siStartInfo;

   // Set up members of STARTUPINFO structure.
   ZeroMemory(&siStartInfo, sizeof(STARTUPINFO));
   siStartInfo.cb = sizeof(STARTUPINFO);

   HRESULT hRes = CreateProcessWithLogonW(
     L"User",   // El usuario
     L".",        // El dominio
     L"Password",  // El password
     LOGON_WITH_PROFILE,
     NULL,
     L"Notepad.exe", // Nombre de la aplicación
     NULL, // flags
     NULL, // entorno
     L"C:\\", // use parent's current directory
     &siStartInfo, // puntero STARTUPINFO
     &piProcInfo   // PROCESS_INFORMATION (valor devuelto)
   );
Espero que esto sea lo que buscas.

Saludos.
Responder Con Cita
  #3  
Antiguo 27-02-2009
yelian yelian is offline
No confirmado
 
Registrado: nov 2007
Ubicación: Cuba
Posts: 81
Poder: 0
yelian Va por buen camino
Thumbs up

Hola escafandra el ejemplo que pusiste me funciono bien pero no entiendo mucho como funciona el code,

Si no te fuera molestia de explicar un poco como trabajar con el te lo agradeceria mucho y estoy que otras personas tambien les interesaria trabajar con el ....


Gracias por la ayuda prestada.

[Saludos]...
Responder Con Cita
  #4  
Antiguo 27-02-2009
Avatar de escafandra
[escafandra] escafandra is offline
Miembro Premium
 
Registrado: nov 2007
Posts: 2.197
Poder: 20
escafandra Tiene un aura espectacularescafandra Tiene un aura espectacular
Esta API, al igual que CreateProcess, crea un proceso nuevo pero con las credenciales de otro usuario, es decir, no las hereda del proceso padre.

Te habrás fijado que esta API trabaja con wchar_t* en lugar de char*. Esta es la forma de trabajo interno de Windows.

El parámetro dwLogonFlags puede ser LOGON_WITH_PROFILE, en este caso cagagrá el perfil completo del usuario desde el Registro de Windows. Esto puede ser un poco lento. Si se coloca el flag LOGON_NETCREDENTIALS_ONLY, solo se activan las credenciales de red, siendo más rápido.

lpStartupInfoEs un a estructura STARTUPINFO, que contiene los datos de entorno gráfico y de escritorio. Si está vacía se adopta el entorno del proceso de llamada.

lpProcessInfo es una estructura PROCESS_INFORMATION en ella se nos devuelven datos sobre el proceso creado. Ten en cuenta que en ella se dan los Handles hProcess y hThread que deberás liberar al final (CloseHandle) si no te hacen falta. También se devuelven mas datos del proceso.

Saludos.
Responder Con Cita
  #5  
Antiguo 01-03-2009
yelian yelian is offline
No confirmado
 
Registrado: nov 2007
Ubicación: Cuba
Posts: 81
Poder: 0
yelian Va por buen camino
Lightbulb

Hola escafandra gracias por la explicacion anterior,

Si no te fuera molestia a ti o algunos del foros explicarme como pudiera poner el contenido de un Edit en el parámetro (L"User", // El usuario),
Lo que quiero hacer es que en el Edit se ponga el nombre del Usuario con el que se va a ejecutar, e intentado hacerlo pero me da error, me parese que tengo que hacer alguna combercion y no se cual puedo utilizar, me pudieran expicar algo al resperto.

Gracias por la Ayuda

[Saludos]...
Responder Con Cita
  #6  
Antiguo 01-03-2009
Avatar de escafandra
[escafandra] escafandra is offline
Miembro Premium
 
Registrado: nov 2007
Posts: 2.197
Poder: 20
escafandra Tiene un aura espectacularescafandra Tiene un aura espectacular
Cita:
Empezado por yelian Ver Mensaje
...explicarme como pudiera poner el contenido de un Edit en el parámetro (L"User", // El usuario)...
Cita:
Empezado por escafandra Ver Mensaje
Te habrás fijado que esta API trabaja con wchar_t* en lugar de char*. Esta es la forma de trabajo interno de Windows.
Revisa wchar_t y las cadenas Unicode.

Código:
void __fastcall TForm1::Button2Click(TObject *Sender)
{
   PROCESS_INFORMATION piProcInfo;
   STARTUPINFOW siStartInfo;

   // Set up members of STARTUPINFO structure.
   ZeroMemory(&siStartInfo, sizeof(STARTUPINFO));
   siStartInfo.cb = sizeof(STARTUPINFO);

   HRESULT hRes = CreateProcessWithLogonW(
     WideString(Edit1->Text.c_str()),   // L"User",   // El usuario
     WideString(Edit2->Text.c_str()),   // L".",        // El dominio
     WideString(Edit3->Text.c_str()),   // L"Password",  // El password
     LOGON_WITH_PROFILE,
     NULL,
     L"Notepad.exe", // Nombre de la aplicación
     NULL, // flags
     NULL, // entorno
     L"C:\\", // use parent's current directory
     &siStartInfo, // puntero STARTUPINFO
     &piProcInfo   // PROCESS_INFORMATION (valor devuelto)
   );

  // Liberamos los Handles que no vamos a usar 
  if(hRes){
     CloseHandle(piProcInfo.hProcess);
     CloseHandle(piProcInfo.hThread);
   }  
}
Saludos.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
como ejecutar una instruccion omy Varios 14 05-11-2007 21:25:59
como ejecutar archivos *.txt kurono Varios 4 03-09-2007 06:04:43
como ejecutar archivo .msi nosferatu177 API de Windows 7 08-06-2007 21:09:28
Ejecutar como.... raf.rsr API de Windows 1 07-11-2006 23:28:57
ejecutar un .bat Como? pruz Varios 4 02-12-2003 19:23:45


La franja horaria es GMT +2. Ahora son las 15:06:41.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi