ITravelLogEntry  Interface

IID_ITravelLogEntry

{7EBFDD87-AD18-11d3-A4C5-00C04F72D6B8}

This interface provides methods to retrieve the title and URL of a travel log entry.
 

Methods in VTable order

IUnknown Methods

Description

QueryInterface

Returns pointers to supported interfaces.

AddRef

Increments reference count.

Release

Decrements reference count.

ITravelLogEntry Methods

Description

GetTitle

Retrieves the title of a page in a travel log.

GetURL

Retrieves the URL of a travel log entry.

GetTitle

FUNCTION Proto_ITravelLogEntry_GetTitle ( _
  BYVAL pthis AS DWORD PTR _
, BYREF ppszTitle AS DWORD _
  ) AS LONG
 

FUNCTION ITravelLogEntry_GetTitle ( _
  BYVAL pthis AS DWORD PTR _
, BYREF strTitle AS STRING _
  ) AS LONG

  strTitle = ""

  LOCAL HRESULT AS LONG
  LOCAL bstrlen AS LONG

  LOCAL ppszTitle AS DWORD
  CALL DWORD @@pthis[3] USING Proto_ITravelLogEntry_GetTitle (pthis, ppszTitle) TO HRESULT
  IF ISTRUE ppszTitle THEN
     bstrlen = lstrlenW(BYVAL ppszTitle)
     IF ISTRUE bstrlen THEN strTitle = ACODE$(PEEK$(ppszTitle, bstrlen * 2))
     CoTaskMemFree ppszTitle
  END IF
  FUNCTION = HRESULT

END FUNCTION
 

GetURL

FUNCTION Proto_ITravelLogEntry_GetURL ( _
  BYVAL pthis AS DWORD PTR _
, BYREF ppszURL AS DWORD _
  ) AS LONG
 

FUNCTION ITravelLogEntry_GetURL ( _
  BYVAL pthis AS DWORD PTR _
, BYREF strURL AS STRING _
  ) AS LONG

  strURL = ""

  LOCAL HRESULT AS LONG
  LOCAL bstrlen AS LONG

  LOCAL ppszURL AS DWORD
  CALL DWORD @@pthis[4] USING Proto_ITravelLogEntry_GetURL (pthis, ppszURL) TO HRESULT
  IF ISTRUE ppszURL THEN
     bstrlen = lstrlenW(BYVAL ppszURL)
     IF ISTRUE bstrlen THEN strURL = ACODE$(PEEK$(ppszURL, bstrlen * 2))
     CoTaskMemFree ppszURL
  END IF
  FUNCTION = HRESULT

END FUNCTION