Soren Smidt Hansen <sosh@daimi.au.dk> wrote in message
news:xm6y9ppj9jm.fsf@daimi.au.dk...
> Hej
>
> Hvordan kan man i VB eksekvere et eksternt program og vente paa, at
> det terminerer foer man fortsaetter i det kaldende program.
>
> I mit tilfaelde:
>
> id = Shell("cmd.exe /C myprg > myfile", 6) 'minimized no focus
>
> Dette virker fint, men jeg vil ikke gaa videre i vbprogrammet foer
> myprg er afsluttet.
>
> --
> Mvh Søren Smidt Hansen
> sosh@daimi.au.dk
> tlf: 51235821
>
http://www.daimi.au.dk/~sosh
Hej Søren
Nedenstående er klippet fra et tidligere svar til ca. det samme
spørgsmål. Jeg har prøvet kodestumpen i Word 97 VBA og
der giver den det forventede resultat.
Private Sub Command1_Click()
Dim WshShell As Object
Set WshShell = CreateObject("Wscript.Shell")
WshShell.run "calc.exe", , True
MsgBox "Dit program er blevet lukket !"
End Sub
--
Mikkel Bundgaard
RUC Datalogi
http://officehelp.gone.dk
Se SpaceCommunicator - en peer-to-peer chat-applikation i Java