XProfan

Jürgen
Strahl

"C:\\Users\uweskarke\Desktop\kurt.txt" statt "C://Users/uweskarke/Desktop/kurt.txt"

----------------------------------------------------------------------------
---Wer hier Schreibfehler findet, darf sie behalten .---
---Wer keine findet, hat Pech gehabt.----------------------
---------------------------------------------------------------------------

20.02.2014 ▲

E.T.

quelque chose umgestrickt, so peux chacun testen (et funzen tut's aussi encore)

:
Kompilieren Marque Séparation

Cls
print FTP("Connect","freeftp","freeftp","ftp.xprofan.com","21")
print FTP("SetBinary",1)' muß hier nicht sein...
print FTP("GetFileSize","kurt.txt"), "Byte"
Var Ziel$ = winpaths() + "\\kurt.txt"
print "Ziel:",Ziel$
print FTP("Download","kurt.txt",Ziel$)
print "FTP-Meldung:",$FTPStatus'Statusmeldung von FTP - immer interessant.
waitinput
print FTP("Disconnect")
End

Proc WinPaths

    Declare Nummer%, Out$
    Nummer% = 16'Desktop des akt. Benutzers
    DEF @GSFP(4) ! "Shell32","SHGetSpecialFolderPathA"
    Out$ = Space$(255)
    GSFP(0,ADDR(Out$),Nummer%,0)
    Return @Trim$(Out$)

ENDPROC

Vlt. pas seulement simple den Voir le texte source aus qui Aider kopieren, mais aussi par-dessus pour penser: Local et FTP nutzen einmal Backslash et einmal Slash.

Grüße aus Sachsen... Mario
WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte...

20.02.2014 ▲

XProfan X2
Win7 Home Premium, SP1, Core(TM) i5-3427U @ 1.80GHz

Muemmelmann

allô M.

cela avec den BS et Slash J'ai eu gestern déjà probiert, là cela mon erste Vermutung était, half mais pas. Dein Hinweis avec Status FTP pouvoir Sinn, daran liegt es aussi irgendwie, versteh seulement pas comment so es chez dir funzt et ici nicht….

1
1
4 Byte
but: xxxxx 'stimmt so
0

FTP-annonce: 425 Cold not open data connection to port 49218: No route to host

FTP-faute 425 peux sur une FTP-Client retour volonté, si qui Server keinen Socket pour qui Datenübertragung ouvrir kann…

LG
Uwe

XProfan X2
Win7 Home Premium, SP1, Core(TM) i5-3427U @ 1.80GHz

Muemmelmann

... il spricht simple pas avec mir !!!
Kompilieren Marque Séparation

Cls
var ziel$ = getdir$("@")+"\kurt.txt"
print ziel$
print FTP("Connect","freeftp","freeftp","ftp.xprofan.com","21")," FTP-Meldung:",$FTPStatus
print
print FTP("SetBinary",1), " FTP-Meldung:",$FTPStatus
print
print FTP("GetFileSize","kurt.txt"), " FTP-Meldung:",$FTPStatus
print
print FTP("Download","kurt.txt",ziel$), " FTP-Meldung:",$FTPStatus
print
waitinput
print FTP("Disconnect"), " FTP-Meldung:",$FTPStatus
waitinput
bildschirmfoto-2014-02-21-um-17.09.59.png   28 kB
Hochgeladen: 21.02.2014
Downloadcounter:  
Download

XProfan X2
Windows 8 Pro, Core(TM)2 Duo P7450 @ 2.13GHz

Paul
Glatz

peux du qui Dossier avec einem anderen FTP Programme downloaden?

E.T.

peux je pas nachvollziehen. avec Deinem letzten Beispiel (sur Desktop gespeichert):

test.png	27 kB

Hochgeladen:	21.02.2014

Downloadcounter:
		Download

Grüße aus Sachsen... Mario
WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte...

Michael
Wodrich

Statt des Desktops sollte besser un Verzeichnis gewählt volonté, dans dem on De toute façon Schreibrechte hat. c'est beim Desktop pas toujours gegeben.

PS.:
chez mir fonctionne es, mais qui Firewall hatte sich trop mot gemeldet.

XProfan X2
Windows (TM) Vista Ultimate, Core(TM) i7 920 @ 2.67GHz, 9206,26 MB
Programmieren, das spannendste Detektivspiel der Welt.

XProfan X2
WinXP, SP3, Core(TM) i7-3770 @ 3.40GHz

souvent ist qui Ursache pour solche faute chez Rolands FTP-Funktionen dass Télécharger et Upload souvent asynchron zum Programmablauf geschehen. je hatte cela zwar déjà hunderfach bemerkt et Workarounds posté (siehe iFTP-Diskussionen) mais es wird officiel pas ausreichend bemerkt.

09.07.2014 ▲