Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]

Groups > comp.lang.basic.visual.misc > #2031 > unrolled thread

Visual Basic 5

Back to article view | Back to comp.lang.basic.visual.misc

Contents

  Visual Basic 5 John Mott <johnmott@iinet.net.au> - 2014-04-25 16:21 +0800
    Re: Visual Basic 5 ralph <nt_consulting@yahoo.com> - 2014-04-25 07:46 -0500
      Re: Visual Basic 5 ralph <nt_consulting@yahoo.com> - 2014-04-25 10:47 -0500
        Re: Visual Basic 5 John Mott <johnmott@iinet.net.au> - 2014-04-26 10:43 +0800
          Re: Visual Basic 5 GS <gs@somewhere.net> - 2014-04-26 11:59 -0400
          Re: Visual Basic 5 ralph <nt_consulting@yahoo.com> - 2014-04-26 13:48 -0500
            Re: Visual Basic 5 John Mott <johnmott@iinet.net.au> - 2014-05-02 17:02 +0800
              Re: Visual Basic 5 Deanna Earley <dee.earley@icode.co.uk> - 2014-05-02 10:29 +0100
                Re: Visual Basic 5 John Mott <johnmott@iinet.net.au> - 2014-05-04 15:44 +0800
              Re: Visual Basic 5 GS <gs@somewhere.net> - 2014-05-02 14:21 -0400
              Re: Visual Basic 5 RW <RonW@no_domain.invalid> - 2014-05-02 15:27 -0400
                Re: Visual Basic 5 John Mott <johnmott@iinet.net.au> - 2014-05-04 15:48 +0800
                  Re: Visual Basic 5 ralph <nt_consulting@yahoo.com> - 2014-05-04 04:03 -0500
                    Re: Visual Basic 5 John Mott <johnmott@iinet.net.au> - 2014-05-08 17:30 +0800
                      Re: Visual Basic 5 John Mott <johnmott@iinet.net.au> - 2014-05-08 17:58 +0800
                      Re: Visual Basic 5 ralph <nt_consulting@yahoo.com> - 2014-05-08 08:52 -0500
                        Re: Visual Basic 5 ralph <nt_consulting@yahoo.com> - 2014-05-08 09:47 -0500
                          Re: Visual Basic 5 ralph <nt_consulting@yahoo.com> - 2014-05-08 11:38 -0500
                        Re: Visual Basic 5 RW <RonW@no_domain.invalid> - 2014-05-08 15:20 -0400
                          Re: Visual Basic 5 John Mott <johnmott@iinet.net.au> - 2014-05-09 15:32 +0800
                        Re: Visual Basic 5 John Mott <johnmott@iinet.net.au> - 2014-05-11 16:03 +0800
                          Re: Visual Basic 5 ralph <nt_consulting@yahoo.com> - 2014-05-11 11:29 -0500
                            Re: Visual Basic 5 GS <gs@somewhere.net> - 2014-05-11 14:28 -0400
                          Re: Visual Basic 5 ralph <nt_consulting@yahoo.com> - 2014-05-11 12:59 -0500
                          Re: Visual Basic 5 ralph <nt_consulting@yahoo.com> - 2014-05-11 14:04 -0500
                            Re: Visual Basic 5 ralph <nt_consulting@yahoo.com> - 2014-05-11 14:32 -0500
                            Re: Visual Basic 5 John Mott <johnmott@iinet.net.au> - 2014-05-12 16:49 +0800
                              Re: Visual Basic 5 ralph <nt_consulting@yahoo.com> - 2014-05-12 22:34 -0500
                                Re: Visual Basic 5 John Mott <johnmott@iinet.net.au> - 2014-05-13 14:51 +0800
                                  Re: Visual Basic 5 John Mott <johnmott@iinet.net.au> - 2014-05-13 17:12 +0800
                                    Re: Visual Basic 5 ralph <nt_consulting@yahoo.com> - 2014-05-13 08:01 -0500
                                      Re: Visual Basic 5 ralph <nt_consulting@yahoo.com> - 2014-05-13 09:36 -0500
                                        Re: Visual Basic 5 ralph <nt_consulting@yahoo.com> - 2014-05-13 09:43 -0500
                                        Re: Visual Basic 5 ralph <nt_consulting@yahoo.com> - 2014-05-13 09:55 -0500
                                        Re: Visual Basic 5 ralph <nt_consulting@yahoo.com> - 2014-05-13 10:16 -0500
                                        Re: Visual Basic 5 ralph <nt_consulting@yahoo.com> - 2014-05-13 13:24 -0500
                                          Re: Visual Basic 5 John Mott <johnmott@iinet.net.au> - 2014-05-14 17:30 +0800
                                            Re: Visual Basic 5 ralph <nt_consulting@yahoo.com> - 2014-05-14 07:05 -0500
                                              Re: Visual Basic 5 John Mott <johnmott@iinet.net.au> - 2014-05-15 16:58 +0800
                                                Re: Visual Basic 5 ralph <nt_consulting@yahoo.com> - 2014-05-15 07:37 -0500
                                                  Re: Visual Basic 5 John Mott <johnmott@iinet.net.au> - 2014-05-16 17:24 +0800
                                                    Re: Visual Basic 5 Deanna Earley <dee.earley@icode.co.uk> - 2014-05-16 13:58 +0100
                                                      Re: Visual Basic 5 John Mott <johnmott@iinet.net.au> - 2014-05-17 17:13 +0800
                                                        Re: Visual Basic 5 John Mott <johnmott@iinet.net.au> - 2014-05-18 16:05 +0800
                                                          Re: Visual Basic 5 ralph <nt_consulting@yahoo.com> - 2014-05-18 04:14 -0500
                                                            Re: Visual Basic 5 John Mott <johnmott@iinet.net.au> - 2014-05-19 17:28 +0800
                                                              Re: Visual Basic 5 Deanna Earley <dee.earley@icode.co.uk> - 2014-05-19 10:36 +0100
                                                                Re: Visual Basic 5 John Mott <johnmott@iinet.net.au> - 2014-05-20 16:32 +0800
                                                                  Re: Source control (Was: Visual Basic 5) Deanna Earley <dee.earley@icode.co.uk> - 2014-05-20 10:19 +0100
                                                                    Re: Source control (Was: Visual Basic 5) ralph <nt_consulting@yahoo.com> - 2014-05-20 11:59 -0500
                                                            Re: Visual Basic 5 John Mott <johnmott@iinet.net.au> - 2014-05-20 16:40 +0800
                                                        Re: Visual Basic 5 Deanna Earley <dee.earley@icode.co.uk> - 2014-05-19 08:55 +0100
                                            Re: Visual Basic 5 "Henning" <computer_hero@coldmail.com> - 2014-05-16 12:06 +0200
                  Re: Visual Basic 5 "Mayayana" <mayayana@invalid.nospam> - 2014-05-04 09:32 -0400
                  Re: Visual Basic 5 "Bill Skaggs" <eaglecrest@att.net> - 2014-05-04 06:34 -0700

