POST y visua basic

Iniciado por satan69, 25 Mayo 2007, 05:48 AM

0 Miembros y 1 Visitante están viendo este tema.

Freeze.

Bueno disculpen mi ignorancia pero quisiera saber la utilidad de ese codigo....

Y saber si se puede escribir en un foro mediante una aplicación...

Xerok1!

una pregunta,este mekanismo se podria utilizar o es el utilizado para crear el ice cold?? :¬¬ :¬¬
si no es asi debe ser algo muy parecido..
un saludo
[Firma]Esperando haber si acaba el concurso de firmas y la pongo[/Firma]

yeikos

Cita de: Xerok1! en 27 Mayo 2007, 23:11 PM
una pregunta,este mekanismo se podria utilizar o es el utilizado para crear el ice cold?? :¬¬ :¬¬
si no es asi debe ser algo muy parecido..
un saludo

Una de tantas...

Xerok1!

ya lo suponia...un saludo ;) ;)
[Firma]Esperando haber si acaba el concurso de firmas y la pongo[/Firma]

Hans el Topo

la mitad de los foros no permitirán que postees nada con ese método y la otra mitad te baneará xD
 

satan69

Cita de: Hans el Topo en 28 Mayo 2007, 20:33 PM
la mitad de los foros no permitirán que postees nada con ese método y la otra mitad te baneará xD

por eso existen vulnerabilidades...    seria probar exactamente lo mismo...

satan69

Cita de: YeIk0s en 27 Mayo 2007, 14:25 PM
Cita de: satan69 en 26 Mayo 2007, 18:26 PM
Cita de: YeIk0s en 26 Mayo 2007, 15:55 PM
Cita de: satan69 en 25 Mayo 2007, 20:42 PM
lo probe pero no me funciona...

y desde el Inet...?

Sí funciona, escribe el código para que te podamos ayudar.

mejor te voy a enviar un mp.. porque no quiero que caiga en malos intensinadas

No comparto esa misma opinión, esto es un foro, y como tal, los conocimientos aprendidos aquí deben de ser compartidos...

Private Sub Form_Load()
Winsock1.Close
Winsock1.RemoteHost = "web.movistar.com.ni"
Winsock1.RemotePort = "80"
Winsock1.Connect
End Sub

Private Sub Winsock1_Connect()
strVar = "txtParaNumero=&txtMensaje=&txtDeQuien=&txtDeNumero=&txtContador=0&para=XXXXXX&men=sms&dnom=s0cratex&dnum=XXXXXX&contador=23&btnEnviar.x=17&btnEnviar.y=15"
strData = "POST /cgi-bin/sms.cgi HTTP/1.0" & vbCrLf
strData = strData & "Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-shockwave-flash, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, */*" & vbCrLf
strData = strData & "Referer: http://sms.movistar.com.ni/" & vbCrLf
strData = strData & "Accept-Language: es-mx" & vbCrLf
strData = strData & "Content-Type: application/x-www-form-urlencoded" & vbCrLf
strData = strData & "Proxy-Connection: Keep-Alive" & vbCrLf
strData = strData & "User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322; InfoPath.2)" & vbCrLf
strData = strData & "Host: web.movistar.com.ni" & vbCrLf
strData = strData & "Content-Length: " & Len(strVar) & vbCrLf
strData = strData & "Pragma: no-cache" & vbCrLf & vbCrLf
strData = strData & strVar & vbCrLf & vbCrLf
Winsock1.SendData strData
End Sub



en cierta parte es verdad... pero el detalle  es que te envie la pregunta por MP.. porque la pusiste aqui.. si yo queria que nadie mas sabiera... pero bueno... de todos modos gracias.. y como la pusiste aqui.. la compañia ya bloqueo la conexion... ya no se pude enviar mas sms...   :-[ :-[ :-[

Hans el Topo

si no quieres que te respondan, mejor no preguntes xD

que tu hagas la pregunta no significa que la respuesta te pertenezca xD
 

yeikos

Cita de: Hans el Topo en 28 Mayo 2007, 20:33 PM
la mitad de los foros no permitirán que postees nada con ese método y la otra mitad te baneará xD

Me da a mi que no tiene por qué haber ningún problema...

Bourne Ultimatum

q buena frase


Citarque tu hagas la pregunta no significa que la respuesta te pertenezca
"El pertenecia a esa clase singular de hombres que la especie produce rara vez,
en quienes el ansia de poder ilimitado es tan extremo que para conseguirlo
cualquier sufrimiento parece natural" Ernesto CHE Guevara

http://www.desdeabajorugby.com.ar