Daten Aktualliesierung... (Download) Frage

Übersicht BlitzMax, BlitzMax NG Allgemein

Neue Antwort erstellen

Mathias-Kwiatkowski

Betreff: Daten Aktualliesierung... (Download) Frage

BeitragFr, März 13, 2009 20:12
Antworten mit Zitat
Benutzer-Profile anzeigen
hi. ich hab da immernoch ein kl. problem

ich hab ein prog, was checkt, ob daten im Localen "Data" mit den Daten die auf einem Webhost liegen übereinstimmen, wenn nun etwas fehlt (Local) soll es vom webhost geladen werden.

so versuch ich es zu machen:

Code: [AUSKLAPPEN]
Function DatenCheck()
   DrawText "Aktualisierungscheck...", 10, 10
Flip
Delay 2000
alluser:String = LoadString ("HTTP::" + ServerADDY + "bts/abfrage_data.php")
myline:String = alluser
vorhanden:Int = 0


Repeat
   datnam:String = Mid(myline, 0, Instr(myline, "|", 0))
   
   myline = Mid(myline, Instr(myline, "|", 0) + 1, Len(myline) - 1)
   infoid:Int = Int(Mid(myline, 0, Instr(myline, "|", 0)))
   
   myline = Mid(myline, Instr(myline, "|", 0) + 1, Len(myline) - 1)
   If myline = "" Then Exit

   Verz = ReadDir("Data\")
   Repeat
      i = i + 1
         Datei:String = NextFile:String(Verz)
         If Datei:String = "" Then Exit
         If FileType("Data\" + Datei:String) = 2 Then
            
         Else
         
            If datei = datnam Then vorhanden = 1
         End If
   Forever
   CloseDir Verz
   
   If vorhanden = 0 Then
      Cls
      SetColor 255, 255, 255
      DrawText "Aktualisierungscheck...", 10, 10
      DrawText "Datei:" + datnam + " wird heruntergeladen.", 10, 30
      Flip
      
      Local Streams:TStream = ReadStream("http::backtospace.ba.funpic.de/" + datnam)
      Local Datas:TStream = WriteFile("data\" + datnam)
      While Not Eof(Streams)
         WriteByte Datas, ReadByte(Streams)
      Wend
      CloseFile Datas
      
      DrawText "Datei:" + datnam + " wird heruntergeladen.  - Fertig", 10, 30
      Flip
      
      setda = setda + 1
      Print setda
   End If
   
      
Until datnam = ""

End Function



also er list da nun aus datei 000.jpg is diese auch local wenn nicht lade herunter. manchmal klappt der code, manchmal aber auch nicht. wie kann ich daten besser downloaden (bilder z.b.) ?

oder wie kann man es effizienter machen?


danke im vorraus
 

c64

BeitragFr, März 13, 2009 20:50
Antworten mit Zitat
Benutzer-Profile anzeigen
Hi,

also was dein Problem angeht da kann ich dir momentan nich helfen, sporadische Fehler sind ehh die schlimmsten. Aber was deine überprüfung angeht die könnte effizienter sein in dem du die files nicht nur auf existenz sondern auch auf grösse oder Datum/Zeit (besser) prüfst somit würden auch auf dem Server aktualisierte Bilder (Daten) neu auf den Rechner geladen werden.

mfg C64.
Betreten verboten! Kinder haften für ihre Eltern!

Jolinah

BeitragFr, März 13, 2009 21:40
Antworten mit Zitat
Benutzer-Profile anzeigen
Was genau funktioniert manchmal nicht? Die Erkennung ob die Datei heruntergeladen werden soll, oder der Download selber?

Du kannst ja mal ein DebugStop einbauen und schauen was alles gemacht wird Wink

Edit: Vielleicht macht der Webserver auch ein Redirect oder etwas ähnliches. Ich weiss nicht ob sowas von "http::url" auch berücksichtigt wird. Vielleicht hilft das hier:

https://www.blitzforum.de/foru...hp?t=24120

oder

https://www.blitzforum.de/foru...hp?t=31051

Mathias-Kwiatkowski

BeitragFr, März 13, 2009 21:54
Antworten mit Zitat
Benutzer-Profile anzeigen
also nein alle daten stehen in einer mysql db, die einfach abgefragt wird. was genau nicht funktioniert is der download.

ab und an geht der download und manchmal nicht, fehler zeigt er dann keine an, ausser nen image wurde nciht geladen, dann bricht er ab, weil das image nicht existens is (local).


EDIT: und an C64, gute idde und wie setz ich es um? also local? den image datum kann ich ja auch in der mysql db hinterlegen...!
 

c64

BeitragSa, März 14, 2009 0:50
Antworten mit Zitat
Benutzer-Profile anzeigen
Gibts für sowas kein WinApi befehl ?! Wink
Betreten verboten! Kinder haften für ihre Eltern!

Neue Antwort erstellen


Übersicht BlitzMax, BlitzMax NG Allgemein

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group