Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Temas - s_azazel

#1
Buenos dias!!! estoy intentando automatizar un log en una web pero a diferencia de otras veces tengo problemas ya que la web ejecuta el log mediante un script y el web browser no lo ejecuta


El codigo del boton es este
:
Citar<input name="accept" tabindex="3" class="bs-login bso-button bso-button-large" onclick="ACEPTARNIF(document.myForm.pinNIFRecordado,'1')" type="button" value="Entrar">

Rellenando los cotroles de user y pass y con el " Element.InvokeMember("click")" de simpre no funciona

He intentado llamar al script directmente asi : Navegador.Document.InvokeScript("ACEPTARNIF('MiUsuario','MiPass','1')")
Y directamente no hace nada


Se os ocurre como se podria solucionar???

Mil gracias!!!!!
#2
.NET (C#, VB.NET, ASP) / dibujar en 3D
22 Diciembre 2018, 22:19 PM
Estoy haciendo una app para controlar una cnc router y necesito generar una imagen en 3D a partir de un archivo gcode...

Es posible en Vb.net dibujar lineas en 3D indicando las coordenadas x y z de la misma forma que se hace con el system.drawing2D??

Gracias!!!!!
#3
Programación General / auto login Http post request
27 Septiembre 2017, 17:55 PM
Buenas tardes!!! a ver si me podeis echar una mano con esto que me esta dando dolores de cabeza jajaj

Estoy haciendo un bot que me automatice el login en un web y creo que me esta dando problemas creo que con las cookies.... os pongo un poco la info

Esta es la info que me saca el live http header:

Citarhttp://www.marketglory.com/account_login/

POST /account_login/ HTTP/1.1
Host: www.marketglory.com
User-Agent: Mozilla/5.0 (Windows NT 10.0; WOW64; rv:55.0) Gecko/20100101 Firefox/55.0
Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8
Accept-Language: es-ES,es;q=0.8,en-US;q=0.5,en;q=0.3
Accept-Encoding: gzip, deflate
Referer: http://www.marketglory.com/
Content-Type: application/x-www-form-urlencoded
Content-Length: 120
Cookie: __cfduid=d43181c96a79c6e98ff78fb22812c11161505423004; _ga=GA1.2.845929005.1505423010; _gid=GA1.2.379722860.1505423010; __auc=1fe82af315e8234299c769495e0; __utma=105699615.845929005.1505423010.1506484770.1506526239.53; __utmz=105699615.1506484770.52.5.utmcsr=google|utmccn=(organic)|utmcmd=organic|utmctr=(not%20provided); fbm_417737454961499=base_domain=.marketglory.com; __mgcid=54cee7e896aedefea74929b79eaee694; __utmc=105699615; mgapp_downloaded_app=1; mg_chat=0; ci_session=16rfh8ni4crjm18ojv902juvr5j10064; is_mobile=0; __asc=185b2e6c15ec3f6194cea6ea9f5; __utmb=105699615.7.10.1506526239; __insp_wid=370090747; __insp_slim=1506526420033; __insp_nv=true; __insp_targlpu=aHR0cDovL3d3dy5tYXJrZXRnbG9yeS5jb20vbG9nb2Zm; __insp_targlpt=UGxheSBNYXJrZXRHbG9yeSBvbmxpbmUgc3RyYXRlZ3kgZ2FtZSwgYW4gb25saW5lIGJyb3dzZXIgd2FyIGdhbWUgLSBlbmdsaXNoIGxvZ29mZg%3D%3D; fbsr_417737454961499=f2ApjIhcf-9drbzCq_yACBC5DkH8VlQYMuvMtjNJ-YE.eyJhbGdvcml0aG0iOiJITUFDLVNIQTI1NiIsImNvZGUiOiJBUUMwb3d1bVRldFAyYk5iN0hWQ3Z3UllUY2hYMkhkVHFJY0xRQW5iYnVoekdZbkNVa1p4VFB1YzQwN0xDWm9SUkI3M2FjMkNyTFF0OWQzRDFGdnctS1BLQlllT015M2plQ2tLNjIyaGh5VDZaRDg2d0Nzek9YcDVYSlpnTDdCWjMybFJhVkU0YVBHWnBCdGFSZzhHNFUzUjNteXJjQWdsal9VTURub3gtZXM5aEludm5pTFJjWWRtaUptcmMycmhkLS1WYU1XNXMzRGJwQUVCcDlUX2dJVG9Rcy1ucmpSclFsMGpTVDNjblItRW82dTlkM0dxWkY4cEJoeXctQ2psb2dqUmY0N0ZGYWJUVU84R0tJS1NseVdQVUJ3R3o3V1hONm5hNmNrVWloNFozeGtwOFk2aXVtYmozNE12X0FRQTExYXh6RklFQWQzZVI3LTY5aTE2SUNsYiIsImlzc3VlZF9hdCI6MTUwNjUyNjQxOSwidXNlcl9pZCI6IjEwMTU2MDYxNTI0NTg3ODQxIn0; __insp_norec_sess=true
Connection: keep-alive
Upgrade-Insecure-Requests: 1
token=adfed48b43fa0f74ad4b2a699052f093&action=loginUser&character_name=minombre&character_password=micontraseña&button=OK: undefined

HTTP/1.1 200 OK
Date: Wed, 27 Sep 2017 15:46:09 GMT
Content-Type: text/html; charset=UTF-8
Transfer-Encoding: chunked
Connection: keep-alive
Expires: Thu, 19 Nov 1981 08:52:00 GMT
Cache-Control: no-store, no-cache, must-revalidate
Pragma: no-cache
Refresh: 0;url=http://www.marketglory.com/account
Set-Cookie: mg_chat=0; expires=Thu, 28-Sep-2017 03:46:08 GMT; Max-Age=43200; path=/; domain=marketglory.com
X-Powered-By: PHP/7.0.23, PleskLin
Vary: Accept-Encoding
Server: cloudflare-nginx
CF-RAY: 3a4f9811b75e4322-MXP
----------------------------------------------------------

Creo que el problema son las cookies... el "token" lo he comprobado y lo he sacado del codigo funete de la web para logearse, simpre sale uno diferente
.
Lo que me extraña muchisimo es que en el post ya directamente el explorador saca unas cookies no se de donde ni de donde leerlas antes de obtener la respuesta :(

tengo este codigo:

Citar#include <String.au3>
$sPD = ''
$oHTTP = ObjCreate("winhttp.winhttprequest.5.1")
$oHTTP.Open("POST", "http://www.marketglory.com", False)
$oHTTP.SetRequestHeader("Content-Type", "application/x-www-form-urlencoded")
$oHTTP.Send($sPD)
$oReceived = $oHTTP.ResponseText
$oStatusCode = $oHTTP.Status
;FileWrite("prueba.txt",$oReceived)

$Token = _StringBetween($oReceived,'<input type="hidden" name="token" value="','" />')


$sPD = "token="  & $Token[1] &   "&action=loginUser&character_name=miusuariol&character_password=micontraseña&button=OK: undefined"
$oHTTP.Open("POST", "http://www.marketglory.com/account_login/", False)
$oHTTP.SetRequestHeader("Content-Type", "application/x-www-form-urlencoded")
$oHTTP.Send($sPD)
$oReceived = $oHTTP.ResponseText
$oStatusCode = $oHTTP.Status
FileWrite("prueba.txt",$oReceived)

En vez de logearse me salta una web de login otra vez....¿alguna apreciacion???  Gracias!!!!!!
#4
Buenos dias estoy intentando sacar el codigo de una web pero me tira error todo el rato y la verdad no se por que... con otras webs si funciona correctamente no se si estara protegida o algo

Sin embargo al usar el control WebBrowser si que me deja leer el codigo html pero necesito mas velocidad para no ir mostrando todas las paginas :D

Os dejo el codigo que tengo: con el nombre de la web inculida

Código (vbnet) [Seleccionar]
Dim URl As String = "https://es.magiccardmarket.eu/"

       Try
           Dim request As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create(URl)
           Dim response As System.Net.HttpWebResponse = request.GetResponse()

           Dim sr As System.IO.StreamReader = New System.IO.StreamReader(response.GetResponseStream())
           Dim sourcecode As String = sr.ReadToEnd()
           TextBox1.Text = sourcecode
       Catch ex As Exception
           MessageBox.Show("Invalid Url")
           Return
       End Try


Mil gracias!!!!
#5
Buenos dias!!! Hace un tiempo hice unas fotos y las comprimi en un rar con contraseña.

La cosa es que no me acuerdo, se que solo son letras y minusculas
He buscado algun programa de fuerza bruta pero son lentisimos la verdad es que son importantes y me joderia perderlas :(

¿cual es el mas rapido que conoceis??? ¿se ria posible sacarla aunque sea en unos meses???

Gracias!!!!
#6
Redes / Conectar a lan desde mi ip publica
16 Junio 2014, 08:22 AM
Buenos dias tengo un problema que me esta volviendo loco la verdad es que no se si seria este el foro donde ponerlo si no agradeceria que lo movierais  ;D

estoy programando con una base de datos en postrgesql y lo tengo todo configurado para conexiones entrantes desde fuera de la lan

Cuando accedo desde otro ordenador de fuera de la lan mediante la ip publica me accede sin problemas.Pero cunado intento acceder desde uno de dentro  por medio de la ip publica me da error de conexion

Sabriais indicarme por donde puede estar el problema???

Gracias!!!
#7
Buenos dias!!! he hecho varios bots para aplicaciones a base de identificar imagenes en la pantalla y clcks y me gustaria aprender a profundizar un poco mas

Hay alguna forma de saber que orden se le envia a la aplicacion al hacer click en algun sitio de la aplicacion y enviar ese mensaje directamente o algo asi???

Agradeceria si me podeis orientar algo mas sobre esto o pasarme algun sitio con informacion de interes

Gracias!!!
#8
Buenas tardesss estoy intentando mediante el api mouse_event conseguir que me haga un "arrastre el raton en una ventan fuera de mi aplicacion.

Activo bien la otra ventana y consigo hacer clicks pero no veo la forma de hacer un arraste automatico de una coordenada a otra

Muchas gracias!!!
#9
Pues eso estoy buscando por internet y no encuentro la forma de pausar y resumir los hilos
Si e podeis echar una mano os lo agradeceria  :D :D :D
#10
Buenas tardes!!! estoy intentando automatizar un registro. tengo algo en phyton pero me gustaria pasarlo a vb.net porque me siento mas comodo

en phyton pido info de una url enviandole unos datos:

Citara=requests.get(url) data={'idDepartamento':'1','idServicio':'1','idTramite':'22','idAsunto':'42'}

e=requests.post(url,data=data)

Y en vb.net tengo algo asi:

CitarDim request As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create("URL")
     
       
        request.CookieContainer = New CookieContainer()
        Dim response As System.Net.HttpWebResponse = request.GetResponse()

El codigo de la pagina me lo devuelve perfectamente pero no encuento la forma de enviar con el request los datos ({'idDepartamento':'1','idServicio':'1','idTramite':'22','idAsunto':'42'})
Que envio con phyton


Gracias!!!

#11
Hola...Tenia medio programado un bot para un programa y lo han actualizado hace dos dias, eliminando la posibilidad de enviar clicks a la ventan del programa mediante el mouse_event...

Para hacer esto han tenido que configurar las llamadas al raton como se hacia antes en dos mediante la interrupcion 33h no??

¿teneis alguna idea de como se podria solucionar esto para que funcione como antes?

Al menos un sitio por donde empear a trabajar...

Muchas gracias!!!
#12
.NET (C#, VB.NET, ASP) / anti-bot??
6 Junio 2012, 18:25 PM
Buenas tardes!!!!.hace un tiempo hice un bot para un juego y para simular las pulsaciones del raton usaba la api  mouse_event.

La cosa es que hoy han actualizado el juego y parece que todo funcuona correcto menos las pulsaciones del raton

¿Es posible que hayan echo algo para que esto no funcione???

Se os ocurre alguna otra manera de llamar a pulsciones de raton de uan forma menos detectable???

Gracias???
#13
Estoy trabajando en un bot para un juego y necesito pasar a una string el texto que hay escrito en una imagen.

Para ello he utilizado el MOID de las office en vb.net...con imagenes de prueba me lo reconoce perfectamente pero con la que capturo del juego me tira error

He tratado la imagen en tiempo de ejecucion para intentar hacerla mas clara para el OCR pero ni por esas...

Conoceis alguna libreria mas potente para reconocimiento de textos??? os dejo una captura de como me ha quedado la imagen despues de tratarla yo creo que esta bastante reconocible...





Gracias!!!!

#14
Estoy intentando numerar las ventanas que tengo activas...

Este es el codigo que tengo:

Código (vbnet) [Seleccionar]
Option Explicit On
Public Class Form1
   
    Public Declare Function EnumWindows Lib "user32" _
    (ByVal lpEnumFunc As Long, _
     ByVal lParam As Long) As Long


   
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Call EnumWindows(AddressOf EnumWindowProc, &H0)

    End Sub

  Public Function EnumWindowProc(ByVal hwnd As Long, ByVal lParam As Long) As Long

EnumWindowProc=1


End function

End Class


Pero la linea de la llamada a EnumWindows me da este error

"Una expresión 'AddressOf' no se puede convertir en 'Long' debido a que 'Long' no es un tipo delegado"


Sabeis a que se puede deber???
Muchas gracias me estoy volviendo loco :(
#15
Holaaa tengo un nuevo proyecto que es hacer un bot para un programa que trabaja con internet y me surgen un par de dudas a ver si me podriais asesorar un poco

¿Algun tutorial para acceder a la memoria del programa a tiempo real?

¿O seria mejor capturar los paquetes directamente cunado llegan de internet al programa?

A ver si me podeis dar alguna idea de por donde comenzar estoy bastante perdido con este tema

Muachas gracias!!!!
#16
Hola estoy tratando de parchear una mochila... todo va bien... he localizado y colocado un bp en todas las calls a la mochila pero al ejecutar el porograma me da un error si lo hago atraves del olly

os dejo una imagen del error






He intentado con el plugin aadp4olly marcando todas las casillas y con el olly avanced tb marcando todas las casillas del anti-debug y me sigue saltando...

Sabeis como puedo hacer para que corra el programa normalmente sobre el olly??

Gracias!!
#17
Hola!!

Tengo un programa protegido con una mochila superpro... dispongo de un dump de la mochila y la puedo emular el problema es que el numero de seri de la mochila y el programa no coinciden porque la licencia es de diferentes empresas...

He localizado el numero de serie de la mochila y de el programa y la ida seria cambiar el serial en uno de los dos para que funcionara.

La primera pregunta seria si es posible de alguna foprma abrir el archivo .dng donde tengo la informacion para emular la mochila y cambiarle el serial directamente

Y la segunda... he localizado un archivo .exe que hace la comprobacion al instalar el programa de que la mochial sea la correcta... y localizado las call a la mochila...

La cuestion es que estoy un poco verde aun en el tema y no consigo localizar el serial de la instalacion para cambierlo...he buscado strings y no me coincide ninguna ni con marte dle serial

a ver si me podeis orientar un poco...Gracias!!!!






#18
Ingeniería Inversa / Esto seria factible????
21 Marzo 2011, 11:24 AM
A ver tengo un programa para empresas que utiliza una sentinel superpro registrado a un nombre...... y el mismo programa registrado a otro nombre que utiliza una nethasp.

Cada programa solo funciona con su mochila...Venden los programas a cada empresa ya con  la modificacion para su mochila

La cuestion es que la superpro la tengo ya emulada pero solo hasta la version 7 del programa (de la empresa que usa la super pro)

Si comparo la version 7 del programa de las dos empresas tendra que ser todo igual menos los valores que difieren a cada mochila.....

Y luego podria cambiar esos valores en el programa de la version 10 que solo tengo la version del nethasp al cual no tengo acceso

Supongo k funcionara puesto k todas las versiones funcionan con la misma mochila


Ya que estamos sabeis si con el olly o alguno similar se pueden comparar dos programas????

Gracias!!!!!!!!!!!!!!!!!!!!!!!
#19
Programación C/C++ / Enviar pulsaciones de teclas
3 Noviembre 2010, 15:31 PM
Muy buenas estoy intentando hacer un bot para un juego enviando pulsaciones de teclado para que realice el movimiento y me encuentro con el siguiente problema....

Esto es lo que tengo;

#include <stdio.h>
#include <windows.h>
HWND Handle;
long x;
main ()
{



Handle=FindWindow(NULL,"Nombre de la ventana");
printf ("%d\n",Handle);
   for(x=1;x<=10;x=x+1)
   {
PostMessage (Handle, WM_KEYDOWN, 87,5000);
}
}

La cosa es que si tengo la ventana del chat dentro del juego abierta me escibe correctamente las "w" pero si la cierro no me avanza el personaje que es lo que deberia de hacer al pulsar la w

Sabeis a que sepuede deber????

Gracias!!!!
#20
Muy Buenas, estoy iniciandome en el mundo de la ingenieria inversa y mi primer proyecto es hacer un progrma que controle otro.

Para eso he puesto varios bmsg y he visto las llamadas que hacen.

Mi pregunta es... en algun lenguaje de programacion.... vb o c se puede escribir alguna orden para que en tiempo de ejecucion el programa valla a una direccion y la ejecute????

Muchas gracias!!!!!
#21
Holaaaa pues eso.... si sabeis de algun chat interesante...XDDD
#22
Holaaaaaaaa tenia un problema con la ransefencia de archivos de mi troyano y era k si enviavas un archivo muy grabde se colgaba y lei que lo mejor era partirlo en trozos para enviarlo....
Os pongo mi code para a ver si me podeis hechar una mano porque no encuentro el error :S:S
la transferencia me la hace correctamente....y recibo el archivo con la extension correcta y el tamaño correcto (alguna vez tienen albun byte de mas) pero a la hora de abrirlos me dan error :S:S


Cliente:

If Datos = "enviar" Then
Dim buffer As String
Open CD.FileName For Binary Access Read As #1
buffer = Space$(25000)
For i = 1 To FileLen(CD.FileName) / 25000
Get #1, , buffer
WS1(Index).SendData buffer
If FileLen(CD.FileName) - Loc(1) <= 25000 Then
buffer = Space$(FileLen(CD.FileName) - Loc(1))
Get #1, , buffer
WS1(Index).SendData buffer
End If
Next
End If



Servidor:

If intrecibir = True Then
dtotal = Datos + dtotal
total = Len(dtotal)
Text7.Text = total
If tamaño <= Text7.Text And intrecibir = True Then
Put #1, 1, dtotal 'Escribimos
Close #1
intrecibir = False
WS.SendData "recibido"
End If
End If


If Left(Datos, 7) = "archivo" Then
dato = Split(Datos, "|")
tamaño = dato(1)
ruta = dato(2)
Open ruta For Binary As #1
Text5.Text = tamaño
Text6.Text = ruta
intrecibir = True
WS.SendData "enviar"
End If

End Sub



Muchas gracias

pd: falnta alguna variable sin definir que las tengo al principio del code
#23
Hola a todos!!!!! estoy intenando añadir a mi aplicacion un codigo para identificar k av tiene instalado en la maquina del server me gustaria haber si  me podriais dar alguna idea de por donde c¡podria empezar???

La mejor forma seria identificando los procesos abiertos no????



Graciass!!!!