Ejemplo de uso del paquete VBScript en un bot resistente
Descargar como PDF
- Última actualización2024/01/19
Ejemplo de uso del paquete VBScript en un bot resistente
Diseñe un bot que ejecute un script de Microsoft Visual Basic. Utilice el paquete Intentar/Capturar para finalizar fácilmente el bot si falla, haciéndolo resistente a las caídas. Un bot resistente permite que los bots programados y en lista de prioridad continúen, incluso si el bot actual encuentra un error.
Procedimiento
-
Cree un bot:
-
En el panel izquierdo, haga clic en Automatización.
Se muestra la lista de bots y formularios disponibles.
- Haga clic en Crear nuevo > Bot.
- Proporcione un nombre para el bot: MultiplyPi
- Ingrese la ubicación de la carpeta: Bots\TaskBotExample
- Haga clic en Crear y editar.
-
En el panel izquierdo, haga clic en Automatización.
-
Cree una variable: nPromptAnswer:
- Tipo: Número
- Nombre: nPromptAnswer
-
Cree una variable: lNumbersForPi:
- Tipo: Lista
- Subtipo: Número
- Nombre: lNumbersForPi
- Haga clic en Guardar.
-
Utilice la acción Indicador > De valor para pedir al usuario un número.
- Haga clic en el vínculo Mostrar en el panel Acciones.
- Haga doble clic o arrastre la acción Indicador de valor para añadirla al bot.
- En el campo Título de ventana de indicador, escriba: Any Number
- En el campo Mensaje de indicador, escriba: Enter any number to multiply by pi.
- En el campo Asignar el valor a una variable, seleccione SampleString.
- Haga clic en Guardar.
-
Utilice la acción Manejador de errores > Intentar para finalizar fácilmente el bot si hubo un error, como por ejemplo que el usuario no haya ingresado un número.
- Haga doble clic en la acción Manejador de errores > Intentar o arrástrela.
- Arrastre la acción Indicador > De valor debajo de la acción Manejador de errores > Intentar.
- Haga clic en Guardar.
-
Convierta la (cadena) SampleString a un valor numérico.
- Haga doble clic en la acción Cadena > A número o arrástrela, de forma que se agregue como la última línea antes del Manejador de errores: Capturaracción.
- En el campo Introducir la cadena, pulse F2 para abrir la lista de sus variables y seleccione SampleString.
- Haga clic en Sí, insertar.
- En el campo Asignar resultado a una variable, seleccione nPromptAnswer.
- Haga clic en Guardar.
-
Copie el valor del número en el primer elemento de la lista de números para pasar a VBScript.
- Haga doble clic en la acción Lista > Agregar elemento o arrástrela, de forma que se agregue como la última línea antes del Manejador de errores: Capturaracción.
- En el campo Variable de lista seleccione lNumbersForPi.
- En el campo Elemento que se añadirá, seleccione nPromptAnswer.
- Haga clic en Guardar.
-
Utilice la acción VBScript > Abrir para proporcionar su código fuente de Visual Basic.
- Haga doble clic en la acción Abrir VBScript o arrástrela y agréguela como la última línea antes de Manejador de errores: Capturaracción.
- En las opciones VBScript, seleccione Entrada manual.
-
Copie el siguiente código y péguelo en el campo Introducir script aquí:
Dim Arg, var1, var2 Set Arg = WScript.Arguments Function MultiplyPi(Arg) var1 = Arg(0) var2 = 3.14159 MultiplyPi = cdbl(var1)*var2 End Function
- Haga clic en Guardar.
-
Utilice la acción VBScript > Ejecutar función para ejecutar el script.
- Haga doble clic en la acción Ejecutar función VBScript o arrástrela, de forma que se agregue como la última línea antes del Manejador de errores: Capturaracción.
- En el campo Ingrese el nombre de la función que se ejecutará (opcional), escriba MultiplyPi.
- En el campo Parámetros (opcional), seleccione la variable lNumbersForPi.
- En el campo Asignar la salida a una variable (opcional), seleccione SampleString.
- Haga clic en Guardar.
-
Utilice la acción VBScript > Cerrar para terminar la sesión.
- Haga doble clic en la acción Cerrar VBScript o arrástrela, de forma que se agregue como la última línea antes del Manejador de errores: Capturaracción.
- Haga clic en Guardar.
-
Imprima la respuesta generada en la pantalla de VBScript.
- Haga doble clic en la acción Cuadro de mensaje o arrástrela y agréguela como la última línea antes del Manejador de errores: Capturaracción.
- En el campo Introduzca el mensaje a mostrar, escriba Pi times your number is: y pulse F2 para abrir la lista de sus variables. Seleccione SampleString.
- Haga clic en Sí, insertar.
- Haga clic en Guardar.
-
Notifique al usuario si se ha producido un error y finalice el bot fácilmente.
- Haga clic en Manejador de errores: action Atrapar todos los errores una vez para que se destaque en su bot.
- Haga doble clic en la acción Cuadro de mensajes o arrástrela para insertarla como la última acción del bot.
- En el campo Escriba el mensaje para mostrar, escriba: Bot failed. Please be sure to enter only numbers..
- Haga clic en Guardar.
-
Haga clic en la pestaña Lista para ver su código como texto solamente.
Su código debería verse así:
Start Error handler: Try Prompt: For value during bot execution and assign the value $SampleString$ String: To number Convert string $SampleString$ to a number and assign it to number variable $nPromptAnswer$ List: Add item $nPromptAnswer$ to $lNumbersForPi$ VBScript: Open VBScript manual script of 7 lines VBScript: Run function "MultiplyPi" VBScript: Close VBScript "Default" Message box "Pi times your number is: $SampleString$" Error handler: Catch AllErrors Message box "Bot failed. Please be sure to enter only numbers." End
- Ejecute su bot.
-
Cuando el bot se ejecuta correctamente, se abre la ventana del indicador, donde ingresa el valor, y luego el cuadro de mensaje muestra el número calculado. Vea el mensaje y haga clic en Cerrar.
Puede probar la resistencia de su bot ejecutándolo de nuevo e introduciendo una letra en lugar de un número.