Re: [amibroker] I am looking for an example of code in VBScript or JScript with the method Retrieve from the Quotations collection.

[William Peters <williampeters@xxxxxxxxxxx>]

D

That could be a problem then. He can of course use this in VB6 if he
has the program and its suitable. Thanks for the input



Regards,
William Peters
www.amitools.com


Wednesday, November 3, 2004, 12:16:31 PM, you wrote:


d> William:
 
d> The .Retrieve won't work in either of the script languages per TJ because
d> they pass arguments by value and not by reference which .Retrieve requires.
 
d> d 


d>   _____  

d> From: William Peters [mailto:williampeters@xxxxxxxxxxx] 
d> Sent: Wednesday, November 03, 2004 11:16 AM
d> To: tintin92
d> Subject: Re: [amibroker] I am looking for an example of code in VBScript or
d> JScript with the method Retrieve from the Quotations collection.


d> tintin92

d> Here is a VB6 example which fills a listbox with 100 MSFT quotes. You
d> should be able to adapt this to VB Script without too many changes.

d> Dim AB As Object
d> Dim qt As Object
d> Dim NumQuotes As Long
d> Dim i As Long
d> Dim NumQuotesRequired As Long
d> Dim aDate, aOpen, aHigh, aLow, aClose, aVolume, aOpenInt As Variant

d> Set AB = CreateObject("Broker.Application")
d> Set qt = AB.Stocks("MSFT").Quotations

d> 'Note: If NumQuotesRequired is set to -1 then all available quotes are
d> returned
d> NumQuotesRequired = 100

d> NumQuotes = qt.Retrieve(NumQuotesRequired, aDate, aOpen, aHigh, aLow,
d> aClose, aVolume, aOpenInt)

d> List1.Clear

d> For i = 0 To NumQuotes - 1
d> List1.AddItem (aDate(i) & "," & aOpen(i) & "," & aHigh(i) & "," & aLow(i) &
d> "," & aClose(i) & "," & aVolume(i))
d> Next



d> Regards,
d> William Peters
d> www.amitools.com


d> Wednesday, November 3, 2004, 10:50:42 AM, you wrote:


t>> Hi,

t>> I am looking for an example of code in VBScript or JScript with the
d> method
t>> Retrieve from the Quotations collection.

t>> Thanks.

t>> Tintin92



d> Check AmiBroker web page at:
d> http://www.amibroker.com/

d> Check group FAQ at:
d> http://groups.yahoo.com/group/amibroker/files/groupfaq.html 



d> Yahoo! Groups Sponsor   

d> ADVERTISEMENT
 
d> <http://us.ard.yahoo.com/SIG=129dfvad6/M=315388.5543473.6613715.3001176/D=gr
d> oups/S=1705632198:HM/EXP=1099585149/A=2372354/R=0/SIG=12id813k2/*https://www
d> .orchardbank.com/hcs/hcsapplication?pf=PLApply&media=EMYHNL40F21004SS> click
d> here    
 
d> <http://us.adserver.yahoo.com/l?M=315388.5543473.6613715.3001176/D=groups/S=
d> :HM/A=2372354/rand=180603617>   


d>   _____  

d> Yahoo! Groups Links


d> *       To visit your group on the web, go to:
d> http://groups.yahoo.com/group/amibroker/
  

d> *       To unsubscribe from this group, send an email to:
d> amibroker-unsubscribe@xxxxxxxxxxxxxxx
d> <mailto:amibroker-unsubscribe@xxxxxxxxxxxxxxx?subject=Unsubscribe> 
  

d> *       Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service
d> <http://docs.yahoo.com/info/terms/> . 




d> [Non-text portions of this message have been removed]




d> Check AmiBroker web page at:
d> http://www.amibroker.com/

d> Check group FAQ at:
d> http://groups.yahoo.com/group/amibroker/files/groupfaq.html 
d> Yahoo! Groups Links



 




------------------------ Yahoo! Groups Sponsor --------------------~--> 
Make a clean sweep of pop-up ads. Yahoo! Companion Toolbar.
Now with Pop-Up Blocker. Get it for free!
http://us.click.yahoo.com/L5YrjA/eSIIAA/yQLSAA/GHeqlB/TM
--------------------------------------------------------------------~-> 

Check AmiBroker web page at:
http://www.amibroker.com/

Check group FAQ at: http://groups.yahoo.com/group/amibroker/files/groupfaq.html 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/amibroker/

<*> To unsubscribe from this group, send an email to:
    amibroker-unsubscribe@xxxxxxxxxxxxxxx

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/