aku taro di subform load (form yg pertama kali jalan)
If App.PrevInstance Then
MsgBox "Inventory Application Already Running", vbInformation,
"Inventory System - TGSSI"
Unload Me
End If
dan jalan....
----- Original Message -----
From: "Jenar Suseno" <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Thursday, December 01, 2005 9:23 AM
Subject: [Programmer-VB] Mencegah Program Jalan 2 Kali.( Kok gak jalan
ya....)
> Aku coba taruh di sub main yang dijalankan pertama
> kali...
>
> Sub Main()
> If App.hInstance = True Then
> MsgBox ("Aplikasi telah dijalankan")
> End
> End If
> Set koneksi = New ADODB.Connection
> fr_login.Show
> end sub
>
> Setelah aku kompile jadi exe, kok masih bisa jalan 2
> kali ya....
>
> Harusnya ditaruh dimana ya?
>
> Makasih.
>
>
>
>
> __________________________________
> Yahoo! Mail - PC Magazine Editors' Choice 2005
> http://mail.yahoo.com
>
>
>
> Untuk keluar dari millis ini, kirim email kosong ke:
> [EMAIL PROTECTED]
>
>
> Yahoo! Groups Links
>
>
>
>
>
>
------------------------ Yahoo! Groups Sponsor --------------------~-->
Fair play? Video games influencing politics. Click and talk back!
http://us.click.yahoo.com/2jUsvC/tzNLAA/TtwFAA/k7folB/TM
--------------------------------------------------------------------~->
Untuk keluar dari millis ini, kirim email kosong ke:
[EMAIL PROTECTED]
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/Programmer-VB/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
