[WX22] What is the best way to download a binary file via a webservice (6 replies)

Hi,

I changed all my FTP Download procedures in windev to httprequest.
I use a awp site and cut the file in pieces.

The code is:

WHEN EXCEPTION IN
	
	Deserialize(stMyDownload_Vorgang,bufBIN,psdBinary)
	
	
	
	//Datei öffnen
	nDateihandle=fOpen(stMyDownload_Vorgang.sDateiname,foRead)
	IF nDateihandle=-1 THEN
	stMyDownload_Vorgang.nStatus=5 //Fehler
	stMyDownload_Vorgang.sFehlermeldung="Fehler beim der Öffnen der Quelldatei ! "+CR+ErrorInfo(errFullDetails)
	stMyDownload_Vorgang.bErgebnis=False
	Serialize(stMyDownload_Vorgang,bufBIN,psdBinary)
	RESULT bufBIN
	END
	
	//Zeiger positionieren
	IF fSeek(nDateihandle,stMyDownload_Vorgang.nMove,fpBeginning)=-1 THEN
		stMyDownload_Vorgang.nStatus=5 //Fehler
		stMyDownload_Vorgang.sFehlermeldung="Fehler bei der Positionierung der Quelldatei ! "+CR+ErrorInfo(errFullDetails)
		stMyDownload_Vorgang.bErgebnis=False
		Serialize(stMyDownload_Vorgang,bufBIN,psdBinary)
		RESULT bufBIN
	END
	
	
	stMyDownload_Vorgang.sDaten=fRead(nDateihandle,nBlockgröße)
	stMyDownload_Vorgang.bufChecksumme=HashString(HA_MD5_128,stMyDownload_Vorgang.sDaten)
	stMyDownload_Vorgang.bErgebnis=True
	
DO
	stMyDownload_Vorgang.sDaten=""
	stMyDownload_Vorgang.sFehlermeldung="Fehler beim Download Vorgang !"+CR+ExceptionInfo(errFullDetails)
	stMyDownload_Vorgang.bErgebnis=False
	
END

Serialize(stMyDownload_Vorgang,bufBIN,psdBinary)
RESULT bufBIN

It works, but it is not so fast as it could be. Has anybody found a better way to transfer binary files via HTML in windev ?