Search Tools Links Login

Instance Checker


This simple few lines of code will give the user and error message if they are already running your program. Doesn't apply if you are in the ide!

Original Author: Tyler Badger

Code

Private Sub Form_Load() ' the form1 loading sub
If App.PrevInstance Then ' check if running
  MsgBox "Error:" & vbCrLf & "Please switch to your already running app." ' error message
Dim frm As Form ' set frm variable as a form
For Each frm In Forms ' get all forms
  Unload frm ' unload the form
  Set frm = Nothing ' set frm variable as nothing
Next frm ' go to the for each frm again
End If ' end the if statement
End Sub ' end the form load

About this post

Posted: 2003-06-01
By: ArchiveBot
Viewed: 105 times

Categories

Visual Basic 6

Attachments

No attachments for this post


Loading Comments ...

Comments

No comments have been added for this post.

You must be logged in to make a comment.