Ping de idioma fácil

Crea un botón con un nombre predeterminado

Cuadro de edición con un nombre predeterminado

No sé si esto es lo que quieres, pruébalo tú mismo

.Versión 2

.Ventana de ensamblaje ensamblaje 1

.Número de archivo de variable de ensamblaje, tipo entero

.Subrutina_Botón 1_se hace clic

.Dirección IP variable local, tipo de texto

Dirección IP = Cuadro de edición 1. Contenido

Botón 1. Desactivar = Verdadero

.If ( prueba de comunicación (dirección IP, ) ≠ -1)

Subrutina_¿Existe el archivo ("1.txt", dirección IP) ' La conexión es fluida

De lo contrario

Si el archivo_subrutina existe ("2.txt", dirección IP) ' La conexión está desconectada

Si finaliza

Subrutina archivo_subrutina ¿Existe?

. Nombre del archivo de parámetros, tipo de texto

Dirección IP del parámetro, tipo de texto

. + nombre de archivo)) ≠ “”)

Número de archivo = abrir archivo (tomar el directorio actual () + “\” + nombre de archivo, #cambiar lectura, #deshabilitar lectura y escritura)

Subrutina_Si el texto es el mismo (leer texto (número de archivo, ), dirección IP)

Cerrar el archivo (número de archivo)

De lo contrario