actualizaciones en asp

[new_eniac]

tengo una portal con estado del tiempo y quisiera saber si hay alguna tecnologia que pueda extraer la informacion de por ejemplo de la pagina weather.com automaticamente y que aparezca en mi pagina su informacion sobre el estado del tiempo...

[mariano_donati]

Me quiero sumar a este mensaje, ya que ando buscando exactamente lo mismo, pero con alguna página que me de la cotización del dólar y el euro al momento. Espero que exista alguna forma de hacerlo. Esperemos respuestas.
Saludos!.

[u_goldman]

Creo que esta solucion ya se habia dado, si no mal recuerdo Myakire y Orharo la proporcionaron utilizando XMLHTTP.

Salu2,

[orharo2003]

Exacto master .

Asi es, en asp podemos utilzar peticiones, te pongo un ejemplo :
El siguiente script da los valores del tipo de cambio del dolar para México.

Server.CreateObject("Microsoft.XMLHTTP")

' /* TIPO DE CAMBIO HSBC */
xml.Open "get", "http://dsrefa01.hsbc.com.mx/aptrix/InternetPub.nsf/Content/TasasSplash", False
xml.Send

Cadena=xml.responseText
PosIni1 = InStr(Cadena,"DOLAR AMERICANO")
PosIni2 = InStr(PosIni1,Cadena,"$") PosFin = InStr(PosIni2, Cadena,"<") DolarCompra = MID(Cadena, PosIni2, PosFin-PosIni2) PosIni1 = PosFin PosIni2 = InStr(PosIni1,Cadena,"$")
PosFin = InStr(PosIni2, Cadena,"<") DolarVenta = MID(Cadena, PosIni2, PosFin-PosIni2)

hsbc_dolar_compra=formatnumber(replace(DolarCompra," ",""),2) hsbc_dolar_venta=formatnumber(replace(DolarVenta," ",""),2)

' /* TIPO DE CAMBIO BANCOMER */

xml.Open "get", "http://www.bancomer.com.mx/ahome/home_index_main.asp", False xml.Send Cadena = xml.responseText
CadenaInicial = ""
CadenaFinal = ""
PosIni = InStr(Cadena,CadenaInicial)
PosFin = InStr(PosIni, Cadena,CadenaFinal)
Cadena = MID(Cadena, PosIni, PosFin-PosIni) Vec = SPLIT(Cadena,"")


bancomer_dolar_compra=formatnumber(mid(Vec(3),1,5),2) bancomer_dolar_venta=formatnumber(mid(Vec(4),1,5),2)


Espero te sirva como ejemplo.

[sjam7]

chequen las FAQs
http://www.forosdelweb.com/showpost....&postcount=104

ese saca el PR solo es cuestion de adaptarlo a la pagina que deseen y los datos que quieren

[sjam7]

Esto toma el precio del dolar de la pagina de HSBC en pesos mexicanos

Código:

<%
Dim objXMLHTTP, xml
  Set xml = Server.CreateObject("Microsoft.XMLHTTP")
  xml.Open "GET", "http://dsrefa01.hsbc.com.mx/aptrix/InternetPub.nsf/Content/TasasSplash", False
  xml.Send
	 Cadena = CSTR(xml.responseText)
	 PosIni1 = InStr(Cadena,"DOLAR AMERICANO")
	 PosIni2 = InStr(PosIni1,Cadena,"$")
	 PosFin  = InStr(PosIni2, Cadena,"<")
   DolarCompra = MID(Cadena, PosIni2, PosFin-PosIni2)
  Set xml = Nothing%>

y para llamar el precio del dolar es:
<%=FormatCurrency(CDbl(MID(DolarCompra,InStr(Dolar Compra,";")+1,LEN(DolarCompra))),2) %>

[mariano_donati]

Espectacular, sin palabras...
Muchas gracias por la información que brindan, este foro es la mejor enseñanza que alguien puede llegar a tener.
Saludos!!!

[new_eniac]

Gracias amigos ami tambien me resulto el codigo... le hice algunos cambios y ya tengo las informaciones que necesitaba... realmente estoy muy agradecido

[orharo2003]

Iniciado por mariano_donati

Espectacular, sin palabras...
Muchas gracias por la información que brindan, este foro es la mejor enseñanza que alguien puede llegar a tener.
Saludos!!!

y aún hay más jejeje sólo que a su debido tiempo.