elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.
 
Inicio Ayuda Buscar Ingresar Registrarse
29 Mayo 2012, 01:08  


Tema destacado: Últimos eventos sobre seguridad/inseguridad

+  Foro de elhacker.net
|-+  Programación
| |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo, raul338)
| | |-+  MsgBox al iniciar aplicación por primera vez
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: MsgBox al iniciar aplicación por primera vez  (Leído 632 veces)
killer92

Desconectado Desconectado

Mensajes: 6


Ver Perfil
MsgBox al iniciar aplicación por primera vez
« en: 30 Diciembre 2011, 02:50 »

Hola a todos, quisiera que me ayudaran con una cuestión. Tengo una aplicación hecha en VB 6..., y lo que necesito hacer es que al ejecutarla por primera vez, muestre un MsgBox..., pero como dije, solo en la primera ejecución, luego en las próximas ya no.

Espero puedan ayudarme,
Gracias.


En línea
seba123neo
Moderador
***
Desconectado Desconectado

Mensajes: 3.214



Ver Perfil WWW
Re: MsgBox al iniciar aplicación por primera vez
« Respuesta #1 en: 30 Diciembre 2011, 02:59 »

me gustaria saber para que queres hacer eso, capas que hay otra solucion, porque lo unico que se me courre es que guards en algun lado (registro de windows, archivo o lo que sea) guardar un valor, y luego al abrir la aplicacion comparar ese valor y si existe pues no mostras mas ese mensaje.

saludos.


En línea

Mucha gente, especialmente la ignorante desea castigarte por decir la verdad, por ser correcto, por ser tú. Nunca te disculpes por ser correcto, o por estar años delante de tu tiempo.
Si estas en lo cierto, y lo sabes, que hable tu razón. Incluso si eres una minoria de uno solo, la verdad sigue siendo la verdad. M. Gandhi
killer92

Desconectado Desconectado

Mensajes: 6


Ver Perfil
Re: MsgBox al iniciar aplicación por primera vez
« Respuesta #2 en: 30 Diciembre 2011, 18:24 »

Hola seba123neo, en eso último que pusiste estaba pensando, justamente, la aplicación al iniciarse ya guarda un valor en el registro (el valor se guarda en HKCU\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\), me faltaría entonces saber ¿Qué código utilizo para comparar si este valor existe?

Gracias de antemano.
En línea
killer92

Desconectado Desconectado

Mensajes: 6


Ver Perfil
Re: MsgBox al iniciar aplicación por primera vez
« Respuesta #3 en: 31 Diciembre 2011, 04:05 »

Ignorar el mensaje anterior por favor, ya encontré como hacerlo. Puse éste codigo:

Código:
Set MiObjeto = CreateObject("WScript.Shell")
Text1.Text = MiObjeto.regRead("HKCU\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\miprograma")

Luego simplemente hice comprobar el textbox, si está vacío la clave no existe, de lo contrario si.
En línea
RHL


Desconectado Desconectado

Mensajes: 968


mental


Ver Perfil
Re: MsgBox al iniciar aplicación por primera vez
« Respuesta #4 en: 31 Diciembre 2011, 04:29 »

Escribir en la propia ejecutable reversar unos cuantos bytes para y guardar una "señal"
En línea
Karcrack


Desconectado Desconectado

Mensajes: 2.192


Se siente observado ¬¬'


Ver Perfil
Re: MsgBox al iniciar aplicación por primera vez
« Respuesta #5 en: 31 Diciembre 2011, 17:24 »

SaveSetting/GetSetting ;)
En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Powered by SMF 1.1.16 | SMF © 2006-2008, Simple Machines