|
Script
'''#####################################################################################
'''#### Script Name: Account Balance &Account Type ######
'''#### Author : Laith Ghawi ######
'''#### Website : www.Hybrid-solutions.com ######
'''#### Date : 08/07/2019 11:20:44 ######
'''#### Description:Shows your account balance&Type into a message boxes ######
'''#####################################################################################
Sample
Public Sub main()
Dim property_id as VTLGeneral.ENUM_ACCOUNT_INFO_INTEGER
Dim Info as VTLGeneral.ENUM_ACCOUNTINFO_STRING
Dim balance as VTLGeneral.ENUM_ACCOUNT_INFO_DOUBLE
balance = VTLGeneral.ENUM_ACCOUNT_INFO_DOUBLE.ACCOUNT_BALANCE
Info = VTLGeneral.ENUM_ACCOUNTINFO_STRING.ACCOUNT_FIRST_NAME
property_id = VTLGeneral.ENUM_ACCOUNT_INFO_INTEGER.ACCOUNT_TRADE_MODE
ClientCode.AccountInfoInteger(property_id)
IF property_id=1 Then
GUI.MsgDialog("Demo Account")
ElseIF property_id=2 Then
GUI.MsgDialog("Contest Account")
ElseIF property_id=3 Then
GUI.MsgDialog("Real Account")
End IF
GUI.MsgDialog("Account name is: " & ClientCode.AccountInfoString(Info).Tostring())
GUI.MsgDialog("Balance is: " & ClientCode.AccountInfodouble(balance).Tostring())
End Sub
See Also
Back to VTL Server Script Index
| 
(1 vote(s))