対応するプラットフォームのユーザー位置情報へのアクセスを提供します。iOS および Android 版 HCL Nomad v1.0.4 以降でサポートされます。
また、Webブラウザ版 HCL Nomad v1.0.3 以降でサポートされます。
NotesSession に含まれる
TimeoutSec プロパティ (NotesGPS - LotusScript)
HighAccuracy プロパティ (NotesGPS - LotusScript)
GetCurrentPosition メソッド (NotesGPS - LotusScript)
RequestAccess メソッド (NotesGPS - LotusScript)
set gps = NotesSession.CreateGPS()
Dim session As New NotesSession
Dim gps As NotesGPS
Set gps = session.CreateGPS()
NotesGPS リクエストのタイムアウト(秒)。
Integer
set NotesGPS.timeoutsec = <value in seconds>
指定しない場合は、最大タイムアウトは 9 秒と決定されます。
0 はタイムアウトしないことを意味します。
許可される最大タイムアウトはプラットフォームによって異なります。
プラットフォームに高精度の位置情報のみを返すように指示します。屋内では使用できません。
Boolean
Set NotesGPS.HighAccuracy = true
指定しない場合のデフォルトは false です。
現在の位置を取得するためにプラットフォームにリクエストを送信します。
Dim gpsPostion as NotesGPSPosition
Set gpsPosition = NotesGPS.getCurrentPostion()
NotesGPSCoordinates と TimeStamp を含む NotesGPSPosition オブジェクト。
プラットフォームからのアクセスを要求します。
hasAccess = gps.Requestaccess()
Boolean
アクセスが提供されている場合は true を返します。アクセスが提供されていない場合は false を返します。
Dim gps as NotesGPS
Dim hasAccess as Boolean
Set gps= NotesSession.CreateGPS()
HasAccess = hasAccess = gps.Requestaccess()