[Gambas-user] Check if a program is already started

[Jussi Lahtinen]

Not very elegant, but works:


Dim sOutput As String

Exec ["pgrep", "-f", "-l", "NameOfYourProgram.gambas"] Wait To sOutput

If Split(Trim$(sOutput), gb.NewLine).Count > 1 Then
'Allready running
EndIf


Jussi




On Sat, Sep 12, 2009 at 15:50, Johny Provoost <johny.provoost at ...27...> wrote:
> Hi,
>
> Is there a command to check if a program (programed in Gambas) is
> already running?
> I want to avoid that a program is started twice.
>
>
> Johny Provoost
>
>
> ------------------------------------------------------------------------------
> Let Crystal Reports handle the reporting - Free Crystal Reports 2008 30-Day
> trial. Simplify your report design, integration and deployment - and focus on
> what you do best, core application coding. Discover what's new with
> Crystal Reports now.  http://p.sf.net/sfu/bobj-july
> _______________________________________________
> Gambas-user mailing list
> Gambas-user at lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/gambas-user
>