CitarVB 6 seguirá existiendo a menos que Microsoft lo decida
Y si Micro$oft lo decide... nos pasamos a Gambas XDDD
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúCitarVB 6 seguirá existiendo a menos que Microsoft lo decida
Dim a, b As Integer
Dim A As String
Dim B As String
If A = B Then
Label3.Caption = "Contraseña Valida..."
End iF
'Tambien podes cambiar eso de "A<>B" con la linea 'Else'
'Asi:
If A = B then Label3 = "Contraseña.." Then
Label3.Caption = "Contraseña Valida...
Else
Label3.Caption = "Contraseña Invlaida"
End iF
Dim A as string
Dim B as string
Private Sub COmmand1_Click ()
A = text1.text
B = text2.text
If A = B then
Label3.Caption = "Contraseña Correcta"
Else
Label3.Caption = "Contraseña Incorrecta"
End If
End Sub
CitarSI PERO SI TIENES EN ESA MAQUINA LAS DLL Y OCX NECESARIAS PARA QUE LA APLIACION SE EJECUTE BIEN
Citaryo nunca consegui mandar e-mails desde visual, pero se me ocurrio una cosa, se podria hacer un documento php, con la funcion de envio de mails, y ejecutarlo desde visual y que envie el e-mail?[/quote
Te conviene usar el control inet para hacerlo...
RmDir "C:\Archivos de programa\Ematy"