Temas

[MOD: No uses títulos no éticos de tipo "trollear" "putear" "hackear" etc porfavor, gracias.]

Código [Seleccionar] Expandir


@echo off
Color 0a
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo.
echo                               --------------
echo                               -Trolling LAN-
echo                               --------------
ping 127.0.0.0.1 -2 > nul
cls
echo.
echo.
echo.
echo.
echo.
echo.
ping 127.0.0.0.1 -2 > nul
cls
color a
echo.
echo By Smackinq
echo ===========
echo.
echo.
echo.
ping 127.0.0.0.1 -3 >nul
cls
:inicio
color e
echo.
echo.
echo.
echo que es lo que deseas hacer?
echo.
echo.
echo ==========================================================================
echo.                                                                         =
echo [1] enviar un mensaje a alguien de la red local                          =
echo.                                                                         =
echo [2] apagar el ordenador/reiniciar el ordenador a alguien de la red local =
echo.                                                                         =
echo [3] enviar un mensaje a todo el dominio de red local                     =
echo.                                                                         =
echo [4] salir del programa                                                   =
echo ==========================================================================
echo.
echo.
set /p opc=indica el numero de la orden a continuacion..
If %opc%== 1 goto netsnd
If %opc%== 2 goto shtdwn
If %opc%== 3 goto netdomn
If %opc%== 4 goto exit
:netsnd
cls
echo escriba el nombre del ordenador remoto el cual va a recibir el mensaje..
set /p remo=escriba aqui el nombre del ordenador:
echo escriba el mensaje
set /p mens=escribe el mensaje:
echo pulse una tecla para proceder
pause > nul
net send %remo% %mens%
ping 127.0.0.0.1 -5 > nul
cls
msg * mensaje enviado!
goto inicio
:shtdwn
cls
echo escribe R para reiniciar o S para apagar
set /p tuit=escribe una de las dos letras, "S" o "R":
echo escribe ahora el tiempo de apagado(en segundos)
set /p time=tiempo de apagado:
echo escribe ahora el ordenador remoto el cual va a apagarse
set /p orde=ordenador a apagar:
echo escribe ahora el comentario que quieres que se muestre al apagar..
set /p coment=escribe el comentario:
echo.
echo.
echo pulsa enter para proceder..
pause > nul
shutdown -%tuit% -f -t %time% -m %orde% -c "%coment%"
ping 127.0.0.0.1 -1 > nul
cls
msg * Apagado realizado!
goto inicio
:netdomn
cls
echo escribe el mensaje que vera todo el dominio de red lan!
set /p doma=escribe el mensaje:
echo pulsa enter para proceder!!!!!
pause > nul
net send /domain %doma%
ping 127.0.0.0.1 -2 > nul
cls
msg * mensaje enviado!
goto inicio
:exit
cls
color 0
echo By Smackinq
ping 127.0.0.0.1 -3 > nul
exit



MOD: No uses títulos no éticos de tipo "trollear" "putear" "hackear" etc porfavor, gracias.

I.A.1.b. Temas prohibidos.
          7.  Hacking no ético

Hola os traigo un extractor de source. para clonar.

no me ago responsable del mal uso de este software

ai que ejecutarlo como admin, el clon se guardara en la raiz de C: en formato htm

http://www.mediafire.com/?986yg8cpe3pqdbt

os dejo unos antivirus para los desconfiados

https://www.virustotal.com/vt/es/recepcion
http://www.kaspersky.com/virusscanner
http://www.bitdefender.es/scanner/online/free.html

Hola estoy haciendo un clonador de webs, necesito que me ayudarais para guardar el TexBox2.Tex en un documento de texto.

e probado haciendo esto:

Código [Seleccionar] Expandir

Dim oSW As New StreamWriter("desktopClon.txt"
Dim Linea As String = TextBox2.Text
oSW.WriteLine(Linea)
oSW.Flush()

pero no me sirve :/

Hola les muestro mi nuevo trabajillo no es gran cosa pero bueno jajaja .
pero ya se mejorara con el tiempo.

(Solo sirve con Gmail)

Código [Seleccionar] Expandir

Imports System.Net.Mail
Imports System.IO
Public Class Form1

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Timer1.Start()
   End Sub

   Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
       Timer1.Stop()
   End Sub

   Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
       Dim MyMailMessage As New MailMessage
       Try

           MyMailMessage.From() = New MailAddress(TextBox1.Text)
           MyMailMessage.To.Add(TextBox3.Text)
           MyMailMessage.Subject = TextBox5.Text
           MyMailMessage.Body = (TextBox4.Text)
           Dim SMTP As New SmtpClient("smtp.gmail.com")
           SMTP.Port = 587
           SMTP.EnableSsl = True
           SMTP.Credentials = New System.Net.NetworkCredential(TextBox1.Text, TextBox2.Text)
           SMTP.Send(MyMailMessage)

       Catch ex As Exception

       End Try
   End Sub

   Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
       Timer1.Interval = Textbox6.Text
   End Sub

   Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
       Close()
   End Sub

   Private Sub ReportarBugsToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ReportarBugsToolStripMenuItem.Click
       System.Diagnostics.Process.Start("http://foro.elhacker.net/pm.html;sa=send;u=463020")
   End Sub

   Private Sub IrAForoElHackernetToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles IrAForoElHackernetToolStripMenuItem.Click

   End Sub

   Private Sub RegistrateToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RegistrateToolStripMenuItem.Click
       System.Diagnostics.Process.Start("http://foro.elhacker.net/register.html")
   End Sub

   Private Sub IrALaWebToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles IrALaWebToolStripMenuItem.Click
       System.Diagnostics.Process.Start("http://foro.elhacker.net/")
   End Sub
End Class




Link: http://www.mediafire.com/download.php?yj3xa0butnbcbr0

[editado por no incluir el codigo fuente]

Hola esto os puede parecer una chorrada XD, pero ayer vi un programa que ni me acordaba que tenia es

Net Tools 5  el cual tiene muchos programillas algunos de los cuales bastante buenos y nada me

decidi a crear mi net tools claro que este solo era una prueba a ver como podria ser mas o menos.

PD: es necesario la ultima version de framework



LinK: editado por no incluir el codigo fuente

Link: http://www.mediafire.com/?q1lrwbc21g3sxrm

Link: http://www.mediafire.com/download.php?3fuxob6bfu5e55t

Hola estoy empezando con esto de la programacion y decidi compartir mi primer Flooder con ustedes os dejo una imagen.
acepto criticas para mejorar pero no insulten por favor



Link: http://www.mediafire.com/download.php?ntqlm8ke2luigix