If your file isn't in this format: <ticker>,<full name>,<industry number>
then it won't work. d > -----Original Message----- > From: [email protected] > [mailto:[EMAIL PROTECTED] On Behalf Of mikeleekc > Sent: Saturday, January 26, 2008 2:52 AM > To: [email protected] > Subject: [amibroker] Re: Automatic Assigning Industries to > Tickers with downloaded "Industries.js" > > Here it is. I downloaded the script form the Amibroker site > > > ----------------------Script Begin----------------------------- > > /* > ** AmiBroker/Win32 scripting Example > ** > ** File: Industries.js > ** Created: Tomasz Janeczko, November 26th, 2000 > ** Last updated: Tomasz Janeczko, December 17th, 2000 > ** Purpose: Import industy assignments > ** Language: JavaScript (Windows Scripting Host) > ** > ** The data is stored in lines with following format > ** <ticker>,<full name>,<industry number> > ** > */ > > WScript.Echo( "Script Started" ); > > /* change this line according to your data file name */ > ImportStocks("industries.txt"); > > WScript.Echo( "Finished" ); > > function ImportStocks( filename ) > { > var fso, f, r; > var ForReading = 1; > var AmiBroker; > 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); > > i = 1; > /* read the file line by line */ > while ( !f.AtEndOfStream ) > { > r = f.ReadLine(); > > /* split the lines using comma as a separator */ > fields = r.split(","); > > try > { > > /* add a ticker - this is safe > operation, in case that */ > /* ticker already exists, AmiBroker > returns existing one */ > stock = AmiBroker.Stocks.Add( fields[ 0 ] ); > > stock.FullName = fields[ 1 ]; > > stock.IndustryID = parseInt( fields[ 2 ] ); > } > catch( e ) > { > WScript.echo( "There is a > problem in line no." + i + ".\nThe line > looks as follows:\n'" + r + "'\nIt will be skipped and next lines will > be processed as normal" ); > } > > i++; > } > > /* refresh ticker list and windows */ > AmiBroker.RefreshAll(); > > } > > ----------------------Script End----------------------------- > > > Tnanks > > -- > ML > > > > Please note that this group is for discussion between users only. > > To get support from AmiBroker please send an e-mail directly to > SUPPORT {at} amibroker.com > > For NEW RELEASE ANNOUNCEMENTS and other news always check DEVLOG: > http://www.amibroker.com/devlog/ > > For other support material please check also: > http://www.amibroker.com/support.html > > Yahoo! Groups Links > > > >
