General information
Category:
Coding, syntax & commands
Hi Eric,
Following is the code :-
Private lordo_app As rdoResultset
Set lordo_app = goConnection.OpenResultset(" select * from app " & lswhereclause, rdOpenKeyset, rdConcurReadOnly)
If (lordo_app!requiredar <> 0 And lordo_app!otc = 1) Then
txtarstart = Format(lordo_app!Received, "MM/dd/yyyy")
txtantarfinish = Format(lordo_app!Received, "MM/dd/yyyy")
txtarfinish = Format(lordo_app!Received, "MM/dd/yyyy")
txtarstart = Format(lordo_app!Received, "MM/dd/yyyy")
txtarstatus = 100
txtarbcstart = Format(lordo_app!Received, "MM/dd/yyyy")
txtantarbcfinish = Format(lordo_app!Received, "MM/dd/yyyy")
txtarbcfinish = Format(lordo_app!Received, "MM/dd/yyyy")
end if
thanks,
...ashish
Previous
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only