Page 3 of 3 — ← Prev page 1 2 [3]

#2115

On Thu, 15 May 2014 07:37:29 -0500, ralph <nt_consulting@yahoo.com>
wrote:

>On Thu, 15 May 2014 16:58:27 +0800, John Mott <johnmott@iinet.net.au>
>wrote:
>
>
>>
>>In the text editor I deleted the lines for comctl32.ocx + #1.3#0 and
>>comdlg32.ocx #1.2#0 and then loaded the project into VB5 and used
>>Project Reference to insert references to Microsoft Windows Common
>>Controls 5.0 (SP2) and Microsoft Common Dialog Control 5.0 and saved
>>the project.
>>
>
>Note the version numbers.
>
>>[...]
>>I then used the text editor to delete comctl 5.0 (SP2) and used the
>>project reference to add Microsoft Windows Common Controls 6.0 (SP6)
>>and saved the project.
>>[...]
>>Now when I try to load the project into VB5 I am still getting the
>>error:
>>Line 64: Class ComctlLib.StatusBar of control sbarDividends was not a
>>loaded control class.
>>
>
>This is still squirrelly. 
>After you have reloaded your original project . (See below).
>Open the .vbp file that is complaining about the "sbar", and send any
>directives that refer to that control.
>

I am a bit confused by this request (and many other aspects of VB. It
is such a long time since I did much with it other than run existing
projects.

Here is a snippet of the code I think is bringing up the error
message.

'Add Panels to Status Bar.
Dim pnl1 As Panel
Set pnl1 = sbarDividends.Panels(1)
pnl1.Text = "SELECT A TASK TO PERFORM "

There are 10 separate forms in the project and all have a StatusBar.
Somewhere they are created and named but I cannot figure where. 

sbarDividends is the reference name for the StatusBar on the bottom of
the Dividend form.

When I try to run the project it does come up with a box across the
bottom of the form, but when I look at the properties of that box it
says it is named  sbarDividends Picture Box and shows the name
sbarDividends and all the other stuff such as dimensions etc.

All ten forms have similar charecteristics.

Did not have much time to look at it today, but will pursue further
during the weekend.


>.[...]
>>
>> I now have these references in the project file:
>>Object={831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.1#0; MSCOMCTL.OCX
>>Object={F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.1#0; COMDLG32.OCX
>>Object={5E9E78A0-531B-11CF-91F6-C2863C385E30}#1.0#0; MSFLXGRD.OCX
>>
>Note: you are no longer using the same typelib versions. You converted
>from using VB6 SP5 components (as was your original) to updated VB6
>SP6 components. Not clear if this is a problem or not.
>
>Chewing on too many items at one time. All we were trying to do was 
>1) Get the original components on your new box.
>    In this case VB6 sp5. 
>(The fact you can also install the newer VB6 SP6 components will be
>useful later on.)
>
>2) Get your original projects to load without error on the new box.
>    Referencing the original components you were using on your old
>platform.

I cannot see how to do this as it will not load without errors.

John
>
>3) THEN perhaps make changes to update the projects.
>
>Now that you have the Latest 'n Greatest Common Controls installed on
>the box, forget about installed components* and go back and reload
>your original projects.
>
>Baby Steps.
>
>-ralph
>[*This is assuming this "sbar" is in fact not something else.
>Threed.ocx for example.]

