Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Kako da mi zlikovci ne ubiju program?

[es] :: Visual Basic 6 :: Kako da mi zlikovci ne ubiju program?

[ Pregleda: 4337 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

InvisibleCode
Invisible Code
Away from Here

Član broj: 37518
Poruke: 10
*.teol.net.

ICQ: 2147483647
Sajt: none


Profil

icon Kako da mi zlikovci ne ubiju program?20.10.2004. u 21:37 - pre 236 meseci
Kako da napravim da moj program bude nevidljiv u TaskBar-u/TaskMan-u, tj. da ga je nemoguce ubiti s Ctrl+Alt+Del.
Kako da onemogucim dugme "Close" ( X ) na formi?

Hvala!
A sta ako se to stvarno ne moze?!
 
Odgovor na temu

mladenovicz
Zeljko Mladenovic
Xoran Technologies, Inc., Ann Arbor, MI,
USA / Software Engineer
Ann Arbor, MI, USA

Član broj: 6598
Poruke: 2065
*.bg.wifi.vline.verat.net.

Jabber: mladenovicz@elitesecurity.org
ICQ: 95144142
Sajt: yubc.net/~mz


Profil

icon Re: Kako da mi zlikovci ne ubiju program?21.10.2004. u 10:12 - pre 236 meseci
Disable Close Button

Code:

Option Explicit

Private Declare Function GetSystemMenu Lib "user32" _
    (ByVal hwnd As Long, _
     ByVal bRevert As Long) As Long

Private Declare Function RemoveMenu Lib "user32" _
    (ByVal hMenu As Long, _
     ByVal nPosition As Long, _
     ByVal wFlags As Long) As Long
     
Private Const MF_BYPOSITION = &H400&

Public Function DisableCloseButton(frm As Form) As Boolean

'PURPOSE: Removes X button from a form
'EXAMPLE: DisableCloseButton Me
'RETURNS: True if successful, false otherwise
'NOTES:   Also removes Exit Item from
'         Control Box Menu


    Dim lHndSysMenu As Long
    Dim lAns1 As Long, lAns2 As Long
    
    
    lHndSysMenu = GetSystemMenu(frm.hwnd, 0)

    'remove close button
    lAns1 = RemoveMenu(lHndSysMenu, 6, MF_BYPOSITION)

   'Remove seperator bar
    lAns2 = RemoveMenu(lHndSysMenu, 5, MF_BYPOSITION)
    
    'Return True if both calls were successful
    DisableCloseButton = (lAns1 <> 0 And lAns2 <> 0)

End Function


Private Sub Form_Load()
    DisableCloseButton Me
End Sub


ili ovo
 
Odgovor na temu

VRKY

Član broj: 21087
Poruke: 4690
*.net.htnet.hr.



+8 Profil

icon Re: Kako da mi zlikovci ne ubiju program?21.10.2004. u 12:46 - pre 236 meseci
Za prvo pitanje:

Code:

App.TaskVisible = False


Taj kod sakriva tvoj program u Task menegeru ali samo u applicationsima a ne u procesima, nadam se da ti to donekle odgovara.
 
Odgovor na temu

Shadowed
Vojvodina

Član broj: 649
Poruke: 12846



+4783 Profil

icon Re: Kako da mi zlikovci ne ubiju program?21.10.2004. u 13:10 - pre 236 meseci
Vise od toga ne moze ni da dobije (bez dll injecton-a :)). Ali mu to nece desable-ovati Close taster.
 
Odgovor na temu

TheAlas
Bojan Sala
Senior Software Eng
IGT
Beograd

Član broj: 36584
Poruke: 119
*.nat-pool.bgd.sbb.co.yu.



+1 Profil

icon Re: Kako da mi zlikovci ne ubiju program?28.10.2004. u 19:14 - pre 236 meseci
Da, nije moguce sakriti PID bez teskog hakovanja.
Trazi "exe injection" ili sl. , da tvoja nit (thread) predje u drugi proces. Mozes i napraviti lazan proces (kao onaj virus svchost.exe).
 
Odgovor na temu

[es] :: Visual Basic 6 :: Kako da mi zlikovci ne ubiju program?

[ Pregleda: 4337 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.