https://foro.gambas-es.org/viewtopic.php?f=5&t=6871 ----------------------------------- portaro Miercoles, 14 Marzo 2018, 00:21 Programa Que Me Busca La Meteorologia Para Mi Ciudad. ----------------------------------- Estoy haciendo un nuevo programa lo que pasa es que deseo saber que objecto (componente) Gmabas seria el mejor para hacer algo como un print de la recogida del comado curl. [code linenumbers=false syntax=gambas]Public Sub Button1_Click() Dim ext As String Exec ["curl", "https://wttr.in/Chaves"] To ext TextBox1.text = ext End [/code] ↓ Algo esta mal que no me lo esta poniendo pero segun yo recuerdo es asi que se hace la sintaxis. Se puede reusar el codigo por si deseais tenero para vuestras localizaciones usa el link a wttr.in , solo le cambiais el nombre de ciudad o local /Chaves a vuestro local que sea soportado por el source del servicio. Saludos y gracias. ----------------------------------- jsbsan Miercoles, 14 Marzo 2018, 08:42 Re: Programa Que Me Busca La Meteorologia Para Mi Ciudad. ----------------------------------- Portaro: Creo que el problema es el https (el certificado de seguridad de la página web donde estas intentando acceder), si le pones la dirección sin la "s" en el http, creo que te va a funcionar. ([b]http[/b][b]s[/b]://wttr.in/Chaves -> mejor poner -> [b]http[/b]://wttr.in/Chaves) Prueba esto: [code linenumbers=false syntax=gambas]Public Sub Button1_Click() Dim ext As String Exec ["curl", "http://wttr.in/Chaves"] To ext TextBox1.text = ext End[/code] ----------------------------------- tincho Miercoles, 14 Marzo 2018, 13:59 Re: Programa Que Me Busca La Meteorologia Para Mi Ciudad. ----------------------------------- En el applet "Clock" de mate, puede haber algo que ayude con el tema. https://github.com/mate-desktop/mate-panel/blob/master/applets/clock/clock-location.c Saludos ----------------------------------- vuott Miercoles, 14 Marzo 2018, 22:35 Re: Programa Que Me Busca La Meteorologia Para Mi Ciudad. ----------------------------------- :roll: ----------------------------------- portaro Jueves, 15 Marzo 2018, 02:28 Re: Programa Que Me Busca La Meteorologia Para Mi Ciudad. ----------------------------------- [b]Si que funciona[/b] no salen los diseños (secadra es por ser ascii), pero los datos salen. Gracias jsbsan. tincho no uso Mate el mio es LXDE. Pero gracias. Saludos vuott :mryellow: Gracias a todos. ----------------------------------- tincho Jueves, 15 Marzo 2018, 10:07 Re: Programa Que Me Busca La Meteorologia Para Mi Ciudad. ----------------------------------- [quote user="portaro" post="41574"][b]...tincho no uso Mate el mio es LXDE...[/quote] No importa el escritorio que uses, el link apunta al codigo fuente del aplet [b]clock[/b] de mate y echar un vistazo a como obtiene la informacion meteorologica este código es lo que te puede servir, es decir podrias reproducir lo mismo que hace dicho prgrama (el aplet) en tu programa de gambas. Saludos. ----------------------------------- vuott Sabado, 17 Marzo 2018, 02:32 Re: Programa Que Me Busca La Meteorologia Para Mi Ciudad. ----------------------------------- Para [u]no utilizar[/u] "Shell" o "Exec", yo propondría este simple codigo (siempre si te interesa ver el resultado en console): [code linenumbers=false syntax=gambas]Private wv As New WebView(Me) Public Sub Form_Open() wv.Url = "http://wttr.in/Chaves" End Public Sub Button1_Click() Dim te As New TextEdit(Me) te.RichText = wv.HTML Print te.Text End[/code] ----------------------------------- vuott Sabado, 17 Marzo 2018, 03:43 Re: Programa Que Me Busca La Meteorologia Para Mi Ciudad. ----------------------------------- ...y mejor: (hace falta activar los Componentes " [i]gb.net[/i] " y " [i]gb.net.curl[/i] ") [code linenumbers=false syntax=gambas]Public Sub Main() Dim hc As New HttpClient Print hc.Download("http://wttr.in/Chaves", Null) End[/code] u otra manera: [code linenumbers=false syntax=gambas]Private hf As New HttpClient As "CLI" Private s As String Public Sub Main() s = Temp With hf .URL = "http://wttr.in/Chaves" .Timeout = 10 .Get(Null, s) End With End Public Sub CLI_Finished() hf.Close Print File.Load(s) End[/code] ...y si preferimos variables locales: [code linenumbers=false syntax=gambas]Public Sub Main() Dim hf As New HttpClient Dim s As String s = Temp With hf .URL = "http://wttr.in/Chaves" .Timeout = 10 .Get(Null, s) End With Wait 0.5 ' Si no conseguimos resultados, tenemos que aumentar el valor de la espera. hf.Close Print File.Load(s) End[/code] ----------------------------------- tercoIDE Sabado, 17 Marzo 2018, 13:27 Re: Programa Que Me Busca La Meteorologia Para Mi Ciudad. ----------------------------------- excelente ----------------------------------- tincho Lunes, 19 Marzo 2018, 16:07 Re: Programa Que Me Busca La Meteorologia Para Mi Ciudad. ----------------------------------- Buenisimo Vuott. [img]https://foro.gambas-es.org/files/images/2590/pantallazo_2018_03_19_16_04_38.png[/img] Saludos.