Visual Basic - Adding an item to R-Click context menu

Author

Adding an item to R-Click context menu

LuckyStrike

2004-09-01, 8:55 pm

Don't know if this is the proper NG for this question; if not, please advise
which NG would be correct for such a query. :-)

OS: W98se/IE6-SP-1 fully patched.

Is it possible to add (a pointer to) the *Security Tab* from IE Options to
the R-Click context menu? I am surfing with Active Scripting disabled 99% of
the time. It is a hassle when having to enable active scripting even though
I have made a IE Options shortcut on the Quick Launch Toolbar. It still
involves a few motions and clicks too many as far as I am concerned.

If it is possible, might I be pointed to the place where that can be learned
if the instructions would be to complex or long to reply with in this
newsgroup. I am hoping my question was worded clearly enough to describe
what it is I'd like to accomplish.

Ferris...? Someone...? Anyone...? <g>

Thanks,
--

LuckyStrike
LS@smokedamagedfurniture.youcandriveitawaytoday.com

How to make a good newsgroup post:
http://www.dts-l.org/goodpost.htm
------------------------------------------------------------

Randy Birch

2004-09-01, 8:55 pm

How about making a tiny VB exe on your desktop or system tray that simply
executes:

Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
vbNormalFocus

--

Randy Birch
MVP Visual Basic
http://vbnet.mvps.org/
Please respond only to the newsgroups so all can benefit.

"LuckyStrike" <LS@smokedamagedfurniture.youcandriveitawaytoday.com> wrote in
message news:uc%23RIjHkEHA.1040@TK2MSFTNGP10.phx.gbl...
: Don't know if this is the proper NG for this question; if not, please
advise
: which NG would be correct for such a query. :-)
:
: OS: W98se/IE6-SP-1 fully patched.
:
: Is it possible to add (a pointer to) the *Security Tab* from IE Options to
: the R-Click context menu? I am surfing with Active Scripting disabled 99%
of
: the time. It is a hassle when having to enable active scripting even
though
: I have made a IE Options shortcut on the Quick Launch Toolbar. It still
: involves a few motions and clicks too many as far as I am concerned.
:
: If it is possible, might I be pointed to the place where that can be
learned
: if the instructions would be to complex or long to reply with in this
: newsgroup. I am hoping my question was worded clearly enough to describe
: what it is I'd like to accomplish.
:
: Ferris...? Someone...? Anyone...? <g>
:
:
: Thanks,
: --
:
: LuckyStrike
: LS@smokedamagedfurniture.youcandriveitawaytoday.com
:
: How to make a good newsgroup post:
: http://www.dts-l.org/goodpost.htm
: ------------------------------------------------------------
:
:

LuckyStrike

2004-09-02, 3:55 am

Hi Randy,

Well, you make it sound so simple. Of course as simple as it is, it isn't as
simple as I am. <g> The only script I've ever done was in Outlook2002 to
make an AVG antivirus scan button. So, as you can see, my skills - if you
want to call 'em that - are less than adequate to fully understand the
means by which to implement that which you've offered.

So, if I may ask, would I need to install or use something like this to
accomplish that which I s

to do?
http://www.mvps.org/vb/index2.html?tips/shellcpl.htm
http://www.mvps.org/vb/samples.htm#Shell32

Please be so kind as to excuse my ignorance in such matters.

Thanks again,
--

LuckyStrike
LS@smokedamagedfurniture.youcandriveitawaytoday.com

How to make a good newsgroup post:
http://www.dts-l.org/goodpost.htm
------------------------------------------------------------
"Randy Birch" <rgb_removethis@mvps.org> wrote in message
news:%23aIedvHkEHA.2140@TK2MSFTNGP15.phx.gbl...
> How about making a tiny VB exe on your desktop or system tray that simply
> executes:
>
> Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
> vbNormalFocus
>
> --
>
> Randy Birch
> MVP Visual Basic
> http://vbnet.mvps.org/
> Please respond only to the newsgroups so all can benefit.
>
>
> "LuckyStrike" wrote in
> message news:uc%23RIjHkEHA.1040@TK2MSFTNGP10.phx.gbl...
<snipped>
> :
> : OS: W98se/IE6-SP-1 fully patched.
> :
> : Is it possible to add (a pointer to) the *Security Tab* from IE Options
to
> : the R-Click context menu? I am surfing with Active Scripting disabled
99%
> of
> : the time. It is a hassle when having to enable active scripting even
> though
> : I have made a IE Options shortcut on the Quick Launch Toolbar. It still
> : involves a few motions and clicks too many as far as I am concerned.
> :
<snipped>
> :
> : Thanks,
> : --
> : LuckyStrike
> : LS@smokedamagedfurniture.youcandriveitawaytoday.com
> : ------------------------------------------------------------

Randy Birch

2004-09-02, 3:55 am

Yea, that first link is pretty well all you need. Start a new VB project,
remove the form, add a bas module, open the bas module in code view, go to
tools > add procedure and add a new sub and name it Main (important), then
past into Sub Main (all on one line)

Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
vbNormalFocus

That's it. Run the app (Run > start with full compile) and the control
panel should open to the security page (1=security, 0=general, etc). Then
just make an exe (File > make exe), and be sure to set the startup object as
Sub Main, and save the exe wherever (I use a \windows\utils folder for stuff
like this), and create a shortcut to the exe and place it on your desktop.
Done. Double clicking will execute Sub Main, which will launch the control
panel applet. If you want to assign your own icon you could add a resource
file, or a form with the icon assigned to the Icon property and set that
icon in the make exe dialog.

If you want to go further -- place an icon in the systray and on clicking it
show the panel -- the concept is the same but you'd require a form in the
app as well as the bas module (it can remain hidden) in order to receive the
mouse events over the systray icon -- see the subclassing section on my site
for the minimal code to place an icon in the systray
(http://vbnet.mvps.org/code/subclass...notifybasic.htm).

The changes you would make to the app is (and I'm going of the top of my
head here ...):

- in Sub Main call the code to Load Form1, but don't show it (eg no Form1
show)
- move the Shell code to a new procedure in the bas module, Private Sub
ShowPanel
- in the load event of the form call the routine that adds the icon to the
systray
- in the form unload event, call the routine that removes the icon
- in the bas module's WindowProc subclassing routine, where the mouse click
code is use:
Call ShowPanel
... rather than the menu code that's in the site demo

When you make the app keep Sub Main as the startup object - it's only code
would be:

Load Form1

Form1's only code would be:

Private Sub Form_Load()
If ShellTrayAdd = 1 Then
SubClass Form1.hwnd
End If
End Sub

Private Sub Form_Unload(Cancel As Integer)
ShellTrayRemove
UnSubClass
End Sub

.... plus the ShellTrayAdd and ShellTrayRemove routines.

The code change in WindowProc would be

Call ShowPanel

instead of

Form1.PopupMenu .zmnuDemo

I suggest - if you want to go the systray route - you first construct the
site demo exactly as it is shown, then once you get the hang of what's going
on you can start to make changes. This is a 10 minute app once you've got
the basics down.

The only thing (with the subclassed demo) that you **have** to pay attention
to is:

- in the WindowProc routine ensure all Form1 references are changed to the
name you decide to use for the your form

- **always** use start with full compile to run the app -- this will catch
errors before you run into them executing the app. Subclassed apps die
horrible deaths when an error occurs while the subclassing is active!

--

Randy Birch
MVP Visual Basic
http://vbnet.mvps.org/
Please respond only to the newsgroups so all can benefit.

"LuckyStrike" <LS@smokedamagedfurniture.youcandriveitawaytoday.com> wrote in
message news:%23GO1QhIkEHA.2696@TK2MSFTNGP10.phx.gbl...
: Hi Randy,
:
: Well, you make it sound so simple. Of course as simple as it is, it isn't
as
: simple as I am. <g> The only script I've ever done was in Outlook2002 to
: make an AVG antivirus scan button. So, as you can see, my skills - if you
: want to call 'em that - are less than adequate to fully understand the
: means by which to implement that which you've offered.
:
: So, if I may ask, would I need to install or use something like this to
: accomplish that which I s

to do?
: http://www.mvps.org/vb/index2.html?tips/shellcpl.htm
: http://www.mvps.org/vb/samples.htm#Shell32
:
: Please be so kind as to excuse my ignorance in such matters.
:
: Thanks again,
: --
:
: LuckyStrike
: LS@smokedamagedfurniture.youcandriveitawaytoday.com
:
: How to make a good newsgroup post:
: http://www.dts-l.org/goodpost.htm
: ------------------------------------------------------------
: "Randy Birch" <rgb_removethis@mvps.org> wrote in message
: news:%23aIedvHkEHA.2140@TK2MSFTNGP15.phx.gbl...
: > How about making a tiny VB exe on your desktop or system tray that
simply
: > executes:
: >
: > Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
: > vbNormalFocus
: >
: > --
: >
: > Randy Birch
: > MVP Visual Basic
: > http://vbnet.mvps.org/
: > Please respond only to the newsgroups so all can benefit.
: >
: >
: > "LuckyStrike" wrote in
: > message news:uc%23RIjHkEHA.1040@TK2MSFTNGP10.phx.gbl...
: <snipped>
: > :
: > : OS: W98se/IE6-SP-1 fully patched.
: > :
: > : Is it possible to add (a pointer to) the *Security Tab* from IE
Options
: to
: > : the R-Click context menu? I am surfing with Active Scripting disabled
: 99%
: > of
: > : the time. It is a hassle when having to enable active scripting even
: > though
: > : I have made a IE Options shortcut on the Quick Launch Toolbar. It
still
: > : involves a few motions and clicks too many as far as I am concerned.
: > :
: <snipped>
: > :
: > : Thanks,
: > : --
: > : LuckyStrike
: > : LS@smokedamagedfurniture.youcandriveitawaytoday.com
: > : ------------------------------------------------------------
:
:

LuckyStrike

2004-09-02, 3:55 am

Aha! See? I knew it would be complex... more than you initially let on.
<vbg> OK Randy, it's going to take me a while to translate that into a
language I can understand (English. hehe). You've put a lot of effort into
explaining it to me. Inasmuch as I haven't really got a clue, it's going to
take me a lot longer than the time it took you compiling it for me to
understand it. I will return as soon as I *Think* that I may have an
inkling... <vbs>

Now, what do I need to start a VB project? You mean to put that command into
WordPad and saving it as an executable I think. Oh .... I am lost. I better
take some time to read that which you've written before looking completely
dumb. (I'm ashamed to admit that I'm inept in this field.)

Thanks anyway,
--

LuckyStrike
LS@smokedamagedfurniture.youcandriveitawaytoday.com

How to make a good newsgroup post:
http://www.dts-l.org/goodpost.htm
------------------------------------------------------------
"Randy Birch" <rgb_removethis@mvps.org> wrote in message
news:%2355LH6IkEHA.3348@TK2MSFTNGP12.phx.gbl...
> Yea, that first link is pretty well all you need. Start a new VB project,
> remove the form, add a bas module, open the bas module in code view, go to
> tools > add procedure and add a new sub and name it Main (important), then
> past into Sub Main (all on one line)
>
> Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
> vbNormalFocus
>
> That's it. Run the app (Run > start with full compile) and the control
> panel should open to the security page (1=security, 0=general, etc). Then
> just make an exe (File > make exe), and be sure to set the startup object
as
> Sub Main, and save the exe wherever (I use a \windows\utils folder for
stuff
> like this), and create a shortcut to the exe and place it on your desktop.
> Done. Double clicking will execute Sub Main, which will launch the
control
> panel applet. If you want to assign your own icon you could add a resource
> file, or a form with the icon assigned to the Icon property and set that
> icon in the make exe dialog.
>
> If you want to go further -- place an icon in the systray and on clicking
it
> show the panel -- the concept is the same but you'd require a form in the
> app as well as the bas module (it can remain hidden) in order to receive
the
> mouse events over the systray icon -- see the subclassing section on my
site
> for the minimal code to place an icon in the systray
> (http://vbnet.mvps.org/code/subclass...notifybasic.htm).
>
> The changes you would make to the app is (and I'm going of the top of my
> head here ...):
>
> - in Sub Main call the code to Load Form1, but don't show it (eg no Form1
> show)
> - move the Shell code to a new procedure in the bas module, Private Sub
> ShowPanel
> - in the load event of the form call the routine that adds the icon to the
> systray
> - in the form unload event, call the routine that removes the icon
> - in the bas module's WindowProc subclassing routine, where the mouse
click
> code is use:
> Call ShowPanel
> ... rather than the menu code that's in the site demo
>
> When you make the app keep Sub Main as the startup object - it's only code
> would be:
>
> Load Form1
>
> Form1's only code would be:
>
> Private Sub Form_Load()
> If ShellTrayAdd = 1 Then
> SubClass Form1.hwnd
> End If
> End Sub
>
> Private Sub Form_Unload(Cancel As Integer)
> ShellTrayRemove
> UnSubClass
> End Sub
>
> ... plus the ShellTrayAdd and ShellTrayRemove routines.
>
> The code change in WindowProc would be
>
> Call ShowPanel
>
> instead of
>
> Form1.PopupMenu .zmnuDemo
>
> I suggest - if you want to go the systray route - you first construct the
> site demo exactly as it is shown, then once you get the hang of what's
going
> on you can start to make changes. This is a 10 minute app once you've got
> the basics down.
>
> The only thing (with the subclassed demo) that you **have** to pay
attention
> to is:
>
> - in the WindowProc routine ensure all Form1 references are changed to
the
> name you decide to use for the your form
>
> - **always** use start with full compile to run the app -- this will catch
> errors before you run into them executing the app. Subclassed apps die
> horrible deaths when an error occurs while the subclassing is active!
>
> --
>
> Randy Birch
> MVP Visual Basic
> http://vbnet.mvps.org/
> Please respond only to the newsgroups so all can benefit.
>
>
> "LuckyStrike" wrote in
> message news:%23GO1QhIkEHA.2696@TK2MSFTNGP10.phx.gbl...
> : Hi Randy,
> :
> : Well, you make it sound so simple. Of course as simple as it is, it
isn't
> as
> : simple as I am. <g> The only script I've ever done was in Outlook2002 to
> : make an AVG antivirus scan button. So, as you can see, my skills - if
you
> : want to call 'em that - are less than adequate to fully understand the
> : means by which to implement that which you've offered.
> :
> : So, if I may ask, would I need to install or use something like this to
> : accomplish that which I s

to do?
> : http://www.mvps.org/vb/index2.html?tips/shellcpl.htm
> : http://www.mvps.org/vb/samples.htm#Shell32
> :
> : Please be so kind as to excuse my ignorance in such matters.
> :
> : Thanks again,
> : --
> : LuckyStrike
> : ------------------------------------------------------------
> : "Randy Birch" <rgb_removethis@mvps.org> wrote in message
> : news:%23aIedvHkEHA.2140@TK2MSFTNGP15.phx.gbl...
> : > How about making a tiny VB exe on your desktop or system tray that
> simply
> : > executes:
> : >
> : > Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
> : > vbNormalFocus
> : >
> : > --
> : >
> : > Randy Birch
> : > MVP Visual Basic
> : > http://vbnet.mvps.org/
> : > Please respond only to the newsgroups so all can benefit.
> : >
> : >
> : > "LuckyStrike" wrote in
> : > message news:uc%23RIjHkEHA.1040@TK2MSFTNGP10.phx.gbl...
> : <snipped>
> : > :
> : > : OS: W98se/IE6-SP-1 fully patched.
> : > :
> : > : Is it possible to add (a pointer to) the *Security Tab* from IE
> Options
> : to
> : > : the R-Click context menu? I am surfing with Active Scripting
disabled
> : 99%
> : > of
> : > : the time. It is a hassle when having to enable active scripting even
> : > though
> : > : I have made a IE Options shortcut on the Quick Launch Toolbar. It
> still
> : > : involves a few motions and clicks too many as far as I am concerned.
> : > :
> : <snipped>
> : > :
> : > : Thanks, LuckyStrike
> : > : ------------------------------------------------------------

Randy Birch

2004-09-02, 3:55 am

For the simple example, this is the entire code ...

Private Sub Main()

Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
vbNormalFocus

End Sub

Done. Fini.

As long as you remove the default form (select in project explorer, right
click, remove, don't save changes) and set project>properties>startup to Sub
Main in your newly-added BAS module you're in business.

--

Randy Birch
MVP Visual Basic
http://vbnet.mvps.org/
Please respond only to the newsgroups so all can benefit.

"LuckyStrike" <LS@smokedamagedfurniture.youcandriveitawaytoday.com> wrote in
message news:OMepGDJkEHA.2680@TK2MSFTNGP15.phx.gbl...
: Aha! See? I knew it would be complex... more than you initially let on.
: <vbg> OK Randy, it's going to take me a while to translate that into a
: language I can understand (English. hehe). You've put a lot of effort into
: explaining it to me. Inasmuch as I haven't really got a clue, it's going
to
: take me a lot longer than the time it took you compiling it for me to
: understand it. I will return as soon as I *Think* that I may have an
: inkling... <vbs>
:
: Now, what do I need to start a VB project? You mean to put that command
into
: WordPad and saving it as an executable I think. Oh .... I am lost. I
better
: take some time to read that which you've written before looking completely
: dumb. (I'm ashamed to admit that I'm inept in this field.)
:
: Thanks anyway,
: --
:
: LuckyStrike
: LS@smokedamagedfurniture.youcandriveitawaytoday.com
:
: How to make a good newsgroup post:
: http://www.dts-l.org/goodpost.htm
: ------------------------------------------------------------
: "Randy Birch" <rgb_removethis@mvps.org> wrote in message
: news:%2355LH6IkEHA.3348@TK2MSFTNGP12.phx.gbl...
: > Yea, that first link is pretty well all you need. Start a new VB
project,
: > remove the form, add a bas module, open the bas module in code view, go
to
: > tools > add procedure and add a new sub and name it Main (important),
then
: > past into Sub Main (all on one line)
: >
: > Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
: > vbNormalFocus
: >
: > That's it. Run the app (Run > start with full compile) and the control
: > panel should open to the security page (1=security, 0=general, etc).
Then
: > just make an exe (File > make exe), and be sure to set the startup
object
: as
: > Sub Main, and save the exe wherever (I use a \windows\utils folder for
: stuff
: > like this), and create a shortcut to the exe and place it on your
desktop.
: > Done. Double clicking will execute Sub Main, which will launch the
: control
: > panel applet. If you want to assign your own icon you could add a
resource
: > file, or a form with the icon assigned to the Icon property and set that
: > icon in the make exe dialog.
: >
: > If you want to go further -- place an icon in the systray and on
clicking
: it
: > show the panel -- the concept is the same but you'd require a form in
the
: > app as well as the bas module (it can remain hidden) in order to receive
: the
: > mouse events over the systray icon -- see the subclassing section on my
: site
: > for the minimal code to place an icon in the systray
: > (http://vbnet.mvps.org/code/subclass...notifybasic.htm).
: >
: > The changes you would make to the app is (and I'm going of the top of my
: > head here ...):
: >
: > - in Sub Main call the code to Load Form1, but don't show it (eg no
Form1
: > show)
: > - move the Shell code to a new procedure in the bas module, Private Sub
: > ShowPanel
: > - in the load event of the form call the routine that adds the icon to
the
: > systray
: > - in the form unload event, call the routine that removes the icon
: > - in the bas module's WindowProc subclassing routine, where the mouse
: click
: > code is use:
: > Call ShowPanel
: > ... rather than the menu code that's in the site demo
: >
: > When you make the app keep Sub Main as the startup object - it's only
code
: > would be:
: >
: > Load Form1
: >
: > Form1's only code would be:
: >
: > Private Sub Form_Load()
: > If ShellTrayAdd = 1 Then
: > SubClass Form1.hwnd
: > End If
: > End Sub
: >
: > Private Sub Form_Unload(Cancel As Integer)
: > ShellTrayRemove
: > UnSubClass
: > End Sub
: >
: > ... plus the ShellTrayAdd and ShellTrayRemove routines.
: >
: > The code change in WindowProc would be
: >
: > Call ShowPanel
: >
: > instead of
: >
: > Form1.PopupMenu .zmnuDemo
: >
: > I suggest - if you want to go the systray route - you first construct
the
: > site demo exactly as it is shown, then once you get the hang of what's
: going
: > on you can start to make changes. This is a 10 minute app once you've
got
: > the basics down.
: >
: > The only thing (with the subclassed demo) that you **have** to pay
: attention
: > to is:
: >
: > - in the WindowProc routine ensure all Form1 references are changed to
: the
: > name you decide to use for the your form
: >
: > - **always** use start with full compile to run the app -- this will
catch
: > errors before you run into them executing the app. Subclassed apps die
: > horrible deaths when an error occurs while the subclassing is active!
: >
: > --
: >
: > Randy Birch
: > MVP Visual Basic
: > http://vbnet.mvps.org/
: > Please respond only to the newsgroups so all can benefit.
: >
: >
: > "LuckyStrike" wrote in
: > message news:%23GO1QhIkEHA.2696@TK2MSFTNGP10.phx.gbl...
: > : Hi Randy,
: > :
: > : Well, you make it sound so simple. Of course as simple as it is, it
: isn't
: > as
: > : simple as I am. <g> The only script I've ever done was in Outlook2002
to
: > : make an AVG antivirus scan button. So, as you can see, my skills - if
: you
: > : want to call 'em that - are less than adequate to fully understand
the
: > : means by which to implement that which you've offered.
: > :
: > : So, if I may ask, would I need to install or use something like this
to
: > : accomplish that which I s

to do?
: > : http://www.mvps.org/vb/index2.html?tips/shellcpl.htm
: > : http://www.mvps.org/vb/samples.htm#Shell32
: > :
: > : Please be so kind as to excuse my ignorance in such matters.
: > :
: > : Thanks again,
: > : --
: > : LuckyStrike
: > : ------------------------------------------------------------
: > : "Randy Birch" <rgb_removethis@mvps.org> wrote in message
: > : news:%23aIedvHkEHA.2140@TK2MSFTNGP15.phx.gbl...
: > : > How about making a tiny VB exe on your desktop or system tray that
: > simply
: > : > executes:
: > : >
: > : > Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
: > : > vbNormalFocus
: > : >
: > : > --
: > : >
: > : > Randy Birch
: > : > MVP Visual Basic
: > : > http://vbnet.mvps.org/
: > : > Please respond only to the newsgroups so all can benefit.
: > : >
: > : >
: > : > "LuckyStrike" wrote in
: > : > message news:uc%23RIjHkEHA.1040@TK2MSFTNGP10.phx.gbl...
: > : <snipped>
: > : > :
: > : > : OS: W98se/IE6-SP-1 fully patched.
: > : > :
: > : > : Is it possible to add (a pointer to) the *Security Tab* from IE
: > Options
: > : to
: > : > : the R-Click context menu? I am surfing with Active Scripting
: disabled
: > : 99%
: > : > of
: > : > : the time. It is a hassle when having to enable active scripting
even
: > : > though
: > : > : I have made a IE Options shortcut on the Quick Launch Toolbar. It
: > still
: > : > : involves a few motions and clicks too many as far as I am
concerned.
: > : > :
: > : <snipped>
: > : > :
: > : > : Thanks, LuckyStrike
: > : > : ------------------------------------------------------------
:
:

LuckyStrike

2004-09-02, 3:55 am

Ok maybe getting a bit closer (maybe) First, I assume to need to use MS
Word>Tools>Macro>Visual basic editor.

Then.... I'll get back to you. ;-)
--
LuckyStrike
LS@smokedamagedfurniture.youcandriveitawaytoday.com
------------------------------------------------------------

"Randy Birch" <rgb_removethis@mvps.org> wrote in message
news:%2355LH6IkEHA.3348@TK2MSFTNGP12.phx.gbl...
> Yea, that first link is pretty well all you need. Start a new VB project,
> remove the form, add a bas module, open the bas module in code view, go to
> tools > add procedure and add a new sub and name it Main (important), then
> past into Sub Main (all on one line)
>
> Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
> vbNormalFocus
>
> That's it. <snipped to save bandwidth> --
>
> Randy Birch
> MVP Visual Basic
> http://vbnet.mvps.org/
> Please respond only to the newsgroups so all can benefit.
>
>
> "LuckyStrike" wrote in
> message news:%23GO1QhIkEHA.2696@TK2MSFTNGP10.phx.gbl...
> : Hi Randy,
> :
> : Well, you make it sound so simple. Of course as simple as it is, it
isn't
> as
> : simple as I am. <g> The only script I've ever done was in Outlook2002 to
> : make an AVG antivirus scan button. So, as you can see, my skills - if
you
> : want to call 'em that - are less than adequate to fully understand the
> : means by which to implement that which you've offered.
> :
<snipped for brevity>

Randy Birch

2004-09-02, 3:55 am

------ entire BAS file - save as Module1.bas --------

<---cut--->
Attribute VB_Name = "Module1"
Option Explicit

Private Sub Main()

Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
vbNormalFocus

End Sub
<---cut--->

------ entire VBP file - save as Project1.vbp (watch for line wrapping on
the Reference line - the last word in that line is 'Automation'--------

<---cut--->
Type=Exe
Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#..\..\..\WINDOWS\System32\STDOLE2.TLB#OLE
Automation
Module=Module1; Module1.bas
Startup="Sub Main"
HelpFile=""
Title="Project1"
ExeName32="Project1.exe"
Command32=""
Name="Project1"
HelpContextID="0"
CompatibleMode="0"
MajorVer=1
MinorVer=0
RevisionVer=0
AutoIncrementVer=0
ServerSupportFiles=0
CompilationType=-1
OptimizationType=0
FavorPentiumPro(tm)=0
CodeViewDebugInfo=0
NoAliasing=0
BoundsCheck=0
OverflowCheck=0
FlPointCheck=0
FDIVCheck=0
UnroundedFP=0
StartMode=0
Unattended=0
Retained=0
ThreadPerObject=0
MaxNumberOfThreads=1
<---cut--->

--

Randy Birch
MVP Visual Basic
http://vbnet.mvps.org/
Please respond only to the newsgroups so all can benefit.

"Randy Birch" <rgb_removethis@mvps.org> wrote in message
news:eMcs4JJkEHA.2908@TK2MSFTNGP10.phx.gbl...
: For the simple example, this is the entire code ...
:
: Private Sub Main()
:
: Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
: vbNormalFocus
:
: End Sub
:
: Done. Fini.
:
: As long as you remove the default form (select in project explorer, right
: click, remove, don't save changes) and set project>properties>startup to
Sub
: Main in your newly-added BAS module you're in business.
:
: --
:
: Randy Birch
: MVP Visual Basic
: http://vbnet.mvps.org/
: Please respond only to the newsgroups so all can benefit.
:
:
: "LuckyStrike" <LS@smokedamagedfurniture.youcandriveitawaytoday.com> wrote
in
: message news:OMepGDJkEHA.2680@TK2MSFTNGP15.phx.gbl...
:: Aha! See? I knew it would be complex... more than you initially let on.
:: <vbg> OK Randy, it's going to take me a while to translate that into a
:: language I can understand (English. hehe). You've put a lot of effort
into
:: explaining it to me. Inasmuch as I haven't really got a clue, it's going
: to
:: take me a lot longer than the time it took you compiling it for me to
:: understand it. I will return as soon as I *Think* that I may have an
:: inkling... <vbs>
::
:: Now, what do I need to start a VB project? You mean to put that command
: into
:: WordPad and saving it as an executable I think. Oh .... I am lost. I
: better
:: take some time to read that which you've written before looking
completely
:: dumb. (I'm ashamed to admit that I'm inept in this field.)
::
:: Thanks anyway,
:: --
::
:: LuckyStrike
:: LS@smokedamagedfurniture.youcandriveitawaytoday.com
::
:: How to make a good newsgroup post:
:: http://www.dts-l.org/goodpost.htm
:: ------------------------------------------------------------
:: "Randy Birch" <rgb_removethis@mvps.org> wrote in message
:: news:%2355LH6IkEHA.3348@TK2MSFTNGP12.phx.gbl...
:: > Yea, that first link is pretty well all you need. Start a new VB
: project,
:: > remove the form, add a bas module, open the bas module in code view, go
: to
:: > tools > add procedure and add a new sub and name it Main (important),
: then
:: > past into Sub Main (all on one line)
:: >
:: > Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
:: > vbNormalFocus
:: >
:: > That's it. Run the app (Run > start with full compile) and the control
:: > panel should open to the security page (1=security, 0=general, etc).
: Then
:: > just make an exe (File > make exe), and be sure to set the startup
: object
:: as
:: > Sub Main, and save the exe wherever (I use a \windows\utils folder for
:: stuff
:: > like this), and create a shortcut to the exe and place it on your
: desktop.
:: > Done. Double clicking will execute Sub Main, which will launch the
:: control
:: > panel applet. If you want to assign your own icon you could add a
: resource
:: > file, or a form with the icon assigned to the Icon property and set
that
:: > icon in the make exe dialog.
:: >
:: > If you want to go further -- place an icon in the systray and on
: clicking
:: it
:: > show the panel -- the concept is the same but you'd require a form in
: the
:: > app as well as the bas module (it can remain hidden) in order to
receive
:: the
:: > mouse events over the systray icon -- see the subclassing section on my
:: site
:: > for the minimal code to place an icon in the systray
:: > (http://vbnet.mvps.org/code/subclass...notifybasic.htm).
:: >
:: > The changes you would make to the app is (and I'm going of the top of
my
:: > head here ...):
:: >
:: > - in Sub Main call the code to Load Form1, but don't show it (eg no
: Form1
:: > show)
:: > - move the Shell code to a new procedure in the bas module, Private Sub
:: > ShowPanel
:: > - in the load event of the form call the routine that adds the icon to
: the
:: > systray
:: > - in the form unload event, call the routine that removes the icon
:: > - in the bas module's WindowProc subclassing routine, where the mouse
:: click
:: > code is use:
:: > Call ShowPanel
:: > ... rather than the menu code that's in the site demo
:: >
:: > When you make the app keep Sub Main as the startup object - it's only
: code
:: > would be:
:: >
:: > Load Form1
:: >
:: > Form1's only code would be:
:: >
:: > Private Sub Form_Load()
:: > If ShellTrayAdd = 1 Then
:: > SubClass Form1.hwnd
:: > End If
:: > End Sub
:: >
:: > Private Sub Form_Unload(Cancel As Integer)
:: > ShellTrayRemove
:: > UnSubClass
:: > End Sub
:: >
:: > ... plus the ShellTrayAdd and ShellTrayRemove routines.
:: >
:: > The code change in WindowProc would be
:: >
:: > Call ShowPanel
:: >
:: > instead of
:: >
:: > Form1.PopupMenu .zmnuDemo
:: >
:: > I suggest - if you want to go the systray route - you first construct
: the
:: > site demo exactly as it is shown, then once you get the hang of what's
:: going
:: > on you can start to make changes. This is a 10 minute app once you've
: got
:: > the basics down.
:: >
:: > The only thing (with the subclassed demo) that you **have** to pay
:: attention
:: > to is:
:: >
:: > - in the WindowProc routine ensure all Form1 references are changed to
:: the
:: > name you decide to use for the your form
:: >
:: > - **always** use start with full compile to run the app -- this will
: catch
:: > errors before you run into them executing the app. Subclassed apps die
:: > horrible deaths when an error occurs while the subclassing is active!
:: >
:: > --
:: >
:: > Randy Birch
:: > MVP Visual Basic
:: > http://vbnet.mvps.org/
:: > Please respond only to the newsgroups so all can benefit.
:: >
:: >
:: > "LuckyStrike" wrote in
:: > message news:%23GO1QhIkEHA.2696@TK2MSFTNGP10.phx.gbl...
:: > : Hi Randy,
:: > :
:: > : Well, you make it sound so simple. Of course as simple as it is, it
:: isn't
:: > as
:: > : simple as I am. <g> The only script I've ever done was in Outlook2002
: to
:: > : make an AVG antivirus scan button. So, as you can see, my skills - if
:: you
:: > : want to call 'em that - are less than adequate to fully understand
: the
:: > : means by which to implement that which you've offered.
:: > :
:: > : So, if I may ask, would I need to install or use something like this
: to
:: > : accomplish that which I s

to do?
:: > : http://www.mvps.org/vb/index2.html?tips/shellcpl.htm
:: > : http://www.mvps.org/vb/samples.htm#Shell32
:: > :
:: > : Please be so kind as to excuse my ignorance in such matters.
:: > :
:: > : Thanks again,
:: > : --
:: > : LuckyStrike
:: > : ------------------------------------------------------------
:: > : "Randy Birch" <rgb_removethis@mvps.org> wrote in message
:: > : news:%23aIedvHkEHA.2140@TK2MSFTNGP15.phx.gbl...
:: > : > How about making a tiny VB exe on your desktop or system tray that
:: > simply
:: > : > executes:
:: > : >
:: > : > Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
:: > : > vbNormalFocus
:: > : >
:: > : > --
:: > : >
:: > : > Randy Birch
:: > : > MVP Visual Basic
:: > : > http://vbnet.mvps.org/
:: > : > Please respond only to the newsgroups so all can benefit.
:: > : >
:: > : >
:: > : > "LuckyStrike" wrote in
:: > : > message news:uc%23RIjHkEHA.1040@TK2MSFTNGP10.phx.gbl...
:: > : <snipped>
:: > : > :
:: > : > : OS: W98se/IE6-SP-1 fully patched.
:: > : > :
:: > : > : Is it possible to add (a pointer to) the *Security Tab* from IE
:: > Options
:: > : to
:: > : > : the R-Click context menu? I am surfing with Active Scripting
:: disabled
:: > : 99%
:: > : > of
:: > : > : the time. It is a hassle when having to enable active scripting
: even
:: > : > though
:: > : > : I have made a IE Options shortcut on the Quick Launch Toolbar. It
:: > still
:: > : > : involves a few motions and clicks too many as far as I am
: concerned.
:: > : > :
:: > : <snipped>
:: > : > :
:: > : > : Thanks, LuckyStrike
:: > : > : ------------------------------------------------------------
::
::
:

Randy Birch

2004-09-02, 3:55 am

aw, what the heck ..

--

Randy Birch
MVP Visual Basic
http://vbnet.mvps.org/
Please respond only to the newsgroups so all can benefit.

"Randy Birch" <rgb_removethis@mvps.org> wrote in message
news:eMcs4JJkEHA.2908@TK2MSFTNGP10.phx.gbl...
: For the simple example, this is the entire code ...
:
: Private Sub Main()
:
: Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
: vbNormalFocus
:
: End Sub
:
: Done. Fini.
:
: As long as you remove the default form (select in project explorer, right
: click, remove, don't save changes) and set project>properties>startup to
Sub
: Main in your newly-added BAS module you're in business.
:
: --
:
: Randy Birch
: MVP Visual Basic
: http://vbnet.mvps.org/
: Please respond only to the newsgroups so all can benefit.
:
:
: "LuckyStrike" <LS@smokedamagedfurniture.youcandriveitawaytoday.com> wrote
in
: message news:OMepGDJkEHA.2680@TK2MSFTNGP15.phx.gbl...
:: Aha! See? I knew it would be complex... more than you initially let on.
:: <vbg> OK Randy, it's going to take me a while to translate that into a
:: language I can understand (English. hehe). You've put a lot of effort
into
:: explaining it to me. Inasmuch as I haven't really got a clue, it's going
: to
:: take me a lot longer than the time it took you compiling it for me to
:: understand it. I will return as soon as I *Think* that I may have an
:: inkling... <vbs>
::
:: Now, what do I need to start a VB project? You mean to put that command
: into
:: WordPad and saving it as an executable I think. Oh .... I am lost. I
: better
:: take some time to read that which you've written before looking
completely
:: dumb. (I'm ashamed to admit that I'm inept in this field.)
::
:: Thanks anyway,
:: --
::
:: LuckyStrike
:: LS@smokedamagedfurniture.youcandriveitawaytoday.com
::
:: How to make a good newsgroup post:
:: http://www.dts-l.org/goodpost.htm
:: ------------------------------------------------------------
:: "Randy Birch" <rgb_removethis@mvps.org> wrote in message
:: news:%2355LH6IkEHA.3348@TK2MSFTNGP12.phx.gbl...
:: > Yea, that first link is pretty well all you need. Start a new VB
: project,
:: > remove the form, add a bas module, open the bas module in code view, go
: to
:: > tools > add procedure and add a new sub and name it Main (important),
: then
:: > past into Sub Main (all on one line)
:: >
:: > Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
:: > vbNormalFocus
:: >
:: > That's it. Run the app (Run > start with full compile) and the control
:: > panel should open to the security page (1=security, 0=general, etc).
: Then
:: > just make an exe (File > make exe), and be sure to set the startup
: object
:: as
:: > Sub Main, and save the exe wherever (I use a \windows\utils folder for
:: stuff
:: > like this), and create a shortcut to the exe and place it on your
: desktop.
:: > Done. Double clicking will execute Sub Main, which will launch the
:: control
:: > panel applet. If you want to assign your own icon you could add a
: resource
:: > file, or a form with the icon assigned to the Icon property and set
that
:: > icon in the make exe dialog.
:: >
:: > If you want to go further -- place an icon in the systray and on
: clicking
:: it
:: > show the panel -- the concept is the same but you'd require a form in
: the
:: > app as well as the bas module (it can remain hidden) in order to
receive
:: the
:: > mouse events over the systray icon -- see the subclassing section on my
:: site
:: > for the minimal code to place an icon in the systray
:: > (http://vbnet.mvps.org/code/subclass...notifybasic.htm).
:: >
:: > The changes you would make to the app is (and I'm going of the top of
my
:: > head here ...):
:: >
:: > - in Sub Main call the code to Load Form1, but don't show it (eg no
: Form1
:: > show)
:: > - move the Shell code to a new procedure in the bas module, Private Sub
:: > ShowPanel
:: > - in the load event of the form call the routine that adds the icon to
: the
:: > systray
:: > - in the form unload event, call the routine that removes the icon
:: > - in the bas module's WindowProc subclassing routine, where the mouse
:: click
:: > code is use:
:: > Call ShowPanel
:: > ... rather than the menu code that's in the site demo
:: >
:: > When you make the app keep Sub Main as the startup object - it's only
: code
:: > would be:
:: >
:: > Load Form1
:: >
:: > Form1's only code would be:
:: >
:: > Private Sub Form_Load()
:: > If ShellTrayAdd = 1 Then
:: > SubClass Form1.hwnd
:: > End If
:: > End Sub
:: >
:: > Private Sub Form_Unload(Cancel As Integer)
:: > ShellTrayRemove
:: > UnSubClass
:: > End Sub
:: >
:: > ... plus the ShellTrayAdd and ShellTrayRemove routines.
:: >
:: > The code change in WindowProc would be
:: >
:: > Call ShowPanel
:: >
:: > instead of
:: >
:: > Form1.PopupMenu .zmnuDemo
:: >
:: > I suggest - if you want to go the systray route - you first construct
: the
:: > site demo exactly as it is shown, then once you get the hang of what's
:: going
:: > on you can start to make changes. This is a 10 minute app once you've
: got
:: > the basics down.
:: >
:: > The only thing (with the subclassed demo) that you **have** to pay
:: attention
:: > to is:
:: >
:: > - in the WindowProc routine ensure all Form1 references are changed to
:: the
:: > name you decide to use for the your form
:: >
:: > - **always** use start with full compile to run the app -- this will
: catch
:: > errors before you run into them executing the app. Subclassed apps die
:: > horrible deaths when an error occurs while the subclassing is active!
:: >
:: > --
:: >
:: > Randy Birch
:: > MVP Visual Basic
:: > http://vbnet.mvps.org/
:: > Please respond only to the newsgroups so all can benefit.
:: >
:: >
:: > "LuckyStrike" wrote in
:: > message news:%23GO1QhIkEHA.2696@TK2MSFTNGP10.phx.gbl...
:: > : Hi Randy,
:: > :
:: > : Well, you make it sound so simple. Of course as simple as it is, it
:: isn't
:: > as
:: > : simple as I am. <g> The only script I've ever done was in Outlook2002
: to
:: > : make an AVG antivirus scan button. So, as you can see, my skills - if
:: you
:: > : want to call 'em that - are less than adequate to fully understand
: the
:: > : means by which to implement that which you've offered.
:: > :
:: > : So, if I may ask, would I need to install or use something like this
: to
:: > : accomplish that which I s

Randy Birch

2004-09-02, 3:55 am

No, this code is for MS Visual Basic. It will work with VBA (eg word's VB
editor), but not as a standalone exe which is what you want/require.

--

Randy Birch
MVP Visual Basic
http://vbnet.mvps.org/
Please respond only to the newsgroups so all can benefit.

"LuckyStrike" <LS@smokedamagedfurniture.youcandriveitawaytoday.com> wrote in
message news:uPWiCMJkEHA.1644@tk2msftngp13.phx.gbl...
: Ok maybe getting a bit closer (maybe) First, I assume to need to use MS
: Word>Tools>Macro>Visual basic editor.
:
: Then.... I'll get back to you. ;-)
: --
: LuckyStrike
: LS@smokedamagedfurniture.youcandriveitawaytoday.com
: ------------------------------------------------------------
:
: "Randy Birch" <rgb_removethis@mvps.org> wrote in message
: news:%2355LH6IkEHA.3348@TK2MSFTNGP12.phx.gbl...
: > Yea, that first link is pretty well all you need. Start a new VB
project,
: > remove the form, add a bas module, open the bas module in code view, go
to
: > tools > add procedure and add a new sub and name it Main (important),
then
: > past into Sub Main (all on one line)
: >
: > Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
: > vbNormalFocus
: >
: > That's it. <snipped to save bandwidth> --
: >
: > Randy Birch
: > MVP Visual Basic
: > http://vbnet.mvps.org/
: > Please respond only to the newsgroups so all can benefit.
: >
: >
: > "LuckyStrike" wrote in
: > message news:%23GO1QhIkEHA.2696@TK2MSFTNGP10.phx.gbl...
: > : Hi Randy,
: > :
: > : Well, you make it sound so simple. Of course as simple as it is, it
: isn't
: > as
: > : simple as I am. <g> The only script I've ever done was in Outlook2002
to
: > : make an AVG antivirus scan button. So, as you can see, my skills - if
: you
: > : want to call 'em that - are less than adequate to fully understand
the
: > : means by which to implement that which you've offered.
: > :
: <snipped for brevity>
:
:

LuckyStrike

2004-09-02, 3:55 am

Randy,

You've been more than generous in your explanations and even going so far as
to write the code. First, I've not yet digested that which you've got at
your website. <s>

Listen; it *is* going to take me a while to sort this out, as if you've not
figured that out thus far (regretting the moment you tried to help with your
concise initial reply. <BG> )
So, in light of this, if you'd just kind of check this thread every so often
(perhaps once a day) to see if I've made any progress, I wouldn't want to
ask you for more.

I am most grateful for all you've done and offered, and I will try my best
to apply it and learn something. Thanks very, very much; I do appreciate
this noble attempt from your half to explain this, and to help me.
--

LuckyStrike
LS@smokedamagedfurniture.youcandriveitawaytoday.com

------------------------------------------------------------

"Randy Birch" <rgb_removethis@mvps.org> wrote in message
news:OND3%23MJkEHA.2140@TK2MSFTNGP15.phx.gbl...
> ------ entire BAS file - save as Module1.bas --------
>
> <---cut--->
> Attribute VB_Name = "Module1"
> Option Explicit
>
> Private Sub Main()
>
> Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
> vbNormalFocus
>
> End Sub
> <---cut--->
>
>
> ------ entire VBP file - save as Project1.vbp (watch for line wrapping on
> the Reference line - the last word in that line is 'Automation'--------
>
> <---cut--->
> Type=Exe
>
Reference=*\G{00020430-0000-0000-C000-000000000046}#2.0#0#..\..\..\WINDOWS\S
ystem32\STDOLE2.TLB#OLE
> Automation
> Module=Module1; Module1.bas
> Startup="Sub Main"
> HelpFile=""
> Title="Project1"
> ExeName32="Project1.exe"
> Command32=""
> Name="Project1"
> HelpContextID="0"
> CompatibleMode="0"
> MajorVer=1
> MinorVer=0
> RevisionVer=0
> AutoIncrementVer=0
> ServerSupportFiles=0
> CompilationType=-1
> OptimizationType=0
> FavorPentiumPro(tm)=0
> CodeViewDebugInfo=0
> NoAliasing=0
> BoundsCheck=0
> OverflowCheck=0
> FlPointCheck=0
> FDIVCheck=0
> UnroundedFP=0
> StartMode=0
> Unattended=0
> Retained=0
> ThreadPerObject=0
> MaxNumberOfThreads=1
> <---cut--->
>
>
> --
>
> Randy Birch
> MVP Visual Basic
> http://vbnet.mvps.org/
> Please respond only to the newsgroups so all can benefit.
>
>
> "Randy Birch" <rgb_removethis@mvps.org> wrote in message
> news:eMcs4JJkEHA.2908@TK2MSFTNGP10.phx.gbl...
> : For the simple example, this is the entire code ...
> :
> : Private Sub Main()
> :
> : Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
> : vbNormalFocus
> :
> : End Sub
> :
> : Done. Fini.
> :
> : As long as you remove the default form (select in project explorer,
right
> : click, remove, don't save changes) and set project>properties>startup to
> Sub
> : Main in your newly-added BAS module you're in business.
> :
> : --
> :
> : Randy Birch
> : MVP Visual Basic
> : http://vbnet.mvps.org/
> : Please respond only to the newsgroups so all can benefit.
> :
> :
> : "LuckyStrike" <LS@smokedamagedfurniture.youcandriveitawaytoday.com>
wrote
> in
> : message news:OMepGDJkEHA.2680@TK2MSFTNGP15.phx.gbl...
> :: Aha! See? I knew it would be complex... more than you initially let on.
> :: <vbg> <snipped for brevity>

Jim Carlock

2004-09-02, 3:55 am

LOL

Were you looking to create a VB application ? You would
need Visual Basic 5 or Visual Basic 6 installed to do what
you want to do with VB. Visual Basic 4 might work as well,
but someone else will have to comment on that.

If you want to just create a shortcut in the QuickLaunch, just
Create Shortcut on your desktop, type in the following as the
command:

rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1

Drag the shortcut to the quicklaunch and there you go.

--
Jim Carlock
http://www.microcosmotalk.com/
Post replies to the newsgroup.

"LuckyStrike" wrote:
Aha! See? I knew it would be complex... more than you initially let on.
<vbg> OK Randy, it's going to take me a while to translate that into a
language I can understand (English. hehe). You've put a lot of effort into
explaining it to me. Inasmuch as I haven't really got a clue, it's going to
take me a lot longer than the time it took you compiling it for me to
understand it. I will return as soon as I *Think* that I may have an
inkling... <vbs>

Now, what do I need to start a VB project? You mean to put that command into
WordPad and saving it as an executable I think. Oh .... I am lost. I better
take some time to read that which you've written before looking completely
dumb. (I'm ashamed to admit that I'm inept in this field.)

Thanks anyway,
--

LuckyStrike
LS@smokedamagedfurniture.youcandriveitawaytoday.com

How to make a good newsgroup post:
http://www.dts-l.org/goodpost.htm
------------------------------------------------------------
"Randy Birch" <rgb_removethis@mvps.org> wrote in message
news:%2355LH6IkEHA.3348@TK2MSFTNGP12.phx.gbl...
> Yea, that first link is pretty well all you need. Start a new VB project,
> remove the form, add a bas module, open the bas module in code view, go to
> tools > add procedure and add a new sub and name it Main (important), then
> past into Sub Main (all on one line)
>
> Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
> vbNormalFocus
>
> That's it. Run the app (Run > start with full compile) and the control
> panel should open to the security page (1=security, 0=general, etc). Then
> just make an exe (File > make exe), and be sure to set the startup object
as
> Sub Main, and save the exe wherever (I use a \windows\utils folder for
stuff
> like this), and create a shortcut to the exe and place it on your desktop.
> Done. Double clicking will execute Sub Main, which will launch the
control
> panel applet. If you want to assign your own icon you could add a resource
> file, or a form with the icon assigned to the Icon property and set that
> icon in the make exe dialog.
>
> If you want to go further -- place an icon in the systray and on clicking
it
> show the panel -- the concept is the same but you'd require a form in the
> app as well as the bas module (it can remain hidden) in order to receive
the
> mouse events over the systray icon -- see the subclassing section on my
site
> for the minimal code to place an icon in the systray
> (http://vbnet.mvps.org/code/subclass...notifybasic.htm).
>
> The changes you would make to the app is (and I'm going of the top of my
> head here ...):
>
> - in Sub Main call the code to Load Form1, but don't show it (eg no Form1
> show)
> - move the Shell code to a new procedure in the bas module, Private Sub
> ShowPanel
> - in the load event of the form call the routine that adds the icon to the
> systray
> - in the form unload event, call the routine that removes the icon
> - in the bas module's WindowProc subclassing routine, where the mouse
click
> code is use:
> Call ShowPanel
> ... rather than the menu code that's in the site demo
>
> When you make the app keep Sub Main as the startup object - it's only code
> would be:
>
> Load Form1
>
> Form1's only code would be:
>
> Private Sub Form_Load()
> If ShellTrayAdd = 1 Then
> SubClass Form1.hwnd
> End If
> End Sub
>
> Private Sub Form_Unload(Cancel As Integer)
> ShellTrayRemove
> UnSubClass
> End Sub
>
> ... plus the ShellTrayAdd and ShellTrayRemove routines.
>
> The code change in WindowProc would be
>
> Call ShowPanel
>
> instead of
>
> Form1.PopupMenu .zmnuDemo
>
> I suggest - if you want to go the systray route - you first construct the
> site demo exactly as it is shown, then once you get the hang of what's
going
> on you can start to make changes. This is a 10 minute app once you've got
> the basics down.
>
> The only thing (with the subclassed demo) that you **have** to pay
attention
> to is:
>
> - in the WindowProc routine ensure all Form1 references are changed to
the
> name you decide to use for the your form
>
> - **always** use start with full compile to run the app -- this will catch
> errors before you run into them executing the app. Subclassed apps die
> horrible deaths when an error occurs while the subclassing is active!
>
> --
>
> Randy Birch
> MVP Visual Basic
> http://vbnet.mvps.org/
> Please respond only to the newsgroups so all can benefit.
>
>
> "LuckyStrike" wrote in
> message news:%23GO1QhIkEHA.2696@TK2MSFTNGP10.phx.gbl...
> : Hi Randy,
> :
> : Well, you make it sound so simple. Of course as simple as it is, it
isn't
> as
> : simple as I am. <g> The only script I've ever done was in Outlook2002 to
> : make an AVG antivirus scan button. So, as you can see, my skills - if
you
> : want to call 'em that - are less than adequate to fully understand the
> : means by which to implement that which you've offered.
> :
> : So, if I may ask, would I need to install or use something like this to
> : accomplish that which I s

LuckyStrike

2004-09-02, 3:55 am

LOL! (and more) <VBG>

Got 'em. My Firewall changed the extension, but I'll sort it out. Meanwhile
Randy, I'm *not* going to learn anything this way y'know. But, nevertheless,
due to your unwavering kindness and really "*

* and level headed way of
managing/handling me", I am surely going to try to learn. I mean it. :-)

Take a look in on me from time to time. (hehe)

My best to you,
--
LuckyStrike
LS@smokedamagedfurniture.youcandriveitawaytoday.com
------------------------------------------------------------

"Randy Birch" <rgb_removethis@mvps.org> wrote in message
news:%230C2dNJkEHA.2664@TK2MSFTNGP11.phx.gbl...
> aw, what the heck ..
>
> --
>
> Randy Birch
> MVP Visual Basic
> http://vbnet.mvps.org/
> Please respond only to the newsgroups so all can benefit.
>
>
> "Randy Birch" <rgb_removethis@mvps.org> wrote in message
> news:eMcs4JJkEHA.2908@TK2MSFTNGP10.phx.gbl...
> : For the simple example, this is the entire code ...
> :
> : Private Sub Main()
> :
> : Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
> : vbNormalFocus
> :
> : End Sub
> :
> : Done. Fini.
> :
> : As long as you remove the default form (select in project explorer,
right
> : click, remove, don't save changes) and set project>properties>startup to
> Sub
> : Main in your newly-added BAS module you're in business.
> :
> : --
> :
> : Randy Birch
> : MVP Visual Basic
> : http://vbnet.mvps.org/
> : Please respond only to the newsgroups so all can benefit.
> :
> :
> : "LuckyStrike" wrote
> in
> : message news:OMepGDJkEHA.2680@TK2MSFTNGP15.phx.gbl...
> :: Aha! See? I knew it would be complex... more than you initially let on.
> :: <vbg> <snipped

LuckyStrike

2004-09-02, 3:55 am

Even though it's getting late here (MDT) I'm gonna grab a cuppa coffee...
sort this out. Then off to Google I go... see about what I need for this MS
Visual Basic thing. <whistling>
--

LuckyStrike
LS@smokedamagedfurniture.youcandriveitawaytoday.com
------------------------------------------------------------
"Randy Birch" <rgb_removethis@mvps.org> wrote in message
news:%23Bb9GOJkEHA.3664@TK2MSFTNGP12.phx.gbl...
> No, this code is for MS Visual Basic. It will work with VBA (eg word's VB
> editor), but not as a standalone exe which is what you want/require.
>
> --
>
> Randy Birch
> MVP Visual Basic
> http://vbnet.mvps.org/
> Please respond only to the newsgroups so all can benefit.
>
>
> "LuckyStrike" wrote in
> message news:uPWiCMJkEHA.1644@tk2msftngp13.phx.gbl...
> : Ok maybe getting a bit closer (maybe) First, I assume to need to use MS
> : Word>Tools>Macro>Visual basic editor.
> :
> : Then.... I'll get back to you. ;-)
> : --
> : LuckyStrike
> : LS@smokedamagedfurniture.youcandriveitawaytoday.com
> : ------------------------------------------------------------
> :
> : "Randy Birch" <rgb_removethis@mvps.org> wrote in message
> : news:%2355LH6IkEHA.3348@TK2MSFTNGP12.phx.gbl...
> : > Yea, that first link is pretty well all you need. Start a new VB
> project,
> : > remove the form, add a bas module, open the bas module in code view,
go
> to
> : > tools > add procedure and add a new sub and name it Main (important),
> then
> : > past into Sub Main (all on one line)
> : >
> : > Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
> : > vbNormalFocus
> : >
> : > That's it. <snipped to save bandwidth> --
> : >
> : > Randy Birch
> : > MVP Visual Basic
> : > http://vbnet.mvps.org/
> : > Please respond only to the newsgroups so all can benefit.
> : >
> : >
> : > "LuckyStrike" wrote in
> : > message news:%23GO1QhIkEHA.2696@TK2MSFTNGP10.phx.gbl...
> : > : Hi Randy,
> : > :
> : > : Well, you make it sound so simple. Of course as simple as it is, it
> : isn't
> : > as
> : > : simple as I am. <g> The only script I've ever done was in
Outlook2002
> to
> : > : make an AVG antivirus scan button. So, as you can see, my skills -
if
> : you
> : > : want to call 'em that - are less than adequate to fully understand
> the
> : > : means by which to implement that which you've offered.
> : > :
> : <snipped for brevity>
> :
> :
>

LuckyStrike

2004-09-02, 3:55 am

LOL back! <bg>

Hey Jim, That was easy. (also learned something right quick too) <s>
And its not a bad trick in that it has eliminated *one* extra click to
access the security tab. If I may, permit me to explain a bit further.

Of course if one is using IE6 and has the browser open, one can simply click
the globe icon on the status bar, and "bang", there's the IE Options
controls. Now, I already had created a shortcut to that on my QL toolbar a
long time ago, albeit was still simply the IE Options main dialog box, and
not the instant Security tab.

Now, what I really wanted to do was to have a Right-Click option on the
context menu that accesses the security tab; this would be keeping wrist
motions of moving the mouse all over the place to a minimum and with a
reduction in clicks (and kilometer "clicks" too.)

Anyway, as I had written to Randy I was going to grab some coffee (mistake)
and go googling.... for MS Visual Basic (5 or 6, or whichever may be
applicable/obtainable) and then see what was what. Meanwhile, I was also in
the midst of scoping out his website, and this flurry of posts/replies.
Amazing! The basic same post sat in the MS public.W98.Shell Newsgroup for a
day without so much as a bite. Not even to say "Wrong Group!" <BG>

OK, off for that Java (coffee; not script) <g>

Thanks very much Jim.
"Jim Carlock" <anonymous@127.0.0.1> wrote in message
news:O$JmGTJkEHA.556@tk2msftngp13.phx.gbl...
> LOL
>
> Were you looking to create a VB application ? You would
> need Visual Basic 5 or Visual Basic 6 installed to do what
> you want to do with VB. Visual Basic 4 might work as well,
> but someone else will have to comment on that.
>
> If you want to just create a shortcut in the QuickLaunch, just
> Create Shortcut on your desktop, type in the following as the
> command:
>
> rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1
>
> Drag the shortcut to the quicklaunch and there you go.
>
> --
> Jim Carlock
> http://www.microcosmotalk.com/
> Post replies to the newsgroup.
>
>
> "LuckyStrike" wrote:
> Aha! See? I knew it would be complex... more than you initially let on.
> <vbg> OK Randy, it's going to take me a while to translate that into a
> language I can understand (English. hehe). You've put a lot of effort into
> explaining it to me. Inasmuch as I haven't really got a clue, it's going
to
> take me a lot longer than the time it took you compiling it for me to
> understand it. I will return as soon as I *Think* that I may have an
> inkling... <vbs>
>
> Now, what do I need to start a VB project? You mean to put that command
into
> WordPad and saving it as an executable I think. Oh .... I am lost. I
better
> take some time to read that which you've written before looking completely
> dumb. (I'm ashamed to admit that I'm inept in this field.)
>
> Thanks anyway,
> --
>
> LuckyStrike
> LS@smokedamagedfurniture.youcandriveitawaytoday.com
>
> How to make a good newsgroup post:
> http://www.dts-l.org/goodpost.htm
> ------------------------------------------------------------
> "Randy Birch" <rgb_removethis@mvps.org> wrote in message
> news:%2355LH6IkEHA.3348@TK2MSFTNGP12.phx.gbl...
project,[color=darkred]
to[color=darkred]
then[color=darkred]
Then[color=darkred]
object[color=darkred]
> as
> stuff
desktop.[color=darkred]
> control
resource[color=darkred]
clicking[color=darkred]
> it
the[color=darkred]
> the
> site
Form1[color=darkred]
the[color=darkred]
> click
code[color=darkred]
the[color=darkred]
> going
got[color=darkred]
> attention
> the
catch[color=darkred]
> isn't
to[color=darkred]
> you
the[color=darkred]
to[color=darkred]
> disabled
even[color=darkred]
concerned.[color=darkred]
>
>
>

Randy Birch

2004-09-02, 3:55 am

: Create Shortcut on your desktop, type in the following as the
: command:

aw, but that's the easy way <g>

--

Randy Birch
MVP Visual Basic
http://vbnet.mvps.org/
Please respond only to the newsgroups so all can benefit.

Randy Birch

2004-09-02, 3:55 am

.... if you want to add a toolbar button to IE instead, to automatically open
the security settings, you can use this code (again, with VB) ...
http://vbnet.mvps.org/code/reg/ietoolbarextension.htm :-)

--

Randy Birch
MVP Visual Basic
http://vbnet.mvps.org/
Please respond only to the newsgroups so all can benefit.

"LuckyStrike" <LS@smokedamagedfurniture.youcandriveitawaytoday.com> wrote in
message news:%23npRXaJkEHA.1136@tk2msftngp13.phx.gbl...
: Even though it's getting late here (MDT) I'm gonna grab a cuppa coffee...
: sort this out. Then off to Google I go... see about what I need for this
MS
: Visual Basic thing. <whistling>
: --
:
: LuckyStrike
: LS@smokedamagedfurniture.youcandriveitawaytoday.com
: ------------------------------------------------------------
: "Randy Birch" <rgb_removethis@mvps.org> wrote in message
: news:%23Bb9GOJkEHA.3664@TK2MSFTNGP12.phx.gbl...
: > No, this code is for MS Visual Basic. It will work with VBA (eg word's
VB
: > editor), but not as a standalone exe which is what you want/require.
: >
: > --
: >
: > Randy Birch
: > MVP Visual Basic
: > http://vbnet.mvps.org/
: > Please respond only to the newsgroups so all can benefit.
: >
: >
: > "LuckyStrike" wrote in
: > message news:uPWiCMJkEHA.1644@tk2msftngp13.phx.gbl...
: > : Ok maybe getting a bit closer (maybe) First, I assume to need to use
MS
: > : Word>Tools>Macro>Visual basic editor.
: > :
: > : Then.... I'll get back to you. ;-)
: > : --
: > : LuckyStrike
: > : LS@smokedamagedfurniture.youcandriveitawaytoday.com
: > : ------------------------------------------------------------
: > :
: > : "Randy Birch" <rgb_removethis@mvps.org> wrote in message
: > : news:%2355LH6IkEHA.3348@TK2MSFTNGP12.phx.gbl...
: > : > Yea, that first link is pretty well all you need. Start a new VB
: > project,
: > : > remove the form, add a bas module, open the bas module in code view,
: go
: > to
: > : > tools > add procedure and add a new sub and name it Main
(important),
: > then
: > : > past into Sub Main (all on one line)
: > : >
: > : > Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
: > : > vbNormalFocus
: > : >
: > : > That's it. <snipped to save bandwidth> --
: > : >
: > : > Randy Birch
: > : > MVP Visual Basic
: > : > http://vbnet.mvps.org/
: > : > Please respond only to the newsgroups so all can benefit.
: > : >
: > : >
: > : > "LuckyStrike" wrote in
: > : > message news:%23GO1QhIkEHA.2696@TK2MSFTNGP10.phx.gbl...
: > : > : Hi Randy,
: > : > :
: > : > : Well, you make it sound so simple. Of course as simple as it is,
it
: > : isn't
: > : > as
: > : > : simple as I am. <g> The only script I've ever done was in
: Outlook2002
: > to
: > : > : make an AVG antivirus scan button. So, as you can see, my skills -
: if
: > : you
: > : > : want to call 'em that - are less than adequate to fully
understand
: > the
: > : > : means by which to implement that which you've offered.
: > : > :
: > : <snipped for brevity>
: > :
: > :
: >
:
:

LuckyStrike

2004-09-02, 3:55 am

Yeah Randy, Jim's way was easy, but also *not exactly* what I've been
looking for. However, I did learn a bit from that, and he was kind enough to
provide his input and idea.

But, is there a way to have a Right-Click Context menu item is what I really
want to know. That would really be worth wracking my brain to figure out how
to employ the scripting for. I hope I'm not displaying ingratitude for all
you've done for me thus far, by saying that.
--

LuckyStrike
LS@smokedamagedfurniture.youcandriveitawaytoday.com

How to make a good newsgroup post:
http://www.dts-l.org/goodpost.htm
------------------------------------------------------------
"Randy Birch" <rgb_removethis@mvps.org> wrote in message
news:OINH6zJkEHA.2140@TK2MSFTNGP15.phx.gbl...
> : Create Shortcut on your desktop, type in the following as the
> : command:
>
> aw, but that's the easy way <g>
>
> --
>
> Randy Birch
> MVP Visual Basic
> http://vbnet.mvps.org/
> Please respond only to the newsgroups so all can benefit.
>
>
>

LuckyStrike

2004-09-02, 3:55 am

Well, it seems that this Visual Basic 5 or 6 is a necessary (might I say
seemingly indispensable) item. Gotta get me one of those. <G>
--

LuckyStrike
LS@smokedamagedfurniture.youcandriveitawaytoday.com

How to make a good newsgroup post:
http://www.dts-l.org/goodpost.htm
------------------------------------------------------------
"Randy Birch" <rgb_removethis@mvps.org> wrote in message
news:%23p30X$JkEHA.1644@tk2msftngp13.phx.gbl...
> ... if you want to add a toolbar button to IE instead, to automatically
open
> the security settings, you can use this code (again, with VB) ...
> http://vbnet.mvps.org/code/reg/ietoolbarextension.htm :-)
>
> --
>
> Randy Birch
> MVP Visual Basic
> http://vbnet.mvps.org/
> Please respond only to the newsgroups so all can benefit.
>
>
> "LuckyStrike" wrote:
> : Even though it's getting late here (MDT) I'm gonna grab a cuppa
coffee...
> : sort this out. Then off to Google I go... see about what I need for this
> : MS Visual Basic thing. <whistling>
> : --
> : LuckyStrike
> : ------------------------------------------------------------
> : "Randy Birch" <rgb_removethis@mvps.org> wrote in message
> : news:%23Bb9GOJkEHA.3664@TK2MSFTNGP12.phx.gbl...
> : > No, this code is for MS Visual Basic. It will work with VBA (eg
word's
> : > VB editor), but not as a standalone exe which is what you
want/require.
> : >
> : > --
> : >
> : > Randy Birch
> : > MVP Visual Basic
> : > http://vbnet.mvps.org/
> : > Please respond only to the newsgroups so all can benefit.
> : >
> : > "LuckyStrike" wrote in
> : > message news:uPWiCMJkEHA.1644@tk2msftngp13.phx.gbl...
> : > : Ok maybe getting a bit closer (maybe) First, I assume to need to use
> MS
> : > : Word>Tools>Macro>Visual basic editor.
> : > :
> : > : Then.... I'll get back to you. ;-)
> : > : --
> : > : LuckyStrike
> : > : LS@smokedamagedfurniture.youcandriveitawaytoday.com
> : > : ------------------------------------------------------------
> : > :
> : > : "Randy Birch" <rgb_removethis@mvps.org> wrote in message
> : > : news:%2355LH6IkEHA.3348@TK2MSFTNGP12.phx.gbl...
> : > : > Yea, that first link is pretty well all you need. Start a new VB
> : > project,
> : > : > remove the form, add a bas module, open the bas module in code
view,
> : go
> : > to
> : > : > tools > add procedure and add a new sub and name it Main
> (important),
> : > then
> : > : > past into Sub Main (all on one line)
> : > : >
> : > : > Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
> : > : > vbNormalFocus
> : > : >
> : > : > That's it. <snipped to save bandwidth> --
> : > : >
> : > : > Randy Birch
> : > : > MVP Visual Basic
> : > : > http://vbnet.mvps.org/
> : > : > Please respond only to the newsgroups so all can benefit.
> : > : >
<snipped>

Randy Birch

2004-09-02, 3:55 am

Adding a right click menu item is easy has heck ... it's just a couple of
lines in the registry. But having that execute a DLL to do the work seems to
be another thing ... I tried it here and I can't get it to launch the exe to
show the dialog.

Hang on ... idea forming ...

--

Randy Birch
MVP Visual Basic
http://vbnet.mvps.org/
Please respond only to the newsgroups so all can benefit.

"LuckyStrike" <LS@smokedamagedfurniture.youcandriveitawaytoday.com> wrote in
message news:%232johSKkEHA.3896@TK2MSFTNGP15.phx.gbl...
: Yeah Randy, Jim's way was easy, but also *not exactly* what I've been
: looking for. However, I did learn a bit from that, and he was kind enough
to
: provide his input and idea.
:
: But, is there a way to have a Right-Click Context menu item is what I
really
: want to know. That would really be worth wracking my brain to figure out
how
: to employ the scripting for. I hope I'm not displaying ingratitude for all
: you've done for me thus far, by saying that.
: --
:
: LuckyStrike
: LS@smokedamagedfurniture.youcandriveitawaytoday.com
:
: How to make a good newsgroup post:
: http://www.dts-l.org/goodpost.htm
: ------------------------------------------------------------
: "Randy Birch" <rgb_removethis@mvps.org> wrote in message
: news:OINH6zJkEHA.2140@TK2MSFTNGP15.phx.gbl...
: > : Create Shortcut on your desktop, type in the following as the
: > : command:
: >
: > aw, but that's the easy way <g>
: >
: > --
: >
: > Randy Birch
: > MVP Visual Basic
: > http://vbnet.mvps.org/
: > Please respond only to the newsgroups so all can benefit.
: >
: >
: >
:
:

Randy Birch

2004-09-02, 3:55 am

.... ok, you can't call rundll32 directly from the context menu. I suspect
the only way is to use VB to create an activex DLL that exposes a procedure
you could invoke using CreateObject, which in turn called the rundll32 code.
Perhaps I'll try tomorrow ... it's 1am here now EDT.

If you want to read up on how to manually create a context menu, go to
msdn.microsoft.com and do a search in the knowledge base for the word
MenuExt.

--

Randy Birch
MVP Visual Basic
http://vbnet.mvps.org/
Please respond only to the newsgroups so all can benefit.

"Randy Birch" <rgb_removethis@mvps.org> wrote in message
news:%234EJIfKkEHA.140@TK2MSFTNGP12.phx.gbl...
: Adding a right click menu item is easy has heck ... it's just a couple of
: lines in the registry. But having that execute a DLL to do the work seems
to
: be another thing ... I tried it here and I can't get it to launch the exe
to
: show the dialog.
:
: Hang on ... idea forming ...
:
: --
:
: Randy Birch
: MVP Visual Basic
: http://vbnet.mvps.org/
: Please respond only to the newsgroups so all can benefit.
:
:
: "LuckyStrike" <LS@smokedamagedfurniture.youcandriveitawaytoday.com> wrote
in
: message news:%232johSKkEHA.3896@TK2MSFTNGP15.phx.gbl...
:: Yeah Randy, Jim's way was easy, but also *not exactly* what I've been
:: looking for. However, I did learn a bit from that, and he was kind enough
: to
:: provide his input and idea.
::
:: But, is there a way to have a Right-Click Context menu item is what I
: really
:: want to know. That would really be worth wracking my brain to figure out
: how
:: to employ the scripting for. I hope I'm not displaying ingratitude for
all
:: you've done for me thus far, by saying that.
:: --
::
:: LuckyStrike
:: LS@smokedamagedfurniture.youcandriveitawaytoday.com
::
:: How to make a good newsgroup post:
:: http://www.dts-l.org/goodpost.htm
:: ------------------------------------------------------------
:: "Randy Birch" <rgb_removethis@mvps.org> wrote in message
:: news:OINH6zJkEHA.2140@TK2MSFTNGP15.phx.gbl...
:: > : Create Shortcut on your desktop, type in the following as the
:: > : command:
:: >
:: > aw, but that's the easy way <g>
:: >
:: > --
:: >
:: > Randy Birch
:: > MVP Visual Basic
:: > http://vbnet.mvps.org/
:: > Please respond only to the newsgroups so all can benefit.
:: >
:: >
:: >
::
::
:

LuckyStrike

2004-09-02, 3:55 am

Aside from the necessity for a brain which can understand how to use it, I
presume that one of these is the MS tool that is needed to pursue such
endeavors? <g>
I am using W98SE/ P4 2.0 GHz / 1024 MB Sdram/ 40 GB HD-D with ~ 17.6 GB free
space.

Service Pack 5 - Visual Basic Download - English
http://snipurl.com/8t7t

Windows Script 5.6 for Windows 98, Windows Millennium Edition, and Windows
NT 4.0
http://snipurl.com/49jo
--
LuckyStrike
LS@smokedamagedfurniture.youcandriveitawaytoday.com
------------------------------------------------------------
"Randy Birch" wrote in message
news:%23p30X$JkEHA.1644@tk2msftngp13.phx.gbl...
> ... if you want to add a toolbar button to IE instead, to automatically
open
> the security settings, you can use this code (again, with VB) ...
> http://vbnet.mvps.org/code/reg/ietoolbarextension.htm :-)
>
> --
>
> Randy Birch
> MVP Visual Basic
> http://vbnet.mvps.org/
> Please respond only to the newsgroups so all can benefit.
>
>
> "LuckyStrike" wrote in
> message news:%23npRXaJkEHA.1136@tk2msftngp13.phx.gbl...
> : Even though it's getting late here (MDT) I'm gonna grab a cuppa
coffee...
> : sort this out. Then off to Google I go... see about what I need for this
> MS
> : Visual Basic thing. <whistling>
> : --
> : LuckyStrike
> : ------------------------------------------------------------
> : "Randy Birch" <rgb_removethis@mvps.org> wrote in message
> : news:%23Bb9GOJkEHA.3664@TK2MSFTNGP12.phx.gbl...
> : > No, this code is for MS Visual Basic. It will work with VBA (eg
word's
> VB
> : > editor), but not as a standalone exe which is what you want/require.
> : >
> : > --
> : >
> : > Randy Birch
> : > MVP Visual Basic
> : > http://vbnet.mvps.org/
> : > Please respond only to the newsgroups so all can benefit.
> : >
> : >
> : > "LuckyStrike" wrote in
> : > message news:uPWiCMJkEHA.1644@tk2msftngp13.phx.gbl...
> : > : Ok maybe getting a bit closer (maybe) First, I assume to need to use
> MS
> : > : Word>Tools>Macro>Visual basic editor.
> : > :
> : > : Then.... I'll get back to you. ;-)
> : > : --
> : > : LuckyStrike
> : > : ------------------------------------------------------------
> : > :
> : > : "Randy Birch" <rgb_removethis@mvps.org> wrote in message
> : > : news:%2355LH6IkEHA.3348@TK2MSFTNGP12.phx.gbl...
> : > : > Yea, that first link is pretty well all you need. Start a new VB
> : > project,
> : > : > remove the form, add a bas module, open the bas module in code
view,
> : go
> : > to
> : > : > tools > add procedure and add a new sub and name it Main
> (important),
> : > then
> : > : > past into Sub Main (all on one line)
> : > : >
> : > : > Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
> : > : > vbNormalFocus
> : > : >
> : > : > That's it. <snipped to save bandwidth> --
> : > : >
> : > : > Randy Birch
> : > : > MVP Visual Basic
> : > : > http://vbnet.mvps.org/
> : > : > Please respond only to the newsgroups so all can benefit.
> : > : >

LuckyStrike

2004-09-02, 3:55 am

You are quite the fellow Randy... I'm hanging in; the coffee is still
working. <g>
--
LuckyStrike
LS@smokedamagedfurniture.youcandriveitawaytoday.com
------------------------------------------------------------

"Randy Birch" <rgb_removethis@mvps.org> wrote in message
news:%234EJIfKkEHA.140@TK2MSFTNGP12.phx.gbl...
> Adding a right click menu item is easy has heck ... it's just a couple of
> lines in the registry. But having that execute a DLL to do the work seems
to
> be another thing ... I tried it here and I can't get it to launch the exe
to
> show the dialog.
>
> Hang on ... idea forming ...
>
> --
>
> Randy Birch
> MVP Visual Basic
> http://vbnet.mvps.org/
> Please respond only to the newsgroups so all can benefit.
>
>
> "LuckyStrike" clacked away at the keyboard:
> : Yeah Randy, Jim's way was easy, but also *not exactly* what I've been
> : looking for. However, I did learn a bit from that, and he was kind
enough
> to
> : provide his input and idea.
> :
> : But, is there a way to have a Right-Click Context menu item is what I
> really
> : want to know. That would really be worth wracking my brain to figure out
> how
> : to employ the scripting for. I hope I'm not displaying ingratitude for
all
> : you've done for me thus far, by saying that.
> : --
> : LuckyStrike
> : ------------------------------------------------------------
> : "Randy Birch" wrote in message
> : news:OINH6zJkEHA.2140@TK2MSFTNGP15.phx.gbl...
> : > : Create Shortcut on your desktop, type in the following as the
> : > : command:
> : >
> : > aw, but that's the easy way <g>
> : >
> : > --
> : >
> : > Randy Birch
> : > MVP Visual Basic
> : > http://vbnet.mvps.org/
> : > Please respond only to the newsgroups so all can benefit.
> : >
> :
>

LuckyStrike

2004-09-02, 3:55 am

Roger that Randy; I'll do as you've suggested. MS is "up all night", as will
I after that cup of Joe. :-D
Thanks a bunch for all of your effort. Enjoy the "Midnight (plus) Hour". <s>
--

LuckyStrike
LS@smokedamagedfurniture.youcandriveitawaytoday.com
------------------------------------------------------------
"Randy Birch" <rgb_removethis@mvps.org> wrote in message
news:eEdXIlKkEHA.712@TK2MSFTNGP09.phx.gbl...
> ... ok, you can't call rundll32 directly from the context menu. I suspect
> the only way is to use VB to create an activex DLL that exposes a
procedure
> you could invoke using CreateObject, which in turn called the rundll32
code.
> Perhaps I'll try tomorrow ... it's 1am here now EDT.
>
> If you want to read up on how to manually create a context menu, go to
> msdn.microsoft.com and do a search in the knowledge base for the word
> MenuExt.
>
> --
>
> Randy Birch
> MVP Visual Basic
> http://vbnet.mvps.org/
> Please respond only to the newsgroups so all can benefit.
>
>
> "Randy Birch" <rgb_removethis@mvps.org> wrote in message
> news:%234EJIfKkEHA.140@TK2MSFTNGP12.phx.gbl...
> : Adding a right click menu item is easy has heck ... it's just a couple
of
> : lines in the registry. But having that execute a DLL to do the work
seems
> to
> : be another thing ... I tried it here and I can't get it to launch the
exe
> to
> : show the dialog.
> :
> : Hang on ... idea forming ...
> :
> : --
> :
> : Randy Birch
> : MVP Visual Basic
> : http://vbnet.mvps.org/
> : Please respond only to the newsgroups so all can benefit.
> :
> :
> : "LuckyStrike" hammered at the keyboard:
> : <snipped>
> :: But, is there a way to have a Right-Click Context menu item is what I
> : really
> :: want to know. That would really be worth wracking my brain to figure
out
> : how
> :: to employ the scripting for. I hope I'm not displaying ingratitude for
> all
> :: you've done for me thus far, by saying that.
> :: --
> :: LuckyStrike
> :: ------------------------------------------------------------
> :: "Randy Birch" wrote in message
> :: news:OINH6zJkEHA.2140@TK2MSFTNGP15.phx.gbl...
> :: > : Create Shortcut on your desktop, type in the following as the
> :: > : command:
> :: >
> :: > aw, but that's the easy way <g>
> :: >
> :: > --
> :: >
> :: > Randy Birch
> :: > MVP Visual Basic
> :: > http://vbnet.mvps.org/
> :: > Please respond only to the newsgroups so all can benefit.
> :: >
> ::
>

Randy Birch

2004-09-02, 3:55 am

No. Service Pack 5 is an upgrade for an existing installation of VB.
Windows script is a totally different beast.

To make exe's you want to find the Learning, Professional or Enterprise
version of Visual Basic 6.0, or Visual Studio 6.0 (which includes a
ton'o'other stuff). If you want to make activex DLLs you need the Pro or
Enterprise versions.

Now the caveats ....

a) these are no longer being produced, and are in short supply. You'll have
to do a good search to find them. Since you don't have a previous version
you need the Full product, not the upgrade. Unless you're in school you
don't qualify for the Academic-priced versions. A full (as opposed to
upgrade) version of the VB learning edition was around $123-150 in stores as
I recall.. The Pro was around 400-500, and the enterprise about $1000.
Visual Studio Enterprise was almost two grand.

b) I discovered today that an online store --
http://www.softwaremore-usa.com/sof...usa/msun70.html -- is having a
sale on the MSDN Universal subscription (called 'version 7') - US $1000.
This is a $2500/year product. Not only does it contain Visual Studio 6.0,
but also - hold your breath - Visual Studio .NET, every Windows version.
Office 2003 Professional. FrontPage 2003. SQL Server, NT Server, 2000
Server, 2003 Server, Backoffice, Small business server, BizTalk server,
Visio 2003 Professional, betas for developer, server, Windows and Office
products, and just about every other thing they make except games and hokey
apps like Picture It. Plus updates by DVD or CD delivered to your door by
courier every month for a year. Plus access to the Subscribers section of
the MSDN site. I've got this - had it for nearly 10 years - and have no idea
how I'd exist as a programmer without it. You can read and drool at
www.msdn.microsoft.com under subscriptions.

--

Randy Birch
MVP Visual Basic
http://vbnet.mvps.org/
Please respond only to the newsgroups so all can benefit.

"LuckyStrike" <LS@smokedamagedfurniture.youcandriveitawaytoday.com> wrote in
message news:esGmBlKkEHA.3536@TK2MSFTNGP12.phx.gbl...
: Aside from the necessity for a brain which can understand how to use it, I
: presume that one of these is the MS tool that is needed to pursue such
: endeavors? <g>
: I am using W98SE/ P4 2.0 GHz / 1024 MB Sdram/ 40 GB HD-D with ~ 17.6 GB
free
: space.
:
: Service Pack 5 - Visual Basic Download - English
: http://snipurl.com/8t7t
:
: Windows Script 5.6 for Windows 98, Windows Millennium Edition, and Windows
: NT 4.0
: http://snipurl.com/49jo
: --
: LuckyStrike
: LS@smokedamagedfurniture.youcandriveitawaytoday.com
: ------------------------------------------------------------
: "Randy Birch" wrote in message
: news:%23p30X$JkEHA.1644@tk2msftngp13.phx.gbl...
: > ... if you want to add a toolbar button to IE instead, to automatically
: open
: > the security settings, you can use this code (again, with VB) ...
: > http://vbnet.mvps.org/code/reg/ietoolbarextension.htm :-)
: >
: > --
: >
: > Randy Birch
: > MVP Visual Basic
: > http://vbnet.mvps.org/
: > Please respond only to the newsgroups so all can benefit.
: >
: >
: > "LuckyStrike" wrote in
: > message news:%23npRXaJkEHA.1136@tk2msftngp13.phx.gbl...
: > : Even though it's getting late here (MDT) I'm gonna grab a cuppa
: coffee...
: > : sort this out. Then off to Google I go... see about what I need for
this
: > MS
: > : Visual Basic thing. <whistling>
: > : --
: > : LuckyStrike
: > : ------------------------------------------------------------
: > : "Randy Birch" <rgb_removethis@mvps.org> wrote in message
: > : news:%23Bb9GOJkEHA.3664@TK2MSFTNGP12.phx.gbl...
: > : > No, this code is for MS Visual Basic. It will work with VBA (eg
: word's
: > VB
: > : > editor), but not as a standalone exe which is what you want/require.
: > : >
: > : > --
: > : >
: > : > Randy Birch
: > : > MVP Visual Basic
: > : > http://vbnet.mvps.org/
: > : > Please respond only to the newsgroups so all can benefit.
: > : >
: > : >
: > : > "LuckyStrike" wrote in
: > : > message news:uPWiCMJkEHA.1644@tk2msftngp13.phx.gbl...
: > : > : Ok maybe getting a bit closer (maybe) First, I assume to need to
use
: > MS
: > : > : Word>Tools>Macro>Visual basic editor.
: > : > :
: > : > : Then.... I'll get back to you. ;-)
: > : > : --
: > : > : LuckyStrike
: > : > : ------------------------------------------------------------
: > : > :
: > : > : "Randy Birch" <rgb_removethis@mvps.org> wrote in message
: > : > : news:%2355LH6IkEHA.3348@TK2MSFTNGP12.phx.gbl...
: > : > : > Yea, that first link is pretty well all you need. Start a new VB
: > : > project,
: > : > : > remove the form, add a bas module, open the bas module in code
: view,
: > : go
: > : > to
: > : > : > tools > add procedure and add a new sub and name it Main
: > (important),
: > : > then
: > : > : > past into Sub Main (all on one line)
: > : > : >
: > : > : > Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl,,1",
: > : > : > vbNormalFocus
: > : > : >
: > : > : > That's it. <snipped to save bandwidth> --
: > : > : >
: > : > : > Randy Birch
: > : > : > MVP Visual Basic
: > : > : > http://vbnet.mvps.org/
: > : > : > Please respond only to the newsgroups so all can benefit.
: > : > : >
:
:

Randy Birch

2004-09-02, 3:55 am