[toc] | [prev] | [next] | [standalone]

#2117

On 16/05/2014 10:24, John Mott wrote:
> sbarDividends is the reference name for the StatusBar on the bottom of
> the Dividend form.
>
> When I try to run the project it does come up with a box across the
> bottom of the form, but when I look at the properties of that box it
> says it is named  sbarDividends Picture Box and shows the name
> sbarDividends and all the other stuff such as dimensions etc.

It was a StatusBar at some point but when VB fails to load a control, it 
replaces it with a picture box.
If the user tells it to continue then saves over the top (with a confirm 
overwrite prompt) then this will become permanent.

Go and slap the devloper(sic) that did this and revert to an older 
version in source control (you do use source control don't you?)

-- 
Deanna Earley (dee.earley@icode.co.uk)
iCatcher Development Team
http://www.icode.co.uk/icatcher/

iCode Systems

(Replies direct to my email address will be printed, shredded then fed 
to the rats. Please reply to the group.)

[toc] | [prev] | [next] | [standalone]

#2118

Thanks Deanna for your info about how tricky VB saves the Picture Box
as a permanent change.

Today I made a step forward. I opened the project in VB after stepping
through the ten frm error messages and then on the Main form deleted
the Picture Box and then added a new Status Bar which I had to
configure to insert appropriate panels.

It then appeared to run OK and did not give me the error about Panels
on the StatusBar!
It may be the long way around, but I think the easy way to get the
whole project running may be to modify all the ten forms to delete the
Picture Box and insert a new status bar.
Will probably have another look at it tomorrow - At least I finally
seem to be making progress.
John

On Fri, 16 May 2014 13:58:42 +0100, Deanna Earley
<dee.earley@icode.co.uk> wrote:

>On 16/05/2014 10:24, John Mott wrote:
>> sbarDividends is the reference name for the StatusBar on the bottom of
>> the Dividend form.
>>
>> When I try to run the project it does come up with a box across the
>> bottom of the form, but when I look at the properties of that box it
>> says it is named  sbarDividends Picture Box and shows the name
>> sbarDividends and all the other stuff such as dimensions etc.
>
>It was a StatusBar at some point but when VB fails to load a control, it 
>replaces it with a picture box.
>If the user tells it to continue then saves over the top (with a confirm 
>overwrite prompt) then this will become permanent.
>
>Go and slap the devloper(sic) that did this and revert to an older 
>version in source control (you do use source control don't you?)

[toc] | [prev] | [next] | [standalone]

#2119

After deleting the Status Bar Picture Box on all the forms I inserted
a new status bar and set the Panels properties.
I then discovered that I had a ProgressBar Picture Box on one of the
forms and had to delete that and insert a ProgressBar.
It seems that the MSCOMCTL.OCX that I am using has different versions
of the StatusBar and ProgressBar controls to the one originally used
to compose the project.
I then ran into another problem when trying to run the project.
Most of the functions I tried seem to be working but I am getting this
"Run Time Error '70' Permission Denied"
Which highlights this code.

Private Sub txtFirst_Change()
If Len(txtFirst.Text) = 2 Then SendKeys "{TAB}", True
End Sub

It looks like correct syntax to me so I have given up for the day and
gone to think about it.
If only I could find the correct version of COMCTL.OCX maybe my
problems would be solved.

John






On Sat, 17 May 2014 17:13:09 +0800, John Mott <johnmott@iinet.net.au>
wrote:

>Thanks Deanna for your info about how tricky VB saves the Picture Box
>as a permanent change.
>
>Today I made a step forward. I opened the project in VB after stepping
>through the ten frm error messages and then on the Main form deleted
>the Picture Box and then added a new Status Bar which I had to
>configure to insert appropriate panels.
>
>It then appeared to run OK and did not give me the error about Panels
>on the StatusBar!
>It may be the long way around, but I think the easy way to get the
>whole project running may be to modify all the ten forms to delete the
>Picture Box and insert a new status bar.
>Will probably have another look at it tomorrow - At least I finally
>seem to be making progress.
>John
>
>On Fri, 16 May 2014 13:58:42 +0100, Deanna Earley
><dee.earley@icode.co.uk> wrote:
>
>>On 16/05/2014 10:24, John Mott wrote:
>>> sbarDividends is the reference name for the StatusBar on the bottom of
>>> the Dividend form.
>>>
>>> When I try to run the project it does come up with a box across the
>>> bottom of the form, but when I look at the properties of that box it
>>> says it is named  sbarDividends Picture Box and shows the name
>>> sbarDividends and all the other stuff such as dimensions etc.
>>
>>It was a StatusBar at some point but when VB fails to load a control, it 
>>replaces it with a picture box.
>>If the user tells it to continue then saves over the top (with a confirm 
>>overwrite prompt) then this will become permanent.
>>
>>Go and slap the devloper(sic) that did this and revert to an older 
>>version in source control (you do use source control don't you?)

[toc] | [prev] | [next] | [standalone]

#2120

On Sun, 18 May 2014 16:05:50 +0800, John Mott <johnmott@iinet.net.au>
wrote:
>[...]
>I then ran into another problem when trying to run the project.
>Most of the functions I tried seem to be working but I am getting this
>"Run Time Error '70' Permission Denied"
>Which highlights this code.
>
>Private Sub txtFirst_Change()
>If Len(txtFirst.Text) = 2 Then SendKeys "{TAB}", True
>End Sub
>
>It looks like correct syntax to me so I have given up for the day and
>gone to think about it.

You're almost done.

>If only I could find the correct version of COMCTL.OCX maybe my
>problems would be solved.

This error has nothing to do with Common Controls versions. 

The older VB5/VB6 version of "SendKeys" is a problem, and needs to be
replaced, on all Windows Platforms since Vista:

http://answers.microsoft.com/en-us/windows/forum/windows_7-windows_programs/sendkeys-gets-error-70-permission-denied/6871a2b7-522f-494b-91f4-4e33cf02e6fc

Karl Peterson's quick fix should fix it. The other links just pile on
the details. <g>

-ralph

[toc] | [prev] | [next] | [standalone]

#2122

Thanks for this info. I found the Karl Peterson fix a bit difficult to
figure out how to use, but in the meantime I had commented out all the
lines using Sendkeys as it was only a sophistication when entering
data to jump to the next text box once the previous one was fully
entered. The Enter key or the mouse do the same job and work quite OK.
The project then ran fine !
However I have now run into another crazy problem.
When saving the project it dropped one of the forms and when I re open
it the form is missing. I cannot see how to recover it other than
starting again from scratch.
I tried this and it is still doing it and one time it dropped a
different form when I  saved it.

John





On Sun, 18 May 2014 04:14:17 -0500, ralph <nt_consulting@yahoo.com>
wrote:

>On Sun, 18 May 2014 16:05:50 +0800, John Mott <johnmott@iinet.net.au>
>wrote:
>>[...]
>>I then ran into another problem when trying to run the project.
>>Most of the functions I tried seem to be working but I am getting this
>>"Run Time Error '70' Permission Denied"
>>Which highlights this code.
>>
>>Private Sub txtFirst_Change()
>>If Len(txtFirst.Text) = 2 Then SendKeys "{TAB}", True
>>End Sub
>>
>>It looks like correct syntax to me so I have given up for the day and
>>gone to think about it.
>
>You're almost done.
>
>>If only I could find the correct version of COMCTL.OCX maybe my
>>problems would be solved.
>
>This error has nothing to do with Common Controls versions. 
>
>The older VB5/VB6 version of "SendKeys" is a problem, and needs to be
>replaced, on all Windows Platforms since Vista:
>
>http://answers.microsoft.com/en-us/windows/forum/windows_7-windows_programs/sendkeys-gets-error-70-permission-denied/6871a2b7-522f-494b-91f4-4e33cf02e6fc
>
>Karl Peterson's quick fix should fix it. The other links just pile on
>the details. <g>
>
>-ralph

[toc] | [prev] | [next] | [standalone]

#2123

On 19/05/2014 10:28, John Mott wrote:
> Thanks for this info. I found the Karl Peterson fix a bit difficult to
> figure out how to use, but in the meantime I had commented out all the
> lines using Sendkeys as it was only a sophistication when entering
> data to jump to the next text box once the previous one was fully
> entered. The Enter key or the mouse do the same job and work quite OK.

Surely as it's implemented in each control's event, what's wrong with 
NextControl.SetFocus?

> However I have now run into another crazy problem.
> When saving the project it dropped one of the forms and when I re open
> it the form is missing. I cannot see how to recover it other than
> starting again from scratch.
> I tried this and it is still doing it and one time it dropped a
> different form when I  saved it.

Dropped how?
Removed from the project, or deleted altogether?
Just re-add to the project (making sure there are no duplicate names)

Also, restore from backup or source control when it breaks :)
(I'll keep mentioning source control till you take the hint, everything 
you've said so far implies that you aren't using it.

-- 
Deanna Earley (dee.earley@icode.co.uk)
iCatcher Development Team
http://www.icode.co.uk/icatcher/

iCode Systems

(Replies direct to my email address will be printed, shredded then fed 
to the rats. Please reply to the group.)

[toc] | [prev] | [next] | [standalone]

#2124

On Mon, 19 May 2014 10:36:35 +0100, Deanna Earley
<dee.earley@icode.co.uk> wrote:

>On 19/05/2014 10:28, John Mott wrote:
>> Thanks for this info. I found the Karl Peterson fix a bit difficult to
>> figure out how to use, but in the meantime I had commented out all the
>> lines using Sendkeys as it was only a sophistication when entering
>> data to jump to the next text box once the previous one was fully
>> entered. The Enter key or the mouse do the same job and work quite OK.
>
>Surely as it's implemented in each control's event, what's wrong with 
>NextControl.SetFocus?

Good idea ! Fairly simple and I had not thought of this.
>
>> However I have now run into another crazy problem.
>> When saving the project it dropped one of the forms and when I re open
>> it the form is missing. I cannot see how to recover it other than
>> starting again from scratch.
>> I tried this and it is still doing it and one time it dropped a
>> different form when I  saved it.
>
>Dropped how?
>Removed from the project, or deleted altogether?
>Just re-add to the project (making sure there are no duplicate names)
>
>Also, restore from backup or source control when it breaks :)
>(I'll keep mentioning source control till you take the hint, everything 
>you've said so far implies that you aren't using it.

For some reason VB was mysteriously dropping the form from the
project.
It was late and I was suffering battle fatigue. Today I found the form
in a sub directory and added it back into the project successfully.

My method of source control consists of copious hand scrawled notes
and occassional backups to another file name. I had a search on the
web and saw quite a few source control programs such as VSS and GIT
but did not pursue the matter. What form of source control would you
recommend ?
Thanks for all your advise, I have re learned a lot and now have the
problem project running well.

John

[toc] | [prev] | [next] | [standalone]

#2126 — Re: Source control (Was: Visual Basic 5)

On 20/05/2014 09:32, John Mott wrote:
> On Mon, 19 May 2014 10:36:35 +0100, Deanna Earley
> <dee.earley@icode.co.uk> wrote:
>> Also, restore from backup or source control when it breaks :)
>> (I'll keep mentioning source control till you take the hint, everything
>> you've said so far implies that you aren't using it.
>
> My method of source control consists of copious hand scrawled notes
> and occassional backups to another file name. I had a search on the
> web and saw quite a few source control programs such as VSS and GIT
> but did not pursue the matter. What form of source control would you
> recommend ?

Personally I use Mercurial, but git is equally capable, and both are 
distributed so no need for a central server.

Check out hginit.com.

After each change (feature, bug fix, etc) do a commit. You can then 
easily see what has changed, and when something else goes wrong or is 
deleted, you can very easily revert.

-- 
Deanna Earley (dee.earley@icode.co.uk)
iCatcher Development Team
http://www.icode.co.uk/icatcher/

iCode Systems

(Replies direct to my email address will be printed, shredded then fed 
to the rats. Please reply to the group.)

[toc] | [prev] | [next] | [standalone]

#2128 — Re: Source control (Was: Visual Basic 5)

On Tue, 20 May 2014 10:19:32 +0100, Deanna Earley
<dee.earley@icode.co.uk> wrote:

>On 20/05/2014 09:32, John Mott wrote:
>> On Mon, 19 May 2014 10:36:35 +0100, Deanna Earley
>> <dee.earley@icode.co.uk> wrote:
>>> Also, restore from backup or source control when it breaks :)
>>> (I'll keep mentioning source control till you take the hint, everything
>>> you've said so far implies that you aren't using it.
>>
>> My method of source control consists of copious hand scrawled notes
>> and occassional backups to another file name. I had a search on the
>> web and saw quite a few source control programs such as VSS and GIT
>> but did not pursue the matter. What form of source control would you
>> recommend ?
>
>Personally I use Mercurial, but git is equally capable, and both are 
>distributed so no need for a central server.
>
>Check out hginit.com.
>
>After each change (feature, bug fix, etc) do a commit. You can then 
>easily see what has changed, and when something else goes wrong or is 
>deleted, you can very easily revert.

For the OP:

What follows assumes that you are essentially a hobbyist - a single
developer planning to stick with Visual Basic 5.0 to develop
applications for yourself and possibly friends 'n family. 

First Choice: Visual SourceSafe (VSS)

*IF* you already have it use it. It depends on what version of VB5
(and media) you have. It came with Visual Studio 97 "Advanced". It was
offered as an additional product on the VB5 SP3 CD - but not as part
of the SP3 download. If you do, install it off its separate CD, then
update it using the still available free VSS 6.0 Service Pack.

VSS has a lot of warts and is universally dismissed by most
professional developers. In fact there is an entire web site dedicated
to how horrible it is. <g>

The fact is they are right. VSS, in today's world, is a lousy choice
for a multiple-developer, distributed, complex SCCS.

However, it has one saving grace - it integrates seamlessly with the
Visual Basic IDE. Can be used as a simple Add On to the IDE, or with
an external client app. It is simple and performs the basic
requirements of a source code control system (SCCS) well. For someone
who has never used a SCCS before it makes an excellent introductory
tool.

[What follows is mostly a tie. It is just MHO and the fact SCCS's are
new to you that makes me rank marginally above the other.]

Second Choice: Subversion (via TortoiseSVN)
http://tortoisesvn.net/

It has the advantage of being free and mature. There are excellent
tutorials, several forums, and lots of help out there. The TortoiseSVN
client works via the Windows Explorer Shell - ie, if you can use
Explorer, you will be up and running pretty quickly. This metaphor
makes learning how to setup and configure a SCCS very easy.

[One word of warning. Due to the way the VBIDE manages its
files/resources - always close your VB Projects before you start
'managing' them.]

Third Choice: GIT 
http://git-scm.com/

Subversion has been superceded by this new kid on the block. In many
ways it is THE superior free SCCS - has many additional features not
found in other very expensive commercial packages. (Definitely
faster.) So why isn't it my pick over Subversion? Simply because it IS
'powerful' and 'new'. The Windows clients haven't quite caught up yet.
Still pretty much obvious Windows "Bolt-on's" of Unix-flavored tools
with frequent updates. They are excellent for someone who has used an
SCCS before and has an understanding of what they want to do, what all
the options are for, and the consequences of their decisions - but
makes it slightly daunting at first sight to someone who has never
used a SCCS before.

With that said, maybe that is exactly what you would like to play with
- a Full-blown Super-Duper SCCS, and thoroughly enjoy jumping right in
to sink or swim? If so get GIT. <bg>

-ralph

[toc] | [prev] | [next] | [standalone]

#2125

Eureka ! I now think I  have ironed out all the bugs and at last seem
to  have the project running OK under Win 7.
You were right, it is possible to run VB5 under Win7, it just requires
a few tweeks here and there !
Many thanks to you and others who have advised me over the last couple
of weeks. I have re learned a lot that I had forgotten over the past
15 years or so.

John


On Sun, 18 May 2014 04:14:17 -0500, ralph <nt_consulting@yahoo.com>
wrote:

>On Sun, 18 May 2014 16:05:50 +0800, John Mott <johnmott@iinet.net.au>
>wrote:
>>[...]
>>I then ran into another problem when trying to run the project.
>>Most of the functions I tried seem to be working but I am getting this
>>"Run Time Error '70' Permission Denied"
>>Which highlights this code.
>>
>>Private Sub txtFirst_Change()
>>If Len(txtFirst.Text) = 2 Then SendKeys "{TAB}", True
>>End Sub
>>
>>It looks like correct syntax to me so I have given up for the day and
>>gone to think about it.
>
>You're almost done.
>
>>If only I could find the correct version of COMCTL.OCX maybe my
>>problems would be solved.
>
>This error has nothing to do with Common Controls versions. 
>
>The older VB5/VB6 version of "SendKeys" is a problem, and needs to be
>replaced, on all Windows Platforms since Vista:
>
>http://answers.microsoft.com/en-us/windows/forum/windows_7-windows_programs/sendkeys-gets-error-70-permission-denied/6871a2b7-522f-494b-91f4-4e33cf02e6fc
>
>Karl Peterson's quick fix should fix it. The other links just pile on
>the details. <g>
>
>-ralph

[toc] | [prev] | [next] | [standalone]

#2121

On 17/05/2014 10:13, John Mott wrote:
> Thanks Deanna for your info about how tricky VB saves the Picture Box
> as a permanent change.
>
> Today I made a step forward. I opened the project in VB after stepping
> through the ten frm error messages and then on the Main form deleted
> the Picture Box and then added a new Status Bar which I had to
> configure to insert appropriate panels.
>
> It then appeared to run OK and did not give me the error about Panels
> on the StatusBar!
> It may be the long way around, but I think the easy way to get the
> whole project running may be to modify all the ten forms to delete the
> Picture Box and insert a new status bar.
> Will probably have another look at it tomorrow - At least I finally
> seem to be making progress.

You can edit them as text files and replace the class name, or do it on 
one and copy the control block from that to each other file.

-- 
Deanna Earley (dee.earley@icode.co.uk)
iCatcher Development Team
http://www.icode.co.uk/icatcher/

iCode Systems

(Replies direct to my email address will be printed, shredded then fed 
to the rats. Please reply to the group.)

[toc] | [prev] | [next] | [standalone]

#2116

Any help from this?

The Windows common controls have been upgraded to include new controls and 
functions and to use new file names.

Visual Basic version 6.0 ships with two versions of the Windows common 
controls. The first version is for backward compatibility only and should be 
used when you do not want to upgrade an existing application to use the new 
version.

Why Upgrade?
Visual Basic version 5.X common controls were contained in two .OCX files: 
ComCtl32.ocx and ComCt232.ocx. Both of these files called into the 
ComCtl32.dll file, a system file, for functionality. The new control 
versions are contained in two new files: MsComCtl.ocx and MsComCt2.ocx. 
Neither of these files are linked to the ComCtl32.dll file. Besides the new 
controls added to these files, another reason for upgrading is easier 
distribution and maintenance. The file changes are summarized below:

      Old File Name New File Name
      ComCtl32.ocx MsComctl.ocx
      ComCt232.ocx MsComct2.ocx
      ComCtl32.dll -- This file is not needed.

/Henning


"John Mott" <johnmott@iinet.net.au> skrev i meddelandet 
news:h1d6n991h1dk4g25s6o89dcalss7dkrr5p@4ax.com...
>I did download and install this, and then tried to load the project
> but it still came up with ocx error messages,  so I used a text editor
> to delete them and used the Project References to make new references.
> I am not very familiar with this process so may have bungled.
> It then loaded with just one error message written to the log of one
> form only saying method or data member not found.
>
> In the window on the left side of the VB IDE it shows the controls
> available and only seems to show a limited number which does not
> include the Status Bar control and I cannot see how to add it.
>
> After messing about for a while, I got a bit confused so finished up
> doing a System Restore and will start again tomorrow.
>
> Maybe I would get a better result by transferring and registering the
> old ocx files from the drive which has the old XP files.
>
> John
>
> On Tue, 13 May 2014 13:24:46 -0500, ralph <nt_consulting@yahoo.com>
> wrote:
>
>>On Tue, 13 May 2014 09:36:22 -0500, ralph <nt_consulting@yahoo.com>
>>wrote:
>>
>>A couple of thousand words and still mess-up ... lol
>>
>>Forget copying the components over - You can get all the updates in
>>one swoop ...
>>
>>"Microsoft Visual Basic 6.0 Common Controls"
>>http://www.microsoft.com/en-us/download/details.aspx?id=10019
>>
>>Never paid attention before, but this updates BOTH the mscomctl.ocx
>>AND the comctl32.ocx.
>>
>>Download and install.
>>
>>-ralph 

[toc] | [prev] | [next] | [standalone]

#2047

I don't remember why I have this, but at some point I
wrote a small TLB register-er that I keep on my Desktop
for drag-drop. The whole thin is in the single, small .BAS
reprinted below. (A heck of a lot less trouble than installing
1/2 GB of .Net frammework. :)

'----------------------------------------------
Option Explicit

Private Type GUID
    Data1 As Long
    Data2 As Integer
    Data3 As Integer
    Data4(0 To 7) As Byte
End Type
Private Enum eSYSKIND
   SYS_WIN16 = 0&
   SYS_WIN32 = 1&
   SYS_MAC = 2&
End Enum

Private Declare Function LoadTypeLib Lib "oleaut32.dll" ( _
    pFileName As Byte, pptlib As Object) As Long
Private Declare Function RegisterTypeLib Lib "oleaut32.dll" ( _
    ByVal ptlib As Object, szFullPath As Byte, _
    szHelpFile As Byte) As Long
Private Declare Function UnRegisterTypeLib Lib "oleaut32.dll" ( _
      libID As GUID, _
      ByVal wVerMajor As Integer, _
      ByVal wVerMinor As Integer, _
      ByVal lCID As Long, _
      ByVal tSysKind As eSYSKIND _
   ) As Long
Private Declare Function CLSIDFromString Lib "ole32.dll" (lpsz As Byte, 
pclsid As GUID) As Long

Public Sub Main()
  Dim sCom As String, sFil As String, sCLSID As String, sParam As String
  Dim ALib() As Byte
  Dim LRet As Long
  Dim Otlb As Object
  Dim cTLI As TypeLibInfo
  Dim tGUID As GUID
  Dim iMajor As Integer, iMinor As Integer
  Dim lCID As Long
      sCom = Command$
   On Error Resume Next
    If Len(sCom) < 4 Then ErrMsg "Command line required."

  sParam = UCase$(Right$(sCom, 3))
  If sParam <> " /R" And sParam <> " /U" Then
    sFil = sCom
     LRet = MsgBox("Click YES to register, NO to unregister.", 35, "TLBReg")
    Select Case LRet
      Case 7
        sParam = " /U"
      Case 6
        sParam = " /R"
      Case Else
        End
    End Select
  Else
    sFil = Left$(sCom, Len(sCom) - 3)
  End If

    If FileExists(sFil) = False Then ErrMsg "Command line invalid. File not 
found."
    If UCase$(Right$(sFil, 4)) <> ".TLB" Then ErrMsg "Command line invalid. 
File not a .tlb file."

   Select Case sParam
     Case " /R"
       ALib = sFil & vbNullChar
          ' Pass first byte of array
       LRet = LoadTypeLib(ALib(0), Otlb)
         If LRet <> 0 Then ErrMsg "LoadTypeLib failed with error " & 
CStr(LRet)

       LRet = RegisterTypeLib(Otlb, ALib(0), 0)
         If LRet = 0 Then
           ErrMsg "Success."
         Else
           ErrMsg "RegisterTypeLib failed with error " & CStr(LRet)
         End If

     Case " /U"
       Set cTLI = TLI.TypeLibInfoFromFile(sFil)
        sCLSID = cTLI.GUID
        iMajor = cTLI.MajorVersion
        iMinor = cTLI.MinorVersion
        lCID = cTLI.lCID
      Set cTLI = Nothing

      ALib = sCLSID & vbNullChar
      LRet = CLSIDFromString(ALib(0), tGUID)
        If LRet = 0 Then LRet = UnRegisterTypeLib(tGUID, iMajor, iMinor, 
lCID, SYS_WIN32)
      If LRet = 0 Then
         ErrMsg "Success."
      Else
         ErrMsg "UnRegisterTypeLib failed with error " & CStr(LRet)
      End If
   End Select

End Sub

Private Function FileExists(ByVal sPath As String) As Boolean
  Dim i As Integer
  On Error Resume Next
 Err.Clear
   FileExists = False
   i = GetAttr(sPath)
     If (Err = 0) Then
        If (i And vbDirectory) = 0 Then
            FileExists = True
        End If
     End If
    Err.Clear
End Function

Private Sub ErrMsg(sErr As String)
    MsgBox sErr, 64, "TLBReg"
    End
End Sub

[toc] | [prev] | [next] | [standalone]

#2048

John,

Last year, here in the USA, when we did the fall time change, the next 
morning VB6 would not load.  Turned out it had something to do with Daylight 
Savings Time which was on Nov 3, 2013.  I changed the date to the 2nd and 
VB6 would load correctly.  I could then change the date back to the correct 
one and VB6 would continue to run.  I had to repeat the date change trick 
every time I re-started my computer.

The permanent fix was the same one as already suggested:
' x64   ' cd C:\Windows\SysWOW64\regtlib msdatsrc.tlb
' x86   ' cd C:\Windows\System32\regtlib msdatsrc.tlb    'this is the one I 
used

If regtlib.exe is not on your system, you might try searching Google.  I see 
lots of suggestions there.

-Bill




------------- Original Message -------------

"John Mott"  wrote in message 
news:20sbm95fdndeum895up5kb276jmjnodeub@4ax.com...

I tried this solution, but got an error message saying

"regtlib is not recognised as an internal or external command,
operation, program or batch file"

John

On Fri, 02 May 2014 15:27:36 -0400, RW <RonW@no_domain.invalid> wrote:

>On Fri, 02 May 2014 17:02:14 +0800, John Mott <johnmott@iinet.net.au>
>wrote:
>
>>I found that VB5 apparently installed on Win 7 successfully, but will
>>not run properly.
>>Any suggestions gratefully appreciated.
>>
>>John
>
>Is version 10 (or higher) of Internet Explorer installed? There were
>issues with IE10 "breaking" certain OCXs. You probably can find the
>details -- and fixes -- with a few quick web searches. When I got bit
>I just rolled back the Windows update that installed IE10 and then hid
>that update so as not to accidentally apply it again. Since I don't
>use IE anyway sticking on version 9 was no big deal for me.
>
>Also, there's this advice from microsoft.public.vb.general.discussion:
>
>"Open an elevated cmd prompt and change to the \Windows\System32
>folder (for 32-bit) or the \Windows\SysWOW64 folder (for 64-bit).
>
>Once in the correct folder, enter the following command:
>
>regtlib msdatsrc.tlb
>
>You should get a "Registration of msdatsrc.tlb successful." message.
>After that, MSCOMCTL.OCX and MSCOMCT2.OCX work normally." 

[toc] | [prev] | [standalone]

Page 3 of 3 — ← Prev page 1 2 [3]

Back to top | Article view | comp.lang.basic.visual.misc

csiph-web