|
PureBytes Links
Trading Reference Links
|
Hi Humphrey, Ton, Walter et al:
Sorry for the incomplete post and the code I've sent erroneously (here in
Austria it's hot like in Australian summers at the moment):
>Minute = val(right(format(range("a1"),"hh:mm"),2))
>If Val(Application.Version) < 8 Then m = 16384 Else m = 65536
What I forgot to mention is that there are 2 Subs in my code:
1) Sub DownLoader_Get_Path
2) Sub DownLoader_Get_Path_Loop()
ad 2) The Sub DownLoader_Get_Path_Loop() starts at MetaStock version number
5.00 and loops (increment 0.01) through all version numbers up to V. 9.0
[=Y3k? :-)]
It leaves a lot of unnecessary registry keys in your Windows Registry. At
the moment I do not know how to delete Windows Registry keys with VBA.
Maybe I can post a method tomorrow.
ad 1) The Sub DownLoader_Get_Path() cannot make any "damage" to your
Windows Registry. The path will be shown as a message and is copied to
Range("F5") in the Excel workbook. In Range("F6") you will find the
DownLoader path with a slash at the end (sometimes necessary for further
development).
Use whatever you like and modify the code according to your needs.
"reqEntry" is the variable containing the DownLoader path.
For users not used to work with the Windows Registry:
Due to the MetaStock Version number bug (Windows Registry key does not
necessarily correspond with the version actually installed) you must find
out the correct MetaStock Version stored in the Windows Registry the hard way:
Just open the Registry Editor:
1.Click Start -> Run -> type Regedit -> click OK.
2.Search for "equis" (without the quotes).
You should find entries like "MetaStock 6.5", "MetaStock 6.51", "MetaStock
6.52", there maybe even more entries at once.
The "right" one is the one with the most keys.
You must enter this number (e.g.: "6.51" without the quotes) in my Excel
InputBox ("Enter the Version Number of MetaStock...).
HTH and clarifies,
Thomas
'''''''''''''''''''''''''''' BEGIN of VBA Code ''''''''''''''''''''''''''''
snip (see last post)
At 21:19 2000-06-13 +0400, you wrote:
>How can I specify the downloader directory DLWIN. I am running a
>script to populatemetastock directory wit new prices but the script
>fails to find the DLWIN directory.
>Humphrey
----------------------------------------------------------------------------
Thomas Pfluegl, Rudersdorf 8, A - 4212 Neumarkt
Austria Tel. ++ 43 - (0) 7941 - 8106
http://keplerweb.oeh.uni-linz.ac.at/trading/index.html
----------------------------------------------------------------------------
Austria/Europe --> high mountains --> Mozart --> no kangaroos
----------------------------------------------------------------------------
|