elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Arreglado, de nuevo, el registro del warzone (wargame) de EHN


+  Foro de elhacker.net
|-+  Programación
| |-+  Scripting
| | |-+  [pregunta]cual es la mejor forma de hacer un uploader en vbs
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: [pregunta]cual es la mejor forma de hacer un uploader en vbs  (Leído 1,171 veces)
daryo


Desconectado Desconectado

Mensajes: 1.071



Ver Perfil WWW
[pregunta]cual es la mejor forma de hacer un uploader en vbs
« en: 29 Abril 2014, 21:17 pm »

eso que opinan uso  winsock? , PUT de http con MSXML2.XMLHTTP, mm no se alguna idea? gracias  ;D


En línea

buenas
Mad Antrax
Colaborador
***
Desconectado Desconectado

Mensajes: 2.164


Cheats y Trainers para todos!


Ver Perfil WWW
Re: [pregunta]cual es la mejor forma de hacer un uploader en vbs
« Respuesta #1 en: 30 Abril 2014, 01:36 am »

Código
  1. Set oINT = CreateObject("MSXML2.xmlHTTP")
  2. Function SendFile(A)
  3. On Error Resume Next
  4. Set objStream = CreateObject("ADODB.Stream")
  5. objStream.Type = 1
  6. objStream.Open()
  7. objStream.LoadFromFile(A)
  8. Set objXML = CreateObject("MSXml2.DOMDocument")
  9. Set objDocElem = objXML.createElement("Base64Data")
  10. objDocElem.dataType = "bin.base64"
  11. objDocElem.nodeTypedValue = objStream.Read()
  12. B = objDocElem.text
  13. oINT.Open "post", "http://" & Host & ":" & Port , False
  14. oINT.Send "::sendfile::" & A & "<>" & B & "::<:end:>"
  15. End Function

Ésta es la función que utilizo yo.

Llamo la función SendFile("C:\hola.txt")

El fichero se abre con Adob.Stream y utilizando el COM de XML lo transformo en un array Base64. Luego lo envío con un objeto MSXML2.xmlHTTP

En la parte del receptor, tendrás que transformar el Base64 y crear el fichero en modo binario.


En línea

No hago hacks/cheats para juegos Online.
Tampoco ayudo a nadie a realizar hacks/cheats para juegos Online.
daryo


Desconectado Desconectado

Mensajes: 1.071



Ver Perfil WWW
Re: [pregunta]cual es la mejor forma de hacer un uploader en vbs
« Respuesta #2 en: 30 Abril 2014, 02:09 am »

muchas gracias!
En línea

buenas
Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines