Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.net] - Code snippet untuk mematikan proses berdasarkan tajuk window
26-08-2013, 12:19 PM,
Post: #1
[VB.net] - Code snippet untuk mematikan proses berdasarkan tajuk window
Code:
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        For Each wnames As String In {"online game", "games", "flash game", "games online", "y8", "priv8",
                                      "porn", "sex", "lucah", "3gp melayu", "bokep", "bogel", "awek bogel", "bertudung",
                                      "stim ghairah", "ghairah awek", "awek stim", "awek seks", "seks",
                                      "melayu boleh", "video seks", "buah dada", "burit", "pantat", "g**", "bogel",
                                      "18sx", "tudung seks", "novel seks", "tubeview", "koleksi 3gp", "bohsia", "skandal",
                                      "video romen", "romen melayu", "pecah dara", "tubeview", "koleksi 3gp", "rogol", "gangbang",
                                      "play game", "mini game", "onlinegame", "arcade", "redtube", "xvideo", "lesbian",
                                      "ultrasurf", "proxy", "torrent", "download manager", "redtube", "xvideo", "xxx"}
            Dim hwnd As String = findPartialTitle(wnames)
        Next
    End Sub

    Private Function findPartialTitle(ByVal partialTitle As String) As IntPtr
        For Each p As Process In Process.GetProcesses()
            If p.MainWindowTitle.IndexOf(partialTitle, 0, StringComparison.CurrentCultureIgnoreCase) > -1 Then
                p.Kill()
            End If
        Next
        Return IntPtr.Zero
    End Function
percubaan untuk matikan laman web porn dan laman web budak-budak
hasil:
gagal.. apabila iman goyang...
terjebak sama.. Fuck That Shit

harap sesiapa yang kuat imannya dapat sambung jihad nafsu ini.. hohoho
If you should wish to join the legion of trolls, you should first know the code of the troll:
Live Free.. Troll Hard GayFace
Blog Saya : b3tik.blogspot.com
Reply
26-08-2013, 04:34 PM,
Post: #2
RE: [VB.net] - Code snippet untuk mematikan proses berdasarkan tajuk window
"video romen", "romen melayu", "pecah dara", "tubeview", "koleksi 3gp", "rogol", "gangbang" ~fap
Quote:Mulakan dengan mendengar, kemudian berfikir, bertanya untuk faham dan amalkan untuk sempurna...
Reply
26-08-2013, 04:44 PM,
Post: #3
RE: [VB.net] - Code snippet untuk mematikan proses berdasarkan tajuk window
mcm mana nk apply menda ni?? sory im lost OK
[Image: pumpkids]
Reply
26-08-2013, 06:03 PM,
Post: #4
Re: [VB.net] - Code snippet untuk mematikan proses berdasarkan tajuk window
Ni mcm akan run sepanjang masa je. Dia akan run pada setiap saat ke?
Reply
26-08-2013, 09:14 PM,
Post: #5
RE: [VB.net] - Code snippet untuk mematikan proses berdasarkan tajuk window
(26-08-2013, 12:19 PM)b3tik Wrote:
Code:
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        For Each wnames As String In {"online game", "games", "flash game", "games online", "y8", "priv8",
                                      "porn", "sex", "lucah", "3gp melayu", "bokep", "bogel", "awek bogel", "bertudung",
                                      "stim ghairah", "ghairah awek", "awek stim", "awek seks", "seks",
                                      "melayu boleh", "video seks", "buah dada", "burit", "pantat", "g**", "bogel",
                                      "18sx", "tudung seks", "novel seks", "tubeview", "koleksi 3gp", "bohsia", "skandal",
                                      "video romen", "romen melayu", "pecah dara", "tubeview", "koleksi 3gp", "rogol", "gangbang",
                                      "play game", "mini game", "onlinegame", "arcade", "redtube", "xvideo", "lesbian",
                                      "ultrasurf", "proxy", "torrent", "download manager", "redtube", "xvideo", "xxx"}
            Dim hwnd As String = findPartialTitle(wnames)
        Next
    End Sub

    Private Function findPartialTitle(ByVal partialTitle As String) As IntPtr
        For Each p As Process In Process.GetProcesses()
            If p.MainWindowTitle.IndexOf(partialTitle, 0, StringComparison.CurrentCultureIgnoreCase) > -1 Then
                p.Kill()
            End If
        Next
        Return IntPtr.Zero
    End Function
percubaan untuk matikan laman web porn dan laman web budak-budak
hasil:
gagal.. apabila iman goyang...
terjebak sama.. Fuck That Shit

harap sesiapa yang kuat imannya dapat sambung jihad nafsu ini.. hohoho
hang prevent kanak2 nakal kat tempat hang ka? ;d
aku guna k9 ja dulu..99% tiada lg, filter by keyword Fuck That Shit
xsxs Wrote:"I may contains particular combinations of colors or black and white contrast, may/ may not cause epilepsy, nausea or the urge to do weird things to domestic animals."
EOF
);}
Reply
26-08-2013, 09:29 PM, (This post was last modified: 26-08-2013, 09:29 PM by shahril.)
Post: #6
RE: [VB.net] - Code snippet untuk mematikan proses berdasarkan tajuk window
kalau nk prevent porno, baek set pakai openDNS
[Image: OmDM2yf.png]
Reply
28-08-2013, 10:46 AM,
Post: #7
RE: [VB.net] - Code snippet untuk mematikan proses berdasarkan tajuk window
(26-08-2013, 04:44 PM)pumpkids Wrote: mcm mana nk apply menda ni?? sory im lost OK
ni kod kena letak kat visual studio 2010 express ..
dalam visual basic
pastu compile dan run untuk tengok

(26-08-2013, 06:03 PM)padibiru Wrote: Ni mcm akan run sepanjang masa je. Dia akan run pada setiap saat ke?
ikut timer.. dia memang run sepanjang masa.. tapi andai interval timer diset setiap 5 saat.. maka ia hanya bertindak untuk matikan proses setiap 5 saat.

(26-08-2013, 09:14 PM)xsxs Wrote: hang prevent kanak2 nakal kat tempat hang ka? ;d
aku guna k9 ja dulu..99% tiada lg, filter by keyword Fuck That Shit
k9.. wa... seronok ni.. akan dicuba..

(26-08-2013, 09:29 PM)shahril Wrote: kalau nk prevent porno, baek set pakai openDNS
open dns.. pernah dicuba.. tapi yamanisalim masih lepas.. banyak lagi web.. sampai haku pun tak tahu.. paling tak tahan.. diorang cari kat youtube pakai keyword "18+" atau "xxx" aje.. macam-macam bahasa..
If you should wish to join the legion of trolls, you should first know the code of the troll:
Live Free.. Troll Hard GayFace
Blog Saya : b3tik.blogspot.com
Reply
28-08-2013, 06:56 PM,
Post: #8
RE: [VB.net] - Code snippet untuk mematikan proses berdasarkan tajuk window
opendns jgn guna kat site nt ada problm arise n yup kanak2 nakai still lepas..k9 ok kot cuma filter 1 suku kata n jgn lupa hide filtered keyword n whitelist kn site yg encrypted mcm facebook, gaymail, ymail etc..jgn benarkn terus encrypted connection kcuali yg dlm senarai putih na, hang klu rajin kasi godek itu juniper tp jgn usik klu ada part2 yg hang x faham nt btambah gila, klu nk belajar somethin yg baru cari lg 1 network card..2 biji cpu tu ada lg kn??? ;d
install linux, setup firewall bg lalu itu 1 cpu..filter mmolek jgn smpai down line kat site na Fuck That Shit
Hmm mirror kan packet n sniff pn bleh kot since ada juniper tu..nt bleh create rule utk filter..
gud luck mate :d
xsxs Wrote:"I may contains particular combinations of colors or black and white contrast, may/ may not cause epilepsy, nausea or the urge to do weird things to domestic animals."
EOF
);}
Reply


Forum Jump: