• XbOpenEventLog([cUNCServerName], cSourceName)


    • Description
      this function opens a handle of an event log.
    • Parameter(s)

      cUNCServerName (optional)
      Points to a string that specifies the Universal Naming Convention (UNC) name of the server on
      which the event log is to be opened. If this parameter is NIL, the log is opened on the local computer.

      lpSourceName
      Points to a string that specifies the name of the source that the returned handle will reference.
      The source name must be a subkey of a logfile entry under the EventLog key in the registry.
      For example, the source name WinApp would be valid if the registry had the following form:

      HKEY_LOCAL_MACHINE
          System
              CurrentControlSet
                  Services
                      EventLog
                          Application
                              WinApp
                          Security
                          System


      If the source name cannot be found, the event logging service uses the Application logfile with no message files for the event identifier or category.

    • Return Value
      if the function succeeds, the return value is the handle of an event log. (numeric value)
  • Sample
    #include "xbevent.ch"

    local nEvtHandle    := 0
    local cError        := space(100)

    //
    // open a Eventlog-Key
    //
    if ((nEvtHandle := XbOpenEventLog(, "WinApp")) <= 0)
      XbEventGetLastError(@cError)
      ? "Error :", cError
    endif