VB6-to-Power Point

[D&JG]

Hi all
I want to click a button to run a Power Point show (.pps) and don't mind if
the VB6 program exits when this is done. Is there a simple way to do this?
I've searched many VB websites but haven't seen this one yet.

[Raoul Watson]

"D&JG" <do********@optusnet.com.auwrote in message
news:46***********************@news.optusnet.com.a u...

Hi all
I want to click a button to run a Power Point show (.pps) and don't mind
if the VB6 program exits when this is done. Is there a simple way to do
this? I've searched many VB websites but haven't seen this one yet.

Shell theApp, vbNormalFocus

[Dean Earley]

D&JG wrote:

Hi all
I want to click a button to run a Power Point show (.pps) and don't mind if
the VB6 program exits when this is done. Is there a simple way to do this?
I've searched many VB websites but haven't seen this one yet.

Use ShellExecute.
http://hashvb.earlsoft.co.uk/ShellExecute

..ppt files have a specific "show" verb, but .pps files default to show
with the "open" verb.

--
Dean Earley (de*********@icode.co.uk)
i-Catcher Development Team

iCode Systems

[D&JG]

"Dean Earley" <de*********@icode.co.ukwrote in message
news:46***********************@news.zen.co.uk...

D&JG wrote:

>Hi all
I want to click a button to run a Power Point show (.pps) and don't mind
if the VB6 program exits when this is done. Is there a simple way to do
this? I've searched many VB websites but haven't seen this one yet.

Use ShellExecute.
http://hashvb.earlsoft.co.uk/ShellExecute

.ppt files have a specific "show" verb, but .pps files default to show
with the "open" verb.

--
Dean Earley (de*********@icode.co.uk)
i-Catcher Development Team

iCode Systems

Tried

Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal
hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal
lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long)
As Long '(one long string)

ShellExecute 0, "open", "http://www.earlsoft.co.uk/", "", "", 1

Click run..
Program stops at the 0 after ShellExecute with the error "Invalid outside
procedure".

What am I missing?

Don

[Dean Earley]

D&JG wrote:

"Dean Earley" <de*********@icode.co.ukwrote in message
news:46***********************@news.zen.co.uk...

>D&JG wrote:

>>Hi all
I want to click a button to run a Power Point show (.pps) and don't mind
if the VB6 program exits when this is done. Is there a simple way to do
this? I've searched many VB websites but haven't seen this one yet.

Use ShellExecute.
http://hashvb.earlsoft.co.uk/ShellExecute

.ppt files have a specific "show" verb, but .pps files default to show
with the "open" verb.

Tried

Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal
hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal
lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long)
As Long '(one long string)

ShellExecute 0, "open", "http://www.earlsoft.co.uk/", "", "", 1

Click run..
Program stops at the 0 after ShellExecute with the error "Invalid outside
procedure".

You haven't actually put the code in any event.

If you want the exe to do nothing bar run this show, use Sub Main() in
module.

--
Dean Earley (de*********@icode.co.uk)
i-Catcher Development Team

iCode Systems