Returns the current time in seconds since midnight.
lValue = object.brTime
Parameter | Description |
---|---|
lValue | The return value is a Long data type indicating the seconds since midnight. |
object | An object variable that represents a clsD3Connection object. |
The RPC connection uses the client's time.
The ODBC connection uses the server's time.
Private Sub UpdateLog(oConn As clsD3Connection, aTask As clsD3DynamicArray) Dim oFile As clsD3File Dim sLogName As String Dim aItem As New clsD3DynamicArray Dim sItemName As String On Error GoTo D3ErrorHandler sLogName = "daily" & oConn.brDate & ".log" Set oFile = oConn.brOpenFile(sLogName) oFile.brFileLock ' Item-id will be the time. sItemName = oConn.brTime oFile.brWrite aTask, sItemName oFile.brFileUnlock oConn.brCloseFile oFile Exit Sub D3ErrorHandler: Select Case Err.Number Case d3SrvErr_Missing oConn.brCreateFile "", sLogName, 3, 31 Case Else End End Select Resume End Sub
time()