SI
SI
discoversearch

We've detected that you're using an ad content blocking browser plug-in or feature. Ads provide a critical source of revenue to the continued operation of Silicon Investor.  We ask that you disable ad blocking while on Silicon Investor in the best interests of our community.  If you are not using an ad blocker but are still receiving this message, make sure your browser's tracking protection is set to the 'standard' level.
Strategies & Market Trends : TA-Quotes Plus

 Public ReplyPrvt ReplyMark as Last ReadFilePrevious 10Next 10PreviousNext  
To: Gary Lyben who wrote (5524)7/22/1998 12:10:00 AM
From: Dale Wingo  Read Replies (2) of 11149
 
Sorry it took so long.. My trial membership only lets me post 3 msgs per
day so I had to wait..

Wellll.. (Long message follows)

If you aren't interested in program speak I strongly suggest you click the
NEXT button 'cause this is a lot like watching grass grow or sausage being
made!<g>

After some research on my part I've been able to get the programs to run...

I'll go ahead and post what I did so that if there are any others that
want to do the same they won't have to go thru this..

First my environ: 333mhz PentII, 128 MB memory, 8 Gig disk running win98
using Fat32

Windows\System contains:
qpr2dllb.dll version 1, 0, 4 , 2
qpr2dllm.dll version 1, 0, 4 , 2
qpr2dll.dll No Version Avail

Program DumpToAscii:

1. Loads ok in IDE

2. Main Form loads OK when run in IDE

3a. With Daily Stocks option button true click Start button in single
step debug mode.

If Option1 Then
erc = LoadFirstSymbol(Dt(0), 2200)

The "If" is true so next stmt is executed after which erc = true so
nothing else happens.

3b. With Weekly Stocks option button true click Start button in single
step debug mode.

ElseIf Option2 Then
erc = LoadFirstWeeklySymbol(Dt(0), 1)

The "ElseIf" is true and when the "erc = LoadFirstWeeklySymbol(Dt(0), 1)"
line is executed I get the following MessageBox:

Title: CODEBASE ERROR

Error # -935
Error #: 92907
Mull Input Parameters unexpected
d4seek

With an OK Command button. When this is clicked the entire VB IDE
Goes "bye bye".

3c. With Mutual Funds option button true click Start button in single
step debug mode.

Else
erc = LoadFirstFundSymbol(Dt(0), 2200)

The "Else" is true and when the "erc = LoadFirstFundSymbol(Dt(0), 2200)"
line is executed I get the following MessageBox:

Title: CODEBASE ERROR

Error # -935
Error #: 92401
Mull Input Parameters unexpected
d4tag

With an OK Command button. When this is clicked the entire VB IDE
Goes "bye bye".

Program DumpToAscii:

When I try to load into IDE the following Message Box Appears:

There is a newer version of C:\Quotspls2\dll\vb5~1\Irlview\Amovie.ocx registered.
Do you want to upgrade to version 2.0?

With Yes, No, Help buttons

If I click the Yes button I then get the following Message Box:

C:\Quotspls2\dll\vb5~1\Irlview\MSACAL70.OCX could not be loaded - Continue Loading
Project?

I Click No as it do no good to continue from here.

I presume that MSACAL70.OCX is some sort of Active X Calendar control?!?
I'm guessing that it is a calendar control from Access 7.0 developer's edition which
I don't have..

If I DO click yes to the missing OCX message then I get another due to the fact that I have
a later version of Crystal Reports (6.0). I don't know yet what impact if any this will
have..

Hmmm.. After looking the the .vbp file in a text editor I suspect that the person that wrote
this code used an existing project and stripped out several controls but VB continued to
refer to them in the project file which is causing the load problems. A list of the controls
referred to in the .vbp file follows:

Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\SYSTEM\STDOLE2.TLB#OLE Automation
Object={05589FA0-C356-11CE-BF01-00AA0055595A}#1.0#0; AMOVIE.OCX
Object={812AE310-8B8E-11CF-93C8-00AA00C08FDF}#0.0#0; ISCTRLS.OCX
Object={D6EEA3C0-6216-11CF-BE62-0080C72EDD2D}#1.0#0; MARQUEE.OCX
Object={6B7E6392-850A-101B-AFC0-4210102A8DA7}#1.1#0; COMCTL32.OCX
Object={8E27C92E-1264-101C-8A2F-040224009C02}#7.0#0; MSACAL70.OCX
Object={00025600-0000-0000-C000-000000000046}#4.6#0; CRYSTL32.OCX
Object={288F1520-FAC4-11CE-B16F-00AA0060D93D}#1.0#0; MCIWNDX.OCX
Object={3B547062-F434-11CF-824A-00AA006B1B5F}#1.1#0; MV141KN.OCX

I stripped out the line containing MSACAL70.OCX and it then loaded (still gave me updated .ocx messages)

I then ran it in the IDE and got the following message box:

Error 12 On Opening All Data Files

with an OK button.

I strongly suspect that the following lines

Let DataDir = "d:\r2data"
Let BufferDir = "l:\diskbuff.0331"

in the Form_Load Sub are causing this.

I changed the first line to:
Let DataDir = "c:\qp2data" to match my system

and Voila! It runs.

Program LoadingASymbol:

Loads into IDE ok.

When I run it in IDE it get the following message box:

Could Not Open The Data Files In Directory: d:\r2data

I then changed to match my own system (c:\qp2data) and the program runs..

Back to Program DumpToAscii:

After the success with the above 2 progs I decided to revisit this one and sure enuff..

the following line:

DataDir = "c:\qp2data"

when changed as I did in prev 2 progs will now cause the program to work.

However, Upon examining the output file there are several lines with blank symbols right at the
front.

The rest looks "OK" at this point. I didn't let it run to completion so that I could post this
message..

So... They all now run.

HTH everyone!

Thanks for your ear..

Dale
Report TOU ViolationShare This Post
 Public ReplyPrvt ReplyMark as Last ReadFilePrevious 10Next 10PreviousNext