[amibroker] Link an ascii file of datas with Amibroker

[Alain Baur]

Hi all,

I am trying to link an file of ascii datas with Amibroker.

I have downloaded, in Amibroker'sguide,  a jscript procedure which is capable 
to realize this, bur it does'not work with me.

Here is the source of this Jscript :   

/*
** AmiBroker/Win32 scripting Example
**
** File:  Import.js
** Created:  Tomasz Janeczko, January 30th, 2000
** Purpose:  Import quotes from Metastock ASCII file
** Language: JScript (Windows Scripting Host)
**
** The data is stored in lines with following format
** <ticker>,<per>,<date>,<high>,<low>,<close>,<volume>
**
*/
 ImportMsASCII( "C:\\ACCOR.Txt" );

function ImportMsASCII( filename )
{
 var fso, f, r;
 var ForReading = 1;
 var AmiBroker;
 var date;
 var quote;
 var fields;
 var stock;

 /* Create AmiBroker app object */
 AmiBroker = new ActiveXObject( "Broker.Application" );

 /* ... and file system object */
 fso = new ActiveXObject( "Scripting.FileSystemObject" );

 /* open ASCII file */
 f = fso.OpenTextFile( filename, ForReading);

 /* skip first line which contains format definition */
 f.SkipLine(); 

 /* read the file line by line */
 while ( !f.AtEndOfStream )
 {  
    r =  f.ReadLine();
    
    /* split the lines using semicolon as a separator */
    fields = r.split(";"); 
    
    /* add a ticker - this is safe operation, in case that  */
    /* ticker already exists, AmiBroker returns existing one */
    stock = AmiBroker.Stocks.Add( fields[ 0 ] ); 
    
    /* notify the user */
    WScript.Echo( "Importing " + fields[ 0 ] );

    /* parse the date from the text file */
    date = new Date( fields[ 1 ] );

    /* add a new quotation */
    quote = stock.Quotations.Add( date.getvarDate() );
    /* put data into it */
    quote.Open = parseFloat( fields[2]);
    quote.High  = parseFloat( fields[ 3 ] );
    quote.Low   = parseFloat( fields[ 4 ] );
    quote.Close = parseFloat( fields[ 5 ] );
    quote.Volume = parseInt( fields[ 6 ] );
   
 }
 /* refresh ticker list and windows */
 AmiBroker.RefreshAll();
 /* notify the user */
 WScript.Echo( "Finished" );
}
 and here is an example of datas file :

<Ticker>,<date_DMY>,<Open>,<High>,<Low>,<Close>,<Volume>
ACCOR;09/10/2009;      37.42;      38.12;      36.87;      37.10;    735891
ACCOR;12/10/2009;      37.25;      37.84;      37.13;      37.68;    673107
ACCOR;13/10/2009;      37.36;      38.02;      37.21;      37.34;    726353
ACCOR;14/10/2009;      37.71;      38.29;      37.59;      37.81;    850644
ACCOR;15/10/2009;      37.85;      38.10;      36.30;      36.50;   1445724
ACCOR;16/10/2009;      36.50;      36.88;      35.90;      36.08;   1541279
ACCOR;19/10/2009;      36.12;      36.65;      35.90;      36.28;   1036342
ACCOR;20/10/2009;      36.49;      36.63;      36.05;      36.20;    799961
ACCOR;21/10/2009;      36.31;      36.40;      35.57;      35.74;    889888
ACCOR;22/10/2009;      35.47;      35.47;      34.70;      35.02;    804990
ACCOR;23/10/2009;      35.50;      35.78;      34.26;      34.31;   1473307
ACCOR;26/10/2009;      34.49;      34.85;      33.75;      33.87;   1293311

I always have an error message : "cet objet ne gère pas cette propriété"

at the lnstruction "quote = stock.Quotations.Add( date.getvarDate() )"  (In red 
in the source code)

Can anyone help me ?

Best regards;