Xojo Conferences
XDCMay2019MiamiUSA

Download (Real Studio network user group Deutschland Mailinglist archive)

Back to the thread list
Previous thread: PDF anzeigen
Next thread: Nochmal Encoding


Probleme mit String Bearbeitung   -   Markus Schnell
  Download   -   Stefan Mettenbrink
    Re: Download   -   Mike Ott

Download
Date: 02.08.04 04:31 (Mon, 2 Aug 2004 05:31:22 +0200)
From: Stefan Mettenbrink
Hat jemand ein kurzes Beispiel, wie an eine (Binär-)Datei von einer
vorgegebenen URL downloaden kann. (Mit Auswahl des Pfaddes, wo die Datei
gespeichert werden soll)

Alles was ich als Beispiel gefunden habe waren riesige Beispiele die
alles Mögliche konnten und ich erst zwei Tage Einarbeitung brauche.

MfG, Metti.

Re: Download
Date: 02.08.04 09:25 (Mon, 02 Aug 2004 10:25:02 +0200)
From: Mike Ott
> Hat jemand ein kurzes Beispiel, wie an eine (Binär-)Datei von einer
> vorgegebenen URL downloaden kann. (Mit Auswahl des Pfaddes, wo die
> Datei
> gespeichert werden soll)

Hallo Metti

Das http-Socket tut's. Ich hoffe, das bringt dich weiter:


url = "http://www.irgendeinstring.de"

name = nthField(url,"/",countFields(url,"/"))
name = Replace(name, "%", " ")

//

dlg = New SaveAsDialog
dlg.InitialDirectory = DesktopFolder
dlg.promptText = "Klicken Sie zum Fortfahren auf Download"
dlg.actionButtonCaption = "Download"
dlg.SuggestedFileName = name
dlg.Title = "PSB Update Checker"
f = dlg.ShowModalWithin(checkWindow)
If f = Nil then
return
End if

//

socket2.get(url, f)


Gruss
Mike

OS 10.3.4 / RB 4.5.3DE und RB 5.5.2DE
http://www.psb-info.ch/realbasic.html
-