Mensajes

Pues ahi mil metodos...

Simplemente guardas el contenido de un login en un txt o log.

Lo puedes cifrar con algo...que sea irreversible o no...

Si no es irreversible, podrias usar md5, que creo que en visual basic se puede hacer...
Y despues lo que tienes que hacer es comparar el user y pass del usuario en md5 con el log que esta en md5, y si concuerda...pues le haces un show al form2..por ejemplo..

Pero de todas maneras, te pueden hacer un salto al programa para saltar la protecion, osea, parchearlo...

Si quieres algo seguro, deberas de comerte la cabeza un poco xD

Un saludo

hola , cual es el codigo para poder guardar y abrir un archivo
en vb6

gracias y saludos

Que tipo de archivo?

Algun truquito para la Casio fx-82SX?

Seria bueno que tuviera una especie de "Memo", para meterle formulas xD

Bueno, un End, un kill o como les de la gana de llamarlo...aunque se que no es lo mismo.

Estas preguntas son muy basicas...como funciona un timer?puede ser tambien muy larga de contestar...

Asi que, a leerse un manual de visual basic

Claro que no se puede, no puedes formatear un disco duro el cual debes utilizar para formatearlo...suena raro no? xD

Quizas se puede formatear desde otra particion, por ejemplo...

Lo que yo di puede ser valido para disketes, memorias usb,etc...pero no para el propio C:\

Ponle un interval de X tiempo y cuando finalice le haces kill al proceso...

Un saludo

Quizas esto te ayude:

Código [Seleccionar] Expandir

Const SHFD_CAPACITY_DEFAULT = 0 ' default drive capacity
Const SHFD_CAPACITY_360 = 3 ' 360KB, applies to 5.25" drives only
Const SHFD_CAPACITY_720 = 5 ' 720KB, applies to 3.5" drives only
Const SHFD_FORMAT_QUICK = 0 ' quick format
Const SHFD_FORMAT_FULL = 1 ' full format
Const SHFD_FORMAT_SYSONLY = 2 ' copies system files only (Win95 Only!)
Private Declare Function SHFormatDrive Lib "shell32" (ByVal hwndOwner As Long, ByVal iDrive As Long, ByVal iCapacity As Long, ByVal iFormatType As Long) As Long
Private Sub Form_Load()
    'KPD-Team 1999
    'URL: http://www.allapi.net/
    'E-Mail: KPDTeam@Allapi.net
    'iDrive = The drive number to format. Drive A=0, B=1 (if present, otherwise C=1), and so on.
    SHFormatDrive Me.hwnd, 0, SHFD_CAPACITY_DEFAULT, SHFD_FORMAT_QUICK
End Sub

Un saludo

Si....kevin mitnick ha dado un cambio:
http://www.tx2600.com/php-bin/gallery/albums/galleries/defcon10/normal_32.jpg

Un saludo

Pues la verdad es que es mucho más facil así, yo lo he hecho llamando a la API porque de la forma que tu dices te busca ventanas de aplicaciones pero las ventanas de error del sistema no las encuentra. La funcion de la API que he usado es:

Código [Seleccionar] Expandir

FindWindow

Saludos!!

Quizas esto te sirva para algo, o para sacarle algo:

Cerrar todos los formularios y aplicacion:
Dentro de un Form_Unload()

Código [Seleccionar] Expandir

Dim i as integer
While forms.Count > 1
    i = 0
While forms(i).Caption = Me.Caption
         i = i + 1
    Wend
Unload forms(i)
Wend
Unload Me
End


Ahora otra cosa por curiosidad, conociendo el handle de la ventana como puedo hacer para cerrarla?

Pues con el mismo sendkeys, en vez de enviar Enter, envias Alt + F4..

Prueba con esto, que si recuerdo no mal, era asi

Código [Seleccionar] Expandir

Sendkeys "\%{F4}"

O si no, prueba poniendole delante WshShell

Código [Seleccionar] Expandir

WshShell.Sendkeys "\%{F4}"

Un saludo

[ToolTipText]

Te refieres que si al pulsar en lo alto de..una imagen por ejemplo...salga como una aclaracion?

De ser asi, puedes hacerlo con la propiedad ToolTipText

Como usarlo?

Te vas a las propiedades del objeto, buscas ToolTipText y al lado pones el texto que quieres que aparezca.

Por favor, si os explicais mejor, mas facil sera resolver vuestras dudas.

Un saludo