[ERLEDIGT] RunProgram url und einen String hinzufügen?

[RSBasic]

Wie Kiffi richtig vermutet hat, musst du die beiden Zeilen tauschen:

Code: Alles auswählen

MainFormShow()
Url.s="http://store.steampowered.com/api/appdetails?appids="+GetGadgetText(#Input_Api_Number)

Code: Alles auswählen

Url.s="http://store.steampowered.com/api/appdetails?appids="+GetGadgetText(#Input_Api_Number)
MainFormShow()

[udg]

Code: Alles auswählen

            Start() ; öffne WebGadget
            Url.s="http://store.steampowered.com/api/appdetails?appids="+GetGadgetText(#Input_Api_Number)

ohne jetzt Deinen Code genauer zu kennen: Das sieht mir nach der falschen Reihenfolge aus. Willst Du nicht zuerst den URL zuweisen und dann das WebGadget öffnen?

Grüße ... Peter

dadurch ,dass ich erst die Prozedur aufrufe die das WebGadget beinhaltet und dann die Globale URL, funktioinert das so nicht. Das WebGadget bleibt leer.
Also hast Du recht, die Reihenfolge passt bei mir dann nicht.

[udg]

Wie Kiffi richtig vermutet hat, musst du die beiden Zeilen tauschen:

Code: Alles auswählen

Url.s="http://store.steampowered.com/api/appdetails?appids="+GetGadgetText(#Input_Api_Number)
MainFormShow()

Nun passt es endlich. Danke Euch allen.

Leider weiche ich immer noch auf diese Zeile aus:

Code: Alles auswählen

RunProgram("http://store.steampowered.com/api/appdetails?appids="+GetGadgetText(#Input_Api_Number))

weil das WebGadget mir den Inhalt nicht anzeigt

aber was kann ich nun tun damit es mir alles auch anzeigt ? Kommt das WebGadget damit nicht klar? Der Browser kanns und ich ging davon aus, es sei reiner Text.
siehe Bild:

[RSBasic]

Das ist eine Internet Explorer-Einstellung. Versuche mal, ob du mit ReceiveHTTPMemory() mehr Glück hast. Oder wenn du eine ältere Version besitzt, dann mit ReceiveHTTPFile().

[udg]

Das ist eine Internet Explorer-Einstellung. Versuche mal, ob du mit ReceiveHTTPMemory() mehr Glück hast. Oder wenn du eine ältere Version besitzt, dann mit ReceiveHTTPFile().

wenn ich das richtig verstehe speichert dies die Datei auf die Platte ohne Dialog aber zeigt sie nicht im Webgadget an. Liege ich da richtig?
Wenn ja, nutzt mir diese Methode nix.

Die Datei die Aufgerufen wird ist eine *.json Datei.

PS
ReceiveHTTPMemory() kennt PureBasic 5.30 nicht

[RSBasic]

Du kannst die json-Datei herunterladen und anschließend diese direkt im WebGadget anzeigen. Du kannst auch lokale Dateien im WebGadget anzeigen lassen.

[udg]

Du kannst die json-Datei herunterladen und anschließend diese direkt im WebGadget anzeigen. Du kannst auch lokale Dateien im WebGadget anzeigen lassen.

gut,

puhh,

dann muss ich erst mal die Hilfe wälzen.

danke dir

[RSBasic]

Lad die Datei am besten im Temp-Verzeichnis herunter. Da hast du immer Schreibrechte. Den Pfad zum temporären Verzeichnis kannst du mit GetTemporaryDirectory() ermitteln.

[udg]

Es kommt immer der Save File Dialog sobald ich meinen Button Drücke. Im Moment probier ich wie ich das unterbinde und gleich gespeichert wird mit deiner Hilfe von vorhin.

Code: Alles auswählen

EnableExplicit

Global Url.s

Enumeration
  #Input_Api_Number
  #Btn_SteamApi
  #Web_Steam
EndEnumeration

If OpenWindow(0, 0, 0, 500, 400, "Window", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  StringGadget(#Input_Api_Number, 230, 50, 250, 28, "374320", #PB_Text_Center|#SS_CENTERIMAGE|#PB_String_BorderLess)
  ButtonGadget(#Btn_SteamApi, 230, 90, 250, 28, "Auslesen", 0)
  WebGadget(#Web_Steam, 10, 10, 210, 118, "")
  Repeat
    Select WaitWindowEvent()
      Case #PB_Event_Gadget
        Select EventGadget()
          Case #Btn_SteamApi
            Url.s="http://store.steampowered.com/api/appdetails?appids="+GetGadgetText(#Input_Api_Number)
            Debug Url
            SetGadgetText(#Web_Steam, Url)
        EndSelect
      Case #PB_Event_CloseWindow
        End
    EndSelect
  ForEver
EndIf

[RSBasic]

Code: Alles auswählen

EnableExplicit

InitNetwork()

Global Url.s

Enumeration
  #Input_Api_Number
  #Btn_SteamApi
  #Web_Steam
EndEnumeration

If OpenWindow(0, 0, 0, 500, 400, "Window", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  StringGadget(#Input_Api_Number, 230, 50, 250, 28, "374320", #PB_Text_Center|#SS_CENTERIMAGE|#PB_String_BorderLess)
  ButtonGadget(#Btn_SteamApi, 230, 90, 250, 28, "Auslesen", 0)
  WebGadget(#Web_Steam, 10, 10, 210, 118, "")
  
  Repeat
    Select WaitWindowEvent()
      Case #PB_Event_Gadget
        Select EventGadget()
          Case #Btn_SteamApi
            Url.s="http://store.steampowered.com/api/appdetails?appids="+GetGadgetText(#Input_Api_Number)
            ReceiveHTTPFile(Url, GetTemporaryDirectory() + "appdetails.json")
            SetGadgetText(#Web_Steam, "file:///" + GetTemporaryDirectory() + "appdetails.json")
        EndSelect
      Case #PB_Event_CloseWindow
        End
    EndSelect
  ForEver
EndIf