Hi,
On the quotations form there is a tax date field.
I have renamed the caption "last updated" and wish everytime the form loads for the data to read the same as the server date as below:
'Move "Document Date" Caption and rename "Last Updated"
oXPlaneItem = oForm.Items.Item("85")
oYPlaneItem = oForm.Items.Item("13")
oItem = oForm.Items.Item("86")
With oItem
.Height = oYPlaneItem.Height
.Width = oYPlaneItem.Width
.Left = oYPlaneItem.Left
.Top = oXPlaneItem.Top
End With
oLabel = oItem.Specific
oLabel.Caption = "Last Updated"
'Move "Predicted Closing Date" edit box to centre
oXPlaneItem = oForm.Items.Item("13")
oItem = oForm.Items.Item("12")
With oItem
.Left = oXPlaneItem.Left + oXPlaneItem.Width
.Top = oXPlaneItem.Top
End With
'Move "Document Date" EditBox Always equal server date
oXPlaneItem = oForm.Items.Item("85")
oYPlaneItem = oForm.Items.Item("12")
oItem = oForm.Items.Item("46")
With oItem
.Height = oYPlaneItem.Height
.Width = oYPlaneItem.Width
.Left = oYPlaneItem.Left
.Top = oXPlaneItem.Top
End With
oEdit = oItem.Specific
oEdit.String = oApp.Company.ServerDate
This works for User defined edit boxes if the databind is definded.
Is it possible to acheive what I am trying to do? At present the dit box constaly reads what is in the table and does update to the server date.