Cree una automatización que ejecute un script de Microsoft Visual Basic. Utilice el package para finalizar la automatización si falla, lo que la hace resistente a los fallos de implementación. Una automatización resistente permite que las tareas programadas y en cola continúen incluso cuando se producen errores de implementación.

En esta automatización, se solicita al usuario que ingrese un número. La automatización envía el número a un script de Microsoft Visual Basic para multiplicarlo por pi y devolver el valor. A continuación, la automatización informa el resultado al usuario. Puede utilizar el package VBScript para importar un script externo o ingresarlo directamente en su automatización. En este ejemplo, escribe el script manualmente. También se añade resiliencia a la automatización mediante la incorporación de la gestión de errores.

Procedimiento

  1. Crear Task Bot.
    1. En el panel izquierdo, haga clic en Automatización.
      Se muestra la lista de automatizaciones y formularios disponibles.
    2. Haga clic en Crear nuevo > Task Bot.
    3. Proporcione un nombre para el Task Bot: MultiplyPi
    4. Haga clic en Crear y editar.
  2. Cree las siguientes variables:
    • Primera variable
      • Nombre: nPromptAnswer
      • Tipo: Número
    • Segunda variable
      • Nombre: lNumbersForPi
      • Tipo: Lista
      • Subtipo: Número
    Para obtener más información sobre la creación de variables, consulte Crear una variable.
  3. Haga clic en Guardar.
  4. Utilice la action De valor para solicitar al usuario un número.
    1. Haga doble clic o arrastre la action Indicador > de valor para añadirla a la automatización.
    2. En el campo Título de ventana de indicador, escriba Cualquier número.
    3. En el campo Mensaje de indicador, escriba Ingrese cualquier número para multiplicar por pi.
    4. Haga clic en el menú desplegable Asignar el valor a una variable y seleccione SampleString.
    5. Haga clic en Guardar.
  5. Utilice la action Intentar para finalizar la automatización si el usuario no ingresa un número cuando se le solicite.
    1. Haga doble clic en la Manejador de errores > Intentar action o arrástrela.
    2. Arrastre la action Indicador > De valor debajo de la action Manejador de errores > Intentar.
    3. Haga clic en Guardar.
  6. Convierta la cadena SampleString a un valor numérico.
    1. Haga doble clic en la action String > A número o arrástrela, de forma que se agregue como la última línea antes de la action Manejador de errores > Capturar.
    2. En el campo Introducir la cadena, pulse F2 para abrir la lista de sus variables y seleccione SampleString.
    3. Haga clic en Insertar.
    4. Haga clic en el menú desplegable Asignar el resultado a una variable y seleccione nPromptAnswer.
    5. Haga clic en Guardar.
  7. Copie el valor del número en el primer elemento de la lista de números para pasar a VBScript.
    1. Haga doble clic en la action Lista > Agregar elemento o arrástrela hasta la última línea antes de la action Manejador de errores > Capturar.
    2. Haga clic en el menú desplegable Variable de lista y seleccione lNumbersForPi.
    3. Haga clic en el menú desplegable Elemento para agregar y seleccione nPromptAnswer.
    4. Haga clic en Guardar.
  8. Utilice la action Abrir para proporcionar su código fuente de Visual Basic.
    1. Haga doble clic en la action VBScript > Abrir para colocarla como la última línea antes de la action Manejador de errores > Capturar.
    2. En el campo VBScript, seleccione el botón de opción Entrada manual.
    3. 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
    4. Haga clic en Guardar.
  9. Utilice la action Ejecutar función para ejecutar el script.
    1. Haga doble clic en la action VBScript > Ejecutar función o arrástrela para colocarla como la última línea antes de la action Manejador de errores > Capturar.
    2. En el campo Ingrese el nombre de la función que se ejecutará (opcional), escriba MultiplyPi.
    3. Haga clic en el menú desplegable Parámetros (opcional) y seleccione la variable lNumbersForPi.
    4. Haga clic en el menú desplegable Asignar el resultado a una variable (Opcional) y seleccione SampleString.
    5. Haga clic en Guardar.
  10. Use la action Cerrar para finalizar la sesión.
    1. Haga doble clic en la action VBScript > Close para colocarla como la última línea antes de la action Manejador de errores > Capturar.
    2. Haga clic en Guardar.
  11. Muestre la respuesta generada en la pantalla de VBScript.
    1. Haga doble clic en la action Cuadro de mensaje o arrástrela hasta la última línea antes de la action Manejador de errores > Capturar.
    2. En el campo Escriba el mensaje para mostrar, escriba Pi multiplicado por su número es:.
    3. Presione F2 para abrir la lista de sus variables y seleccione SampleString.
    4. Haga clic en Insertar.
    5. Haga clic en Guardar.
  12. Notifique al usuario si se ha producido un error antes de finalizar la automatización.
    1. Haga doble clic en la action Cuadro de mensaje o arrástrela debajo del Manejador de errores: Capturar todos los errores.
    2. En el campo Escribir el mensaje para mostrar, escriba Error de bot. Asegúrese de introducir solo números..
    3. Haga clic en Guardar.
  13. 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
  14. Ejecute su automatización.
    Cuando se implementa la automatización, se abre la ventana del indicador, donde ingresa el valor, y luego el cuadro de mensaje muestra el número calculado.

    Ingresar el valor en la ventana del indicador

    Valores calculados mostrados en el cuadro de mensaje

  15. Haga clic en Cerrar
    Puede probar la resiliencia de su Task Bot ejecutándolo nuevamente e ingresando un valor de string en lugar de un número cuando se le solicite.