brDate property

Returns the current system date in D3 internal format.

Syntax

lValue = object.brDate

Parameters

Parameter	Description
`lValue`	The return value is a Long data type indicating the system date in D3 internal format, which is the number of days that have elapsed since December 31, 1967.
`object`	An object variable that represents a clsD3Connection object.

Remarks

Using an RPC connection, the current date is returned from the client.
Using an ODBC connection, the current date is returned form the server.

Example

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
   Set aItem = Nothing
Exit Sub
 
D3ErrorHandler:
   Select Case Err.Number
      Case d3SrvErr_Missing
         oConn.brCreateFile "", sLogName, 3, 31
      Case Else
         End
   End Select
   Resume
End Sub

FlashBASIC reference

date()

Applies to

clsD3Connection class, clsD3VirtualMachine class