CA Service Management

Expand all | Collapse all

CA Support Automation Automated Tasks

Jump to Best Answer
  • 1.  CA Support Automation Automated Tasks

    Posted 08-02-2017 11:33 AM

    Hello guys, can somone tell me where I can find scripts like "Running Apps.xsdf" for support automation???

    Also need a script to clear cache on the remote browser (IE, firefox, chrome), some idea?

     

    best regards,

     

    Fabian



  • 2.  Re: CA Support Automation Automated Tasks

    Broadcom Employee
    Posted 08-02-2017 01:48 PM

    There are a few sample scripts here:

     

    Sample Scripts that can be used with the Support Automation Task Editor 

     

    An extremely basic VBScript for clearing the browser cache for IE would look like:

     

    Sub Execute()
    Functions.ShowMessage(Step.GetProperty("Message"))
    End Sub


    ' The code below this line is automatically generated. Please do not edit it.
    Sub SetProperties
    ' The message to be displayed.
    Step.SetProperty Localization.ENU, "Message", "Clearing cache"
    Set objShell = CreateObject("WScript.Shell")
    objShell.Run "RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 255"
    End Sub

     

    That script will delete all browsing history for IE. I also found some sample scripts for Firefox and Chrome here, but didn't test those out:

     

    Solved: How to ClearCache and Cookies from Internet Explor... - SmartBear Community 



  • 3.  Re: CA Support Automation Automated Tasks

    Posted 08-02-2017 04:45 PM

    This code fail at line 4: AQEnvironment Object, some idea why?

     

    ' Clears the Firefox cache, passwords, cookies, etc...
    Sub ClearAllFirefoxStoredInfo
    Set objFSO = CreateObject("Scripting.FileSystemObject")
    strLocalAppData = AQEnvironment.GetEnvironmentVariable("LocalAppData") & "\Mozilla\Firefox\Profiles"
    strRoamingAppData = AQEnvironment.GetEnvironmentVariable("AppData") & "\Mozilla\Firefox\Profiles"
    Set FoldersInFolder = objFSO.GetFolder(strLocalAppData).SubFolders
    For Each Folder In FoldersInFolder
    Folder.Delete True
    Next
    Set FoldersInFolder = objFSO.GetFolder(strRoamingAppData).SubFolders
    For Each Folder In FoldersInFolder
    Set FilesInFolder = Folder.Files
    For Each File in FilesInFolder
    If Instr(1, File.Name, "sqlite") > 0 Then File.Delete
    Next
    Next
    End Sub



  • 4.  Re: CA Support Automation Automated Tasks

    Broadcom Employee
    Posted 08-02-2017 04:47 PM

    Fabian,

     

    It's not something that I have much insight on, I'm not sure the details of the code.



  • 5.  Re: CA Support Automation Automated Tasks
    Best Answer

    Broadcom Employee
    Posted 08-02-2017 02:10 PM

    Perhaps the following documentation would be of assistance

     

    Automated Tasks - CA Service Management - 14.1 - CA Technologies Documentation