Click or drag to resize

ITravelInfoLastReceivedLog Property

LastReceivedLog - last logged trans Returns the last traveltransactionlog_id the database received from this traveller

Namespace:  SuperOffice.COM.SuperOfficeDB
Assembly:  SuperOfficeDB.Interop (in SuperOfficeDB.Interop.dll) Version: 8.0.0.0
Syntax
int LastReceivedLog { get; }

Property Value

Type: Int32
Long – last traveltransactionlog_id received.
Examples

LastReceivedLog

This text may be copied to the notepad, and saved as a *.vbs file. Remember to change the login information.

VB
dim objso
  dim travellers
  dim traveller
  set objso  = CreateObject("superofficedb.database")
      If not (objSO is nothing) Then
   a  = objso.login("<userid>",  "<password>")
   set travellers  = objso.travelinterface.gettravellers
   msgbox  travellers.trlogmax, vbinformation  + vbokonly, "trlogmax"
   set  traveller = travellers.getfirst 
   while not travellers.eof
   msgbox traveller.areaid,  vbinformation + vbokonly,  "areaid"
   msgbox traveller.areaname,  vbinformation + vbokonly,  "areaname"
   msgbox traveller.asyncenabled,  vbinformation + vbokonly,  "asyncenabled"
   msgbox traveller.dbvariant,  vbinformation + vbokonly,  "dbvariant"
   msgbox traveller.encryptionvariant,  vbinformation + vbokonly,  "encryptionvariant"
   msgbox traveller.id,  vbinformation + vbokonly,  "id"
   msgbox traveller.lastreceiveddate,  vbinformation + vbokonly,  "lastreceiveddate"
   msgbox traveller.lastreceivedlog, vbinformation  + vbokonly, "lastreceivedlog"
   msgbox traveller.lastreceivednum,  vbinformation + vbokonly,  "lastreceivednum"
   msgbox traveller.lastsentdate,  vbinformation + vbokonly,  "lastsentdate"
   msgbox traveller.lastsentlog,  vbinformation + vbokonly,  "lastsentlog"
   msgbox traveller.lastsentnum,  vbinformation + vbokonly,  "lastsentnum"
   msgbox traveller.name,  vbinformation + vbokonly,  "name"
   set traveller  =travellers.getnext
   wend
  else
   msgbox "unable to connect  to database"
  end if
      set objso  = nothing

See Also