Respuesta : Ayuda : upload o XMLHTTPRequest

#1 Jhonny Vargas P. [MVP]

31/05/2006 - 14:36 | Informe spam

En .NET es tan simple... :'(

En fin... si pretendes hacerlo con VB6.0 puedes revisar este link. En el
titulo dice sobre restacar el código fuente de una página... pero haciendo
un pequeño cambio, puedes enviar datos a la página ASP (te recomiendo .NET)
http://msmvps.com/blogs/jvargas/art...10291.aspx

OJO está en VBScript y no en VB6.0 pero para el caso da lo mismo... pruebalo
y me cuentas.

El cambio de lo anterior tendría que ser:

Dim RutaArchivo

RutaArchivo = "C:\..\imagen.jpg"

Set objStream = Server.CreateObject("ADODB.Stream")

objStream.Open

objStream.Type = 1 'tipo binario

objStream.LoadFromFile RutaArchivo

'NO LO HE PROBADO ENVIANDO DATOS BINARIOS...

'PERO DEBERÍA FUNCIONAR

URL = "http:/.../pagina.aspx"

Set objServerXMLHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP.4.0")

objServerXMLHTTP.Open "POST", URL

objServerXMLHTTP.Send objStream.Read
Respuesta = objServerXMLHTTP.responseText

Set objServerXMLHTTP = Nothing

objStream.Close

Set objStream = Nothing

Y desde el ASP solo deberías hacer un:

DatosBinarios = Request

Saludos,
Jhonny Vargas P.
Santiago de Chile
http://msmvps.com/jvargas

"NNTP" escribió en el mensaje
news:sa5fg.2149695$

Como puedo usar el XMLHTTPRequest para enviar un archivo en POST en metodo
enctype y que una asp lea el post y lo guarde en el servidor.

Vamos loq ue se pretende es enviar un archivo desde VB a ASP para que lo
guarde en el servidor.

Responder a este mensaje

#2 Jhonny Vargas P. [MVP]

31/05/2006 - 14:36 | Informe spam

En .NET es tan simple... :'(

En fin... si pretendes hacerlo con VB6.0 puedes revisar este link. En el
titulo dice sobre restacar el código fuente de una página... pero haciendo
un pequeño cambio, puedes enviar datos a la página ASP (te recomiendo .NET)
http://msmvps.com/blogs/jvargas/art...10291.aspx

OJO está en VBScript y no en VB6.0 pero para el caso da lo mismo... pruebalo
y me cuentas.

El cambio de lo anterior tendría que ser:

Dim RutaArchivo

RutaArchivo = "C:\..\imagen.jpg"

Set objStream = Server.CreateObject("ADODB.Stream")

objStream.Open

objStream.Type = 1 'tipo binario

objStream.LoadFromFile RutaArchivo

'NO LO HE PROBADO ENVIANDO DATOS BINARIOS...

'PERO DEBERÍA FUNCIONAR

URL = "http:/.../pagina.aspx"

Set objServerXMLHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP.4.0")

objServerXMLHTTP.Open "POST", URL

objServerXMLHTTP.Send objStream.Read
Respuesta = objServerXMLHTTP.responseText

Set objServerXMLHTTP = Nothing

objStream.Close

Set objStream = Nothing

Y desde el ASP solo deberías hacer un:

DatosBinarios = Request

Saludos,
Jhonny Vargas P.
Santiago de Chile
http://msmvps.com/jvargas

"NNTP" escribió en el mensaje
news:sa5fg.2149695$

Como puedo usar el XMLHTTPRequest para enviar un archivo en POST en metodo
enctype y que una asp lea el post y lo guarde en el servidor.

Vamos loq ue se pretende es enviar un archivo desde VB a ASP para que lo
guarde en el servidor.

Responder a este mensaje

#3 NNTP

31/05/2006 - 17:34 | Informe spam

Gracias pero supongo que lo haré mejor usando Socks.

Respecto al NET puedo decir que lo tengo instalado y es una PURA
MIEEEERDAAAA , es es verda, ahora todo estña hecha, no hace falta hacer nada
pq los objetos ya estan, pero es una patata el programar los objetos y es
bastante frustante.

Fijate que ni si quiera se puede iniciar un formulario de forma oculta,
cuando en VB solo poniendo visible=false o me.hide lo hace, en el NET no es
posible y como eso mil cosas. Para mi el NET es lo peor de todo, y el
monopolio nos obligará a usarlo.

PD: Eso de los argumentos en las ejecuciones de objetos ni idea pq no
rescato nunca nada y ademas ya no se pueden crear indices de objetos.

En fin... si pretendes hacerlo con VB6.0 puedes revisar este link. En el
titulo dice sobre restacar el código fuente de una página... pero haciendo
un pequeño cambio, puedes enviar datos a la página ASP (te recomiendo
.NET)
http://msmvps.com/blogs/jvargas/art...10291.aspx

OJO está en VBScript y no en VB6.0 pero para el caso da lo mismo...
pruebalo y me cuentas.

El cambio de lo anterior tendría que ser:

Dim RutaArchivo

RutaArchivo = "C:\..\imagen.jpg"

Set objStream = Server.CreateObject("ADODB.Stream")

objStream.Open

objStream.Type = 1 'tipo binario

objStream.LoadFromFile RutaArchivo

'NO LO HE PROBADO ENVIANDO DATOS BINARIOS...

'PERO DEBERÍA FUNCIONAR

URL = "http:/.../pagina.aspx"

Set objServerXMLHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP.4.0")

objServerXMLHTTP.Open "POST", URL

objServerXMLHTTP.Send objStream.Read
Respuesta = objServerXMLHTTP.responseText

Set objServerXMLHTTP = Nothing

objStream.Close

Set objStream = Nothing

Y desde el ASP solo deberías hacer un:

DatosBinarios = Request

Saludos,
Jhonny Vargas P.
Santiago de Chile
http://msmvps.com/jvargas

"NNTP" escribió en el mensaje
news:sa5fg.2149695$

Como puedo usar el XMLHTTPRequest para enviar un archivo en POST en
metodo enctype y que una asp lea el post y lo guarde en el servidor.

Vamos loq ue se pretende es enviar un archivo desde VB a ASP para que lo
guarde en el servidor.

Responder a este mensaje

#4 NNTP

31/05/2006 - 17:34 | Informe spam

Gracias pero supongo que lo haré mejor usando Socks.

Respecto al NET puedo decir que lo tengo instalado y es una PURA
MIEEEERDAAAA , es es verda, ahora todo estña hecha, no hace falta hacer nada
pq los objetos ya estan, pero es una patata el programar los objetos y es
bastante frustante.

Fijate que ni si quiera se puede iniciar un formulario de forma oculta,
cuando en VB solo poniendo visible=false o me.hide lo hace, en el NET no es
posible y como eso mil cosas. Para mi el NET es lo peor de todo, y el
monopolio nos obligará a usarlo.

PD: Eso de los argumentos en las ejecuciones de objetos ni idea pq no
rescato nunca nada y ademas ya no se pueden crear indices de objetos.

En fin... si pretendes hacerlo con VB6.0 puedes revisar este link. En el
titulo dice sobre restacar el código fuente de una página... pero haciendo
un pequeño cambio, puedes enviar datos a la página ASP (te recomiendo
.NET)
http://msmvps.com/blogs/jvargas/art...10291.aspx

OJO está en VBScript y no en VB6.0 pero para el caso da lo mismo...
pruebalo y me cuentas.

El cambio de lo anterior tendría que ser:

Dim RutaArchivo

RutaArchivo = "C:\..\imagen.jpg"

Set objStream = Server.CreateObject("ADODB.Stream")

objStream.Open

objStream.Type = 1 'tipo binario

objStream.LoadFromFile RutaArchivo

'NO LO HE PROBADO ENVIANDO DATOS BINARIOS...

'PERO DEBERÍA FUNCIONAR

URL = "http:/.../pagina.aspx"

Set objServerXMLHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP.4.0")

objServerXMLHTTP.Open "POST", URL

objServerXMLHTTP.Send objStream.Read
Respuesta = objServerXMLHTTP.responseText

Set objServerXMLHTTP = Nothing

objStream.Close

Set objStream = Nothing

Y desde el ASP solo deberías hacer un:

DatosBinarios = Request

Saludos,
Jhonny Vargas P.
Santiago de Chile
http://msmvps.com/jvargas

"NNTP" escribió en el mensaje
news:sa5fg.2149695$

Como puedo usar el XMLHTTPRequest para enviar un archivo en POST en
metodo enctype y que una asp lea el post y lo guarde en el servidor.

Vamos loq ue se pretende es enviar un archivo desde VB a ASP para que lo
guarde en el servidor.

Responder a este mensaje

#5 Jhonny Vargas P. [MVP]

31/05/2006 - 17:43 | Informe spam

Será entonces como tu dices ;)

Haslo como gustes y perdona por tratar de ayudarte

Saludos,
Jhonny Vargas P.
Santiago de Chile
http://msmvps.com/jvargas

"NNTP" escribió en el mensaje
news:sIifg.2170655$

Gracias pero supongo que lo haré mejor usando Socks.

Respecto al NET puedo decir que lo tengo instalado y es una PURA
MIEEEERDAAAA , es es verda, ahora todo estña hecha, no hace falta hacer
nada pq los objetos ya estan, pero es una patata el programar los objetos
y es bastante frustante.

Fijate que ni si quiera se puede iniciar un formulario de forma oculta,
cuando en VB solo poniendo visible=false o me.hide lo hace, en el NET no
es posible y como eso mil cosas. Para mi el NET es lo peor de todo, y el
monopolio nos obligará a usarlo.

PD: Eso de los argumentos en las ejecuciones de objetos ni idea pq no
rescato nunca nada y ademas ya no se pueden crear indices de objetos.

En fin... si pretendes hacerlo con VB6.0 puedes revisar este link. En el
titulo dice sobre restacar el código fuente de una página... pero
haciendo un pequeño cambio, puedes enviar datos a la página ASP (te
recomiendo .NET)
http://msmvps.com/blogs/jvargas/art...10291.aspx

OJO está en VBScript y no en VB6.0 pero para el caso da lo mismo...
pruebalo y me cuentas.

El cambio de lo anterior tendría que ser:

Dim RutaArchivo

RutaArchivo = "C:\..\imagen.jpg"

Set objStream = Server.CreateObject("ADODB.Stream")

objStream.Open

objStream.Type = 1 'tipo binario

objStream.LoadFromFile RutaArchivo

'NO LO HE PROBADO ENVIANDO DATOS BINARIOS...

'PERO DEBERÍA FUNCIONAR

URL = "http:/.../pagina.aspx"

Set objServerXMLHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP.4.0")

objServerXMLHTTP.Open "POST", URL

objServerXMLHTTP.Send objStream.Read
Respuesta = objServerXMLHTTP.responseText

Set objServerXMLHTTP = Nothing

objStream.Close

Set objStream = Nothing

Y desde el ASP solo deberías hacer un:

DatosBinarios = Request

Saludos,
Jhonny Vargas P.
Santiago de Chile
http://msmvps.com/jvargas

"NNTP" escribió en el mensaje
news:sa5fg.2149695$

Como puedo usar el XMLHTTPRequest para enviar un archivo en POST en
metodo enctype y que una asp lea el post y lo guarde en el servidor.

Vamos loq ue se pretende es enviar un archivo desde VB a ASP para que lo
guarde en el servidor.

Responder a este mensaje

Ads by Google

Ayuda : upload o XMLHTTPRequest

Preguntas similare

Leer las respuestas