ITravelInterfaceUAGeneratePrototype Method |
Unattended.
Generate non-satellite areas unattended (use SuperOffice Travel Gateway)
Namespace: SuperOffice.COM.SuperOfficeDB
UAGeneratePrototype
This text may be copied to the notepad, and saved as a *.vbs file. Remember to change the login information.
UAGeneratePrototype(1)
Database.preferences.set(Travel, GWSilent, 0)
This may be used to run an unattended Read updatefile (in SuperOffice travelgateway). AreaID must be a valid area, not a satellite. The database preference is set so the progress bar will not be shown.
Dim objSO Dim objTI Set objSO = CreateObject("SuperOffice.Application") If not (objSO is nothing) Then Set objTI = objSO.Database.TravelInterface If objTI.UAGeneratePrototype(1) Then ObjSO.Database.Preference.Set "Travel", "GWSilent", 0 MsgBox "The prototype for area 1 is generated." Else MsgBox " Area 1 may not be a valid area. Check log file for error message." End If Else MsgBox "Could not log in" End If Set objSO = Nothing