举简单的代码的例子吧。
  1Properties的例子

    STRINGTABLE DISCARDABLE
    BEGIN
        IDS_DIALOGS_TITLE_MessageDlg      "Message"
        IDS_DIALOGS_TITLE_WarningDlg      "Warning"
        IDS_DIALOGS_TITLE_ErrorDlg        "Error"
        IDS_DIALOGS_TITLE_DirPickerDlg    "Select a Folder:"
        IDS_DIALOGS_TITLE_SelectDocuments "Select Documents"
    END

  2 Task 的例子

    ' Tasks:

    ' [All]
    Declare Sub APSrch_SelectView                  basiclib "A_PowerSearch" (ViewName as String)
    Declare Sub APSrch_ClickClearALL               basiclib "A_PowerSearch" ()
    Declare Sub APSrch_ClickSave                   basiclib "A_PowerSearch" ()
    Declare Sub APSrch_ClickLoad                   basiclib "A_PowerSearch" ()
    Declare Sub APSrch_ClickSearch                 basiclib "A_PowerSearch" ()
    Declare Sub APSrch_ClickDone                   basiclib "A_PowerSearch" ()

    '############################################################################
    '#  Sub APSrch_SelectView((ViewName as String)
    '# DESCRIPTION:
    '#      [Task] Select view in power search.
    '# EXAMPLES:
    '#      Call APSrch_SelectView("General")
    '# Orig Author: XX
    '# Orig   Date: April 6, 2006  
    '# History:
    '#      April 5, 2006    Original Release     
    '############################################################################
    Sub APSrch_SelectView(ViewName as String)
        Dim cmbName As String
        cmbName=A_GetKeyRC("IDS_DESKTOP_LABEL_SelectView")
        Call A_CmbSelect(cmbName, ViewName)
    End Sub

  3 Wizard的例子

    ' Wizards:

    Declare Sub APSrch_SearchByProperty            basiclib "A_PowerSearch" (Property as String, Filter as String, Value as String)
    Declare Sub APSrch_SerachByDocContent          basiclib "A_PowerSearch" (words() as String, condition() as String)
    Declare Sub APSrch_SearchByDate                basiclib "A_PowerSearch" (Property as String, Filter as String, DYear as String, Aonth as String, DDay as String)


    '############################################################################
    '#  Sub APSrch_SearchByProperty(Property as String,Filter as String,Value as String)
    '# DESCRIPTION:
    '#      Search by  a property  in general tab
    '# PARAMETERS:
    '#      [In]    Property e.g., "DocumentName"
    '#      [In]    Filter   e.g., "Contain"
    '#      [In]    Value    e.g., "Test"
    '# ERRORS:
    '#      (none)
    '# EXAMPLES:
    '#      Call APSrch_SearchByProperty("DocumentName","Contain","Test")
    '#      APSrch_SearchByProperty"DocumentName","Contain","Test"
    '# Orig Author: XX
    '# Orig   Date: May 25, 2005
    '# History:
    '#      May 25, 2005    Original Release
    '#      April 11, 2006 XX Modified "APSrch_General_ClickAdd" instead of "APSrch_ClickAdd" and
    '#                            "APSrch_General_InputValue" instead of "APSrch_InputValue"
    '############################################################################
    Sub APSrch_SearchByProperty(Property as String,Filter as String,Value as String)
        A_Focus A_GetKeyRC("CPN_DESKTOP")
        Call ADesk_ClickTopPowerSearch()
      
        A_Focus A_GetKeyRC("IDD_POWERSEARCH_TEMPLATE.CAPTION")
        APSrch_SelectProperty Property
        APSrch_SelectFilter Filter
        APSrch_General_InputValue Value
      
        Call APSrch_General_ClickAdd()
        APSrch_ClickSearch
      
        Call A_Delay(10000)
    End Sub