Keskustelu: Ohjelmointikysymykset: [VB6] Yhteyden esto

Miten voin tehdä ohjelman joka estää yhteyden esim. osoitteeseen www.runescape.com? :D
Eli sellaisen että tuolle sivulle ei pääsisi millään selaimella.

Huonohko mutta toimiva idea on tutkia kokoajan ikkunoiden otsikkopalkkien tekstiä ja jos jossain ikkunan palkissa lukee Runescape niin suljetaan se...

Private Declare Function GetWindowThreadProcessId Lib "user32" (ByVal hwnd As Long, lpdwProcessId As Long) As Long
Private Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function TerminateProcess Lib "kernel32" (ByVal hProcess As Long, ByVal uExitCode As Long) As Long

Private Const PROCESS_TERMINATE = &H1

Private Sub Command1_Click()
    Dim hwnd As Long, pid As Long, ph As Long
    ' etsitään hwnd, huomaa vbNullString (0 ei toimi tässä)
    hwnd = FindWindow(vbNullString, Text1.Text)
    ' hankitaan pid
    GetWindowThreadProcessId hwnd, pid
    ' prosessin kahva
    ph = OpenProcess(PROCESS_TERMINATE, 0, pid)
    ' terminoidaan prosessi
    hwnd = TerminateProcess(ph, 0)
End Sub

Sovella.

Kiva tietää miten tämäkin tapahtuu, tekisi mieli estää veljen pääsyn kyseiseen paikkaan että se pelaisi muutakin :D

rautamiekka kirjoitti:

tekisi mieli estää veljen pääsyn kyseiseen paikkaan että se pelaisi muutakin :D

Voisin ehdottaa WoWin hommaamista, mutta ehkä on parempi että vain murhaat veljesi :-P

-Grey-

Palomuurilla hoituu. Ulkoisissa modeemeissa/reitittimissäkin voi olla mahdollisuus estää tiettyjä osoitteita, jos ohjelmistopalomuuria ei ole käytettävissä.

Ei todellakana wowin hommaamista se on 20 kertaa pahempi ku runescape :> eli murhaat tai sidot ja heität kellariin...

rautamiekka kirjoitti:

Kiva tietää miten tämäkin tapahtuu, tekisi mieli estää veljen pääsyn kyseiseen paikkaan että se pelaisi muutakin :D

Sitä varten mäkin tein ettei pääsis runea pelaamaan. :D

Cornixille:
Joo huomasin.

Pikablokki hoituu nakkaamalla hosts-tiedostoon (Windowsilla muistaakseni C:\Windows\System32\Drivers\etc\hosts) rivi

127.0.0.1 www.runescape.com