Re: Sequential Auto Launch of exe's
From: Jay Crouse (jay_crouse_at_hotmail.com)
Date: 06/28/04
- Next message: MCorn: "Automatic Update"
- Previous message: Steve Rindsberg: "Re: Sequential Auto Launch of exe's"
- In reply to: Steve Rindsberg: "Re: Sequential Auto Launch of exe's"
- Next in thread: Steve Rindsberg: "Re: Sequential Auto Launch of exe's"
- Reply: Steve Rindsberg: "Re: Sequential Auto Launch of exe's"
- Messages sorted by: [ date ] [ thread ]
Date: Mon, 28 Jun 2004 14:52:41 -0700
Steve,
Guess I could have been a little more forthcoming, just
asumed that you could read my mind.
In the Action Setting, I right clicked on the logo,
selected "ActionSettings" Clicked on Run Program and
Browsed to my first executable. That works fine for that
one document, but I didn't see any way to launch the
second and third.
As to the Macro it looked like this:
Sub Launch()
'
' Macro recorded 6/28/2004 by
'
ActiveWindow.Selection.SlideRange.Shapes("Picture
2").Select
With ActiveWindow.Selection.ShapeRange.ActionSettings
(ppMouseClick)
.Run = "C:\Documents and Settings\Ezenia
Employee\My Documents\IWS Install
Files\IWS_Client_2512.exe"
.SoundEffect.Type = ppSoundNone
.AnimateAction = msoFalse
End With
With ActiveWindow.Selection.ShapeRange.ActionSettings
(ppMouseClick)
.Run = "C:\Documents and Settings\Ezenia
Employee\My Documents\IWS Install Files\
IWS_BrowserPlugin_2512.exe "
.SoundEffect.Type = ppSoundNone
.AnimateAction = msoFalse
End With
With ActiveWindow.Selection.ShapeRange.ActionSettings
(ppMouseClick)
.Run = "C:\Documents and Settings\Ezenia
Employee\My Documents\IWS Install Files\
Placeware_251.exe "
.SoundEffect.Type = ppSoundNone
.AnimateAction = msoFalse
End With
With ActiveWindow.Selection.ShapeRange.ActionSettings
(ppMouseOver)
.Action = ppActionNone
.SoundEffect.Type = ppSoundNone
.AnimateAction = msoFalse
End With
End Sub
My attempt at using the shell command looks like:
Public Sub IWS_Client_2512()
Dim IWSClientVal
IWSClientVal = Shell("c:\Documents and Settings\Ezenia
Employee\My Documents\IWS Install
Files\IWS_Client_2512.exe", 1)
End Sub
Public Sub IWS_Browser_Plugin()
Dim IwspiVal
IwspiVal = Shell("c:\Documents and Settings\Ezenia
Employee\My Documents\IWS Install
Files\IWS_BrowserPlugin_2512.exe", 1)
End Sub
Public Sub Placeware()
Dim PWVal
PWVal = Shell("c:\Documents and Settings\Ezenia
Employee\My Documents\IWS Install
Files\Placeware_251.exe", 1)
End Sub
Each individual subroutine does its job individually, but
if I run from the presentation only the first segment runs
and then it stops.
I am sure it is something reasonably simple if I
understood VB or Macros, and I should take some time to
learn the basics before attempting the the more complex.
Unfortunately time doesn't permit.
Thanks for your continued interest and patience.
Jay
>-----Original Message-----
>In article <2290b01c45d47$64058100$a501280a@phx.gbl>, Jay
Crouse wrote:
>> I've tried using the action setting and then tried
>> duplicating its action in the VBA edit screen and I've
>> tried recording a macro as well as looking at a VB
manual
>> and trying to use the Shell Command to launch the
>> installers.
>>
>> In all cases I seem to end up with three subroutines
and
>> only the first will execute.
>
>Thanks, but when I said specifics, I mean hardcore,
obsessive, only an
>anal-retentive's mother could love 'em specifics. ;-)
>
>What exact action setting did you use?
>What macro code did you add? What's the content of the
subroutines?
>
>> At some point in the future the Install Shield will be
>> redone to bring everything under one executable, but
that
>> future is not soon enough for my needs(typical
salesman).
>>
>> I don't have the knowledge to launch one application
from
>> the preceding one, it would have to be done by our
>> development team and they are swamped at the moment.
>
>OK, I hear that. Whatever happens, it's got to happen in
PPT.
>
>>
>> Any suggestions are appreciated.
>>
>> >-----Original Message-----
>> >In article <2253201c45d3c$feede140$a301280a@phx.gbl>,
Jay
>> Crouse wrote:
>> >> I am trying to use Powerpoint as a distributable
sales
>> >> piece with the opportunity to setup a demo account
at
>> the
>> >> end. This requires launching three sequential
>> >> InstallShields. No matter what I try I can only get
>> one
>> >> to launch. It runs fine then leaves me staring at
the
>> >> slide hoping that the next file will launch.
>> >>
>> >
>> >It'd help to know very specifically how you're
launching
>> the setup now.
>> >
>> >Another thing to look into is whether the first
>> installshield setup can, at
>> >completion, launch the next one.
>> >
>> >
>> >
>> >
>> >
>> >--
>> >Steve Rindsberg, PPT MVP
>> >PPT FAQ: www.pptfaq.com
>> >PPTools: www.pptools.com
>> >================================================
>> >Featured Presenter, PowerPoint Live 2004
>> >October 10-13, San Diego, CA www.PowerPointLive.com
>> >================================================
>> >
>> >.
>> >
>>
>
>--
>Steve Rindsberg, PPT MVP
>PPT FAQ: www.pptfaq.com
>PPTools: www.pptools.com
>================================================
>Featured Presenter, PowerPoint Live 2004
>October 10-13, San Diego, CA www.PowerPointLive.com
>================================================
>
>.
>
- Next message: MCorn: "Automatic Update"
- Previous message: Steve Rindsberg: "Re: Sequential Auto Launch of exe's"
- In reply to: Steve Rindsberg: "Re: Sequential Auto Launch of exe's"
- Next in thread: Steve Rindsberg: "Re: Sequential Auto Launch of exe's"
- Reply: Steve Rindsberg: "Re: Sequential Auto Launch of exe's"
- Messages sorted by: [ date ] [ thread ]
Relevant Pages
|
