ReceiveHTTPFile will Datei nicht runterladen

[Andesdaf]

4.3 - Vista - 32Bit

genau das selbe bist du dir sicher, dass du nichts übersehen hast?
Eine komische Einstellung deines Compilers vielleicht?

[X360 Andy]

Nein wie immer , auch meine Vermutung das es am Virenschutz lag war falsch.

Code: Alles auswählen

InitNetwork()
Debug ReceiveHTTPFile("http://www.google.de","file.txt")

Gibt 1 (nach ca. 10 sek ... )

Code: Alles auswählen

InitNetwork()
Debug ReceiveHTTPFile("http://www.youtube.com" ,"file.txt")

Gibt 0

[tobe]

mit datei geht es bei mir:

Code: Alles auswählen

InitNetwork()
Debug ReceiveHTTPFile("http://www.youtube.com/robots.txt", "file.txt") 

[X360 Andy]

Jop das geht bei mir auch

[DarkDragon]

Youtube checkt wohl den User-Agent etc. und vergleicht ihn mit gängigen Browsern.

PB-Request:

Code: Alles auswählen

GET / HTTP/1.1
Accept: */*
Host: www.youtube.com
Connection: close

Antwort von Youtube:

Code: Alles auswählen

HTTP/1.1 400 Bad Request
Date: Mon, 06 Apr 2009 05:39:40 GMT
Server: Apache
X-YouTube-MID: WkFSZzctYUFHdmpsZVZNUFFoWktqOGtyYXJCMW94N05fR0FkLVJUMVFTeHpiTGZQaVZQejN3
Expires: Tue, 27 Apr 1971 19:44:06 EST
X-Content-Type-Options: nosniff
Cache-Control: no-cache
Connection: close
Transfer-Encoding: chunked
Content-Type: text/plain

0

[Andesdaf]

dann ist insgesamt YouTube schuld, und das arme PB hat keine Mitschuld

[X360 Andy]

dann ist insgesamt YouTube schuld, und das arme PB hat keine Mitschuld

Aber wieso geht es dann bei dir (scheinbar) ?




Muss ich nun einen manuelen Post Request an Youtueb machen oder wie könnte ich das lösen ?

[Marc-21]

Hi so wie der code gepostest wurde kann er garnicht gehen

die Procedure wird garnicht auf gerufen.

InitNetwork()
Procedure Videonamen(ID$)
If ReceiveHTTPFile("http://www.youtube.com/watch?v="+ID$,"xname.html")
If ReadFile(0, "xname.html")
While Eof(0) = 0
namestring$ = ReadString(0)
Debug namestring$
Wend
CloseFile(0)
EndIf
EndIf
EndProcedure


Hauptlink$ = "http://www.youtube.com/watch?v=nySMBojFkw0" ; GetGadgetText(#String_0)
VideoId$=StringField(Hauptlink$,2,"=")
VideoId$=StringField(VideoId$,1,"&")
Videonamen(VideoID$)

Wenn wenn mann ReceiveHTTPFile() geben diesen URLDownloadToFile_()

tauscht kann ich die Seite downloaden und die datei wird angelegt.

[Andesdaf]

natürlich wird die Procedure aufgerufen

Wenn wenn mann ReceiveHTTPFile() geben diesen URLDownloadToFile_()

tauscht kann ich die Seite downloaden und die datei wird angelegt.

URLDownloadToFile_ möchte ich eig. auch nicht nützen da hier ja wieder
Heuristik sofort anspringt.