That's ok, I just wanted to show you how to get the COM objects working in
AFL.
On Sun, May 3, 2009 at 2:07 PM, Ton Sieverding <[email protected]>wrote:
>
>
> Thanks, nothanks Tony. That is not what I want. You're opening a new
> Page. I want to select in an existing Page a new Ticker. I will give you the
> code in JScript that's called from AB. The underneath code does what I
> want to do. But I want it in AFL. Without the JScript part. And of course a
> lot simpler than all these lines of code ... I am sure it can be done in
> AFL. But how ?
>
> Kind regards, Ton.
>
> *EnableScript**(**"JScript"**);
> <%
> **function** SelectTicker(Ticker)
> {
> AB = new ActiveXObject(**"Broker.Application"**);
> AB.ActiveDocument.Name = Ticker;
> **return** "OK"**;
> }
> %>*
>
> *GetSym = ParamTrigger("Get SP500 ","GET"**);
> if*
> * (GetSym)
> {
> script = GetScriptObject**();
> script.SelectTicker("^GSPC"**); *
> *} *
>
> ----- Original Message -----
>
> *From:* Tony Grimes <[email protected]>
> *To:* [email protected]
> *Sent:* Sunday, May 03, 2009 2:05 PM
> *Subject:* Re: [amibroker] Erasing All List
>
> This should get you started:
> GetSym = "WOR";
>
> if (StrLen(GetSym))
> {
> AB = CreateObject("Broker.Application");
> ABD = AB.Documents;
> ABD.Open(GetSym );
> }
>
>
> On Sun, May 3, 2009 at 3:59 AM, Ton Sieverding
> <[email protected]>wrote:
>
>>
>>
>> Thanks Dingo. I still do not understand why this should not work in AFL
>> :
>>
>> *GetSym = ParamTrigger("Get SP500 ","GET"**);
>> if** (GetSym)
>> {
>> AB.createobject("Broker.Application"**);
>> AB.Documents.Open("^GSPC"**);
>> }*
>>
>> Regards, Ton.
>>
>>
>> ----- Original Message -----
>> *From:* dingo <[email protected]>
>> *To:* [email protected]
>> *Sent:* Friday, May 01, 2009 5:10 PM
>> *Subject:* Re: [amibroker] Erasing All List
>>
>> oAB.Documents.Open(CStr(Ticker)) is the way to do it in vbscript. The
>> Cstr is needed in vb.
>>
>> d
>>
>> On Fri, May 1, 2009 at 3:25 AM, Ton Sieverding <[email protected]
>> > wrote:
>>
>>>
>>>
>>> Hi Dingo,
>>>
>>> I know how to remove, add and even how to get a tickerlist using the
>>> Stocks object in the AmiBroker object model ...
>>>
>>> oStocks.Remove( Ticker );
>>> oStocks.Add( Ticker );
>>>
>>> But I do not know how to select a Ticker in the database. Should be
>>> something like ...
>>>
>>> oStocks.Select( Ticker );
>>>
>>> ... wrong. Method does not exist. Any idea ?
>>>
>>> Regards, Ton.
>>>
>>>
>>>
>>> ----- Original Message -----
>>> *From:* dingo <[email protected]>
>>> *To:* [email protected]
>>> *Sent:* Thursday, April 30, 2009 5:44 PM
>>> *Subject:* Re: [amibroker] Erasing All List
>>>
>>>
>>>
>>> http://www.amibroker.org/userkb/2008/01/05/deleting-tickers-and-composites/
>>>
>>> d
>>>
>>> On Thu, Apr 30, 2009 at 11:33 AM, burlap58 <[email protected]> wrote:
>>>
>>>> Is there a way to erase or delete symbols from the All list other than
>>>> one at a time. I erased the same symbols from the watchlist,but they are
>>>> still in the All list. Thanks for any help, Lloyd
>>>>
>>>>
>>>>
>>>> ------------------------------------
>>>>
>>>> **** IMPORTANT PLEASE READ ****
>>>> This group is for the discussion between users only.
>>>> This is *NOT* technical support channel.
>>>>
>>>> TO GET TECHNICAL SUPPORT send an e-mail directly to
>>>> SUPPORT {at} amibroker.com
>>>>
>>>> TO SUBMIT SUGGESTIONS please use FEEDBACK CENTER at
>>>> http://www.amibroker.com/feedback/
>>>> (submissions sent via other channels won't be considered)
>>>>
>>>> For NEW RELEASE ANNOUNCEMENTS and other news always check DEVLOG:
>>>> http://www.amibroker.com/devlog/
>>>>
>>>> Yahoo! Groups Links
>>>>
>>>>
>>>>
>>>>
>>>
>>>
>>>
>>
>
>
>
