ScientificLee
09-03-2003, 11:31 AM
Hello.
Let's say that I have a sub as such.
Sub setVars(symbol As String, startTime As String, endTime As String)
If Weekday(Now - 1) = vbSunday Then
stDate = Year(Now) & "/" & Month(Now) & "/" & Day(Now - 3)
Else
stDate = Year(Now) & "/" & Month(Now) & "/" & Day(Now - 1)
End If
stMachine = "&HISTORIC&"
stService = "TA_SRV"
stTopic = "LIVECHART"
stItem = "TICKS;1006,1178;9008='" & stDate & "',1003='& symbol & ',9004=1,9009=' & startTime & ',9010='& endTime & '"
End Sub
can I just call this sub later as
Sub connectTAL(symbol As String, startTime As String, endTime As String)
setVars(symbol, startTime, endTime)
end sub
Let's say that I have a sub as such.
Sub setVars(symbol As String, startTime As String, endTime As String)
If Weekday(Now - 1) = vbSunday Then
stDate = Year(Now) & "/" & Month(Now) & "/" & Day(Now - 3)
Else
stDate = Year(Now) & "/" & Month(Now) & "/" & Day(Now - 1)
End If
stMachine = "&HISTORIC&"
stService = "TA_SRV"
stTopic = "LIVECHART"
stItem = "TICKS;1006,1178;9008='" & stDate & "',1003='& symbol & ',9004=1,9009=' & startTime & ',9010='& endTime & '"
End Sub
can I just call this sub later as
Sub connectTAL(symbol As String, startTime As String, endTime As String)
setVars(symbol, startTime, endTime)
end sub