Új hozzászólás Aktív témák

• #19434 sztanozs veterán gilfoyle #19433

  Új Válasz 2018-07-18 10:55:38 #19434

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  sztanozs

  veterán

  válasz gilfoyle #19433 üzenetére

  Milyen OS van a lekérő gépen, fájlba kell elmenteni a json-t, mire használod?
  Windowson megoldható ez - plusz program telepítése nélkül - vbscripttel, esetleg poweshellel is:
  VBS:
  Dim url, fileName, req
url = "http://kiszolgaloszerver/phpfile?param1=xx&param2=yy"
fileName = "c:\temp\file.json"
Set req = CreateObject("Msxml2.XMLHttp.6.0")
req.open "GET", url, False
req.send
If req.Status = 200 Then
With CreateObject("ADODB.Stream")
.Type = 1 'adTypeBinary
.Open
.Write req.responseBody
.SaveToFile fileName
.Close
End With
End If
Set req=Nothing

Új hozzászólás Aktív témák