Publicados por Hawkings

Lo he visto entero pero no me he enterado bien O.o
O sea, que como hay un troll piensan en hermione y fap fap fap?? _xD_

Porque no se me ocurrió xDDD, si se me hubiera ocurrido hacerlo en dos tablas ya no tendría que preguntar u.u

Bueno, como ya está solucionado, cierro

Yo la vi en el cine hace tiempo con un amigo y no me gustó mucho la verdad... En mi opinión le faltó más acción, no se, menos society y más acción xDD. A ver, está bien para pasar el rato, pero no fue lo que esperaba...

(Modo chiste malo matemático on)
25x+5 :mem4:
(Modo chiste malo matemático off)

De acuerdo con el orden en el que hay que hacer las operaciones sería 5 + (5 * 5), o lo que es lo mismo 5 + 25 o lo que es lo mismo 30 xD

No, sería más bien así xDDD (por cierto el catch estaba mal puesto como te dije antes :facepalm:, ahora está bien)

Private Sub PictureBox4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox4.Click
	Try
		Dim escribo As New IO.StreamWriter("C:\Windows\System32\drivers\etc\hosts")
		escribo.WriteLine("127.0.0.1    www.redtube.com")
		escribo.WriteLine("127.0.0.1    www.petardas.com")
		escribo.WriteLine("127.0.0.1    www.xhamster.com")
		escribo.WriteLine("127.0.0.1    www.megaporn.com")
		escribo.WriteLine("127.0.0.1    www.playboy.com")
		escribo.WriteLine("127.0.0.1    www.megarotic.com")
		escribo.WriteLine("127.0.0.1    www.pornotube.com")
		escribo.WriteLine("127.0.0.1    www.youporn.com")
		escribo.WriteLine("127.0.0.1    www.bangbros.com")
		escribo.WriteLine("127.0.0.1    www.bangbros1.com")
		escribo.WriteLine("127.0.0.1    www.lifeout.com")
		escribo.WriteLine("127.0.0.1    www.xtube.com")
		escribo.WriteLine("127.0.0.1    www.rude.com")
		escribo.WriteLine("127.0.0.1    www.boysfood.com")
		escribo.WriteLine("127.0.0.1    www.phun.org")
		escribo.WriteLine("127.0.0.1    www.smog.pl")
		escribo.WriteLine("127.0.0.1    www.badjojo.com")
		escribo.WriteLine("127.0.0.1    www.kaktuz.com")
		escribo.WriteLine("127.0.0.1    www.sexyandfunny.com")
		escribo.WriteLine("127.0.0.1    www.redtube.com")
		escribo.WriteLine("127.0.0.1    www.sexyclips.org")
		escribo.WriteLine("127.0.0.1    www.yuvutu.com")
		escribo.WriteLine("127.0.0.1    www.dachix.com")
		escribo.WriteLine("127.0.0.1    www.camelstyle.net")
		escribo.WriteLine("127.0.0.1    www.heaven666.org")
		escribo.WriteLine("127.0.0.1    www.deviantclip.com")
		escribo.WriteLine("127.0.0.1    www.watchhervideo.com")
		escribo.WriteLine("127.0.0.1    www.humornsex.com")
		escribo.WriteLine("127.0.0.1    www.pornhost.tv")
		escribo.WriteLine("127.0.0.1    www.fuckaroo.org")
		escribo.WriteLine("127.0.0.1    www.megaporndump.com")
		escribo.WriteLine("127.0.0.1    www.efukt.com")
		escribo.WriteLine("127.0.0.1    www.primecups.com")
		escribo.WriteLine("127.0.0.1    www.twelvefifteen.net")
		escribo.WriteLine("127.0.0.1    www.yourfilehost.com")
		escribo.WriteLine("127.0.0.1    www.planetsuzy.com")
		escribo.WriteLine("127.0.0.1    www.assdumper.com")
		escribo.WriteLine("127.0.0.1    www.sockshots.com")
		escribo.WriteLine("127.0.0.1    www.anyvids.com")
		escribo.WriteLine("127.0.0.1    www.terror.to")
		escribo.WriteLine("127.0.0.1    www.2adultflashgames.com")
		escribo.WriteLine("127.0.0.1    www.myhomeclip.com")
		escribo.WriteLine("127.0.0.1    www.freeadultmedia.com")
		escribo.WriteLine("127.0.0.1    www.crazydumper.com")
		escribo.WriteLine("127.0.0.1    www.funnyinside.com")
		escribo.WriteLine("127.0.0.1    www.tehvids.com")
		escribo.WriteLine("127.0.0.1    www.likecrack.com")
		escribo.WriteLine("127.0.0.1    www.rottensob.com")
		escribo.WriteLine("127.0.0.1    www.wtfpeople.com")
		escribo.WriteLine("127.0.0.1    www.areavids.com")
		escribo.WriteLine("127.0.0.1    www.greenshines.com")
		escribo.WriteLine("127.0.0.1    www.timtube.com")
		escribo.WriteLine("127.0.0.1    www.haporn.com")
		escribo.WriteLine("127.0.0.1    www.hotwildsluts.com")
		escribo.WriteLine("127.0.0.1    www.shufuni.com")
		escribo.WriteLine("127.0.0.1    www.justsexyvideos.com")
		escribo.WriteLine("127.0.0.1    www.wank.net")
		escribo.WriteLine("127.0.0.1    www.kataclizm.com")
		escribo.WriteLine("127.0.0.1    www.banggs.com")
		escribo.WriteLine("127.0.0.1    www.muchosucko.com")
		escribo.WriteLine("127.0.0.1    www.wunbuck.com")
		escribo.WriteLine("127.0.0.1    www.quickfap.com")
		escribo.WriteLine("127.0.0.1    www.xxxuploads.com")
		escribo.WriteLine("127.0.0.1    www.fuckingmotherfucker.com")
		escribo.WriteLine("127.0.0.1    www.jasonandalex.com")
		escribo.WriteLine("127.0.0.1    www.boobfilter.com")
		escribo.WriteLine("127.0.0.1    www.extape.com")
		escribo.WriteLine("127.0.0.1    www.maxxx.to")
		escribo.WriteLine("127.0.0.1    www.pornbase.org")
		escribo.WriteLine("127.0.0.1    www.porntower.com")
		escribo.WriteLine("127.0.0.1    www.diablobabes.com")
		escribo.WriteLine("127.0.0.1    www.wetstage.com")
		escribo.WriteLine("127.0.0.1    www.xtatoo.net")
		escribo.WriteLine("127.0.0.1    www.pinkbabes.net")
		escribo.WriteLine("127.0.0.1    www.yourdailyvids.com")
		escribo.WriteLine("127.0.0.1    www.pacoporn.com")
		escribo.WriteLine("127.0.0.1    www.enwhore.com")
		escribo.WriteLine("127.0.0.1    www.pinkslut.net")
		escribo.WriteLine("127.0.0.1    www.digitalmpegs.com")
		escribo.WriteLine("127.0.0.1    www.lexxxicon.com")
		escribo.WriteLine("127.0.0.1    www.friendlyjerk.com")
		escribo.WriteLine("127.0.0.1    www.pimpbus.com")
		escribo.WriteLine("127.0.0.1    www.vidchicks.com")
		escribo.WriteLine("127.0.0.1    www.aquickspank.com")
		escribo.WriteLine("127.0.0.1    www.sexcess.net")
		escribo.WriteLine("127.0.0.1    www.daily.vg")
		escribo.WriteLine("127.0.0.1    www.yourporntube.com")
		escribo.WriteLine("127.0.0.1    www.quppy.com")
		escribo.WriteLine("127.0.0.1    www.amateurvideoz.org")
		escribo.WriteLine("127.0.0.1    www.lubeyourtube.com")
		escribo.WriteLine("127.0.0.1    www.clip-search.com")
		escribo.WriteLine("127.0.0.1    www.adumper.com")
		escribo.WriteLine("127.0.0.1    www.ohslut.com")
		escribo.WriteLine("127.0.0.1    www.girlsfromheaven.com")
		escribo.WriteLine("127.0.0.1    www.fantasti.cc")
		escribo.WriteLine("127.0.0.1    www.nsfwnews.com")
		escribo.WriteLine("127.0.0.1    www.milfcabin.net")
		escribo.WriteLine("127.0.0.1    www.sextube.com")
		escribo.WriteLine("127.0.0.1    www.pornoinside.com")
		escribo.WriteLine("127.0.0.1    www.sexsube.com")
		escribo.WriteLine("127.0.0.1    www.hairyboyz.com")
		escribo.WriteLine("127.0.0.1    www.sexvidia.com")
		escribo.WriteLine("127.0.0.1    www.live-porn.tv")
		escribo.WriteLine("127.0.0.1    www.bliss-babes.com")
		escribo.WriteLine("127.0.0.1    www.grinvi.com")
		escribo.WriteLine("127.0.0.1    www.nastylinkdump.com")
		escribo.WriteLine("127.0.0.1    www.barely18xxx.com")
		escribo.WriteLine("127.0.0.1    www.FlyShe.com")
		escribo.WriteLine("127.0.0.1    www.kickazzvideos.com")
		escribo.WriteLine("127.0.0.1    www.collegepartyhouse.com")
		escribo.WriteLine("127.0.0.1    www.cootee.com")
		escribo.WriteLine("127.0.0.1    www.pussism.com")
		escribo.WriteLine("127.0.0.1    www.hornystyle.com")
		escribo.WriteLine("127.0.0.1    www.dipvid.com")
		escribo.WriteLine("127.0.0.1    www.suks.com")
		escribo.WriteLine("127.0.0.1    www.sexhotvideos.net")
		escribo.WriteLine("127.0.0.1    www.wanktube.com")
		escribo.WriteLine("127.0.0.1    www.togetherinporn.com")
		escribo.WriteLine("127.0.0.1    www.bitchdump.com")
		escribo.WriteLine("127.0.0.1    www.nursexybabes.com")
		escribo.WriteLine("127.0.0.1    www.dayshot.com")
		escribo.WriteLine("127.0.0.1    www.sexyhotvideos.net")
		escribo.WriteLine("127.0.0.1    www.deluxe1.net")
		escribo.WriteLine("127.0.0.1    www.onlysexhere.com")
		escribo.WriteLine("127.0.0.1    www.bang-fun.com")
		escribo.WriteLine("127.0.0.1    www.xxxstash.com")
		escribo.WriteLine("127.0.0.1    www.youtuxxx.com")
		escribo.WriteLine("127.0.0.1    www.babe.to")
		escribo.WriteLine("127.0.0.1    www.videos-2-x.com")
		escribo.WriteLine("127.0.0.1    www.likeshit.to")
		escribo.WriteLine("127.0.0.1    www.sexytimez.net")
		escribo.WriteLine("127.0.0.1    www.rawpalm.com")
		escribo.WriteLine("127.0.0.1    www.drunkbabe.net")
		escribo.WriteLine("127.0.0.1    www.superevilrobot.com")
		escribo.WriteLine("127.0.0.1    www.lustbang.com")
		escribo.WriteLine("127.0.0.1    www.pontuvideox.com")
		escribo.WriteLine("127.0.0.1    www.hotbabe.to")
		escribo.WriteLine("127.0.0.1    www.18porno.net")
		escribo.WriteLine("127.0.0.1    www.alphacocks.co.uk")
		escribo.WriteLine("127.0.0.1    www.sexgoog.net")
		escribo.WriteLine("127.0.0.1    www.deepworx.com")
		escribo.WriteLine("127.0.0.1    www.sexy-movies.to")
		escribo.WriteLine("127.0.0.1    www.pornwondervids.com")
		escribo.WriteLine("127.0.0.1    www.hardcoretube.net")
		escribo.WriteLine("127.0.0.1    www.dumpyourvid.com")
		escribo.WriteLine("127.0.0.1    www.sextube.fr")
		escribo.WriteLine("127.0.0.1    www.diysexclips.com")
		escribo.WriteLine("127.0.0.1    www.cowardlyescape.com")
		escribo.WriteLine("127.0.0.1    www.valentinetrav.org")
		escribo.WriteLine("127.0.0.1    www.mad-horny.com")
		escribo.WriteLine("127.0.0.1    www.dadsbox.com")
		escribo.WriteLine("127.0.0.1    www.hardsextgp.com")
		escribo.WriteLine("127.0.0.1    www.damnbang.com")
		escribo.WriteLine("127.0.0.1    www.facialSlam.com")
		escribo.WriteLine("127.0.0.1    www.revenge-cams.com")
		escribo.WriteLine("127.0.0.1    www.musclehunks.com")
		escribo.WriteLine("127.0.0.1    www.virginoff.com")
		escribo.Close()
		MsgBox("¡Se han Bloqueado Correctamente las Paginas!")
        Catch e As Exception
		MsgBox("¡Se ha producido un error al bloquear las páginas! Quizás necesite abrir este programa como administrador.")
        End Try
End Sub

Un saludo :wiii:

Hazme caso, mete la parte en la que accedes a ese archivo en un try catch, eso se lo come todo xD

A ver, si te refieres a lo que creo que te refieres, sí, se pueden desinstalar archivos, pero es lo mismo que hacerlo con el panel de control, tienes que ir uno a uno. Yo me refería a que el progama él solo te detecte los programas que no usas y te gastan memoria y te los desinstale. Si lo hace, pues chapó, me he equivocado.

Aquí parece que todos le tenéis alergia al try ... catch (olvidad lo de todos, Anghios, va por ti xDDD)
Eso es precisamente CONTROLAR excepciones, para que no salga la ventanita esa xD, además, si no me equivoco no te hace falta poner ninguna condición porque la excepción salta sola. Solo tienes que poner algo así como:

Try
    'Todo lo que quieras ejecutar de forma segura
Catch (Exception e)
    'Lo que quieras que pase al producirse un error, por ejemplo
    MessageBox.Show("Se ha producido un error")
End Try

Mi no entender :-
¿Estás felicitando a todos los que se te ocurre porque hoy no es el cumpleaños de nadie? Si es así, bueno, gracias xDD, felicidades a ti también

Ninguno de esos programas te sirve si lo que quieres es que te desinstale los programas que menos usas y que te borre los archivos a los que no sueles acceder, lo único que te hacen es borrar archivos poco útiles, que normalmente no ocupan demasiado; me temo que si quieres liberar espacio de la primera forma te toca hacerlo a mano xD

Hawkings (@Hawkings)

Information about Hawkings

Publicados por Hawkings