Aktiver nogent på bestemte datoer og g

Ikke en dårlig måde at lave en lille virus på :o)
Jeg må være dig svar skyldig, men umiddelbart tror jeg det ikke.
Men jeg lægger mig i baggrunden og luske-læser !

- Mikker

For at få dit program til at blive usynlig skal du jo have slået ctrl+alt+delete fra.

Forhindre brugen af Alt+Ctrl+Del

Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, lpvParam As Any, ByVal fuWinIni As Long) As Long
Const SPI_SETSCREENSAVEACTIVE = 97

Sub DisableCtrlAltDel(bState As Boolean)
Dim RC As Long
Dim lngWas As Long
RC = SystemParametersInfo(SPI_SETSCREENSAVEACTIVE, bState, lngWas, 0)
End Sub

'For at disable: DisableCtrlAltDel True
'For at enable: DisableCtrlAltDel False

- Krazyunreal