22-07-2009, 07:06 PM
Download This File And Extract it to
Client\Src
Then Add It To Your Source
Go To FrmMirage
and Under
Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
add
Your Admin Menu Will Now Open Under F12
This is what the Admin Menu Looks Like
![[Image: Untitled-41.png]](http://i83.photobucket.com/albums/j311/doomteam11/Untitled-41.png)
Client\Src
Then Add It To Your Source
Go To FrmMirage
and Under
Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
add
Code:
Case vbKeyF12
If GetPlayerAccess(MyIndex) > 1 Then
frmAdmin.Visible = True
End If
Your Admin Menu Will Now Open Under F12
This is what the Admin Menu Looks Like
![[Image: Untitled-41.png]](http://i83.photobucket.com/albums/j311/doomteam11/Untitled-41.png)
![[Image: Untitled-4-12.png]](http://i83.photobucket.com/albums/j311/doomteam11/Untitled-4-12.png)