Dim F as FolderItem
Dim s As String
s=Right(MainWin.DownLinkText, 4)
Ça ce n'est pas la bonne façon de déterminer l'extension d'un fichier
(j'imagine que c'est ce que tu essayes de faire ici) ! Regarde sur
http://www.declaresub.com/wiki/index.php/Split_name_and_extension_of_a_FolderItem
Mainwin.IsOpen=true
Self.Title="Téléchargement de "+MainWin.NameText.Text
F = GetFolderItem(Mafenêtre.statictext.text ,_
FolderItem.PathTypeURL)
download.TCPSocket1.Get(MainWin.DownLinkText,F)
Deux erreurs:
1. Pour obtenir un FolderItem de ton dossier de téléchargement, tu
dois faire F = GetFolderItem( Mafenêtre.statixtext.text,
FolderItem.PathTypeShell ) et pas PathTypeURL (qui correspondrait à file:///Users/Seb/Desktop)
.. N'oublie pas qu'il faut avoir un slash "/" au début de ton chemin
pour indiquer que c'est un chemin absolu
2. Tu passes à la fonction Get un dossier une téléchargement mais tu
dois en fait passer un FICHIER (qui n'existe pas encore), sinon ça ne
marche pas.
F = F.Child( NomDuFichierSurLeDisqueDur )
Stéphane
Le 12 avr. 08 à 16:54, Sébastien Debiève a écrit :
Je me disais que vu comme c'est un chemin comme Users/Seb/Desktop je
devait pas mettre FolderItem.PathTypeUR
J'ai essayer en mettant simplement comme ceci :
F = GetFolderItem(Mafenetre.statictext.text)
Là il ne télécharge pas le fichier. Il arrête toute suite sans
donner un message.
Sébastien.
Le 12-avr.-08 à 16:48, Stephane Pinel a écrit :
à mon avis tout se passe bien mais ton fichier est ailleurs :
Dans le debuguer, quelle tronche a ton FolderItem ?
A mon avis, ça vient de "FolderItem.PathTypeURL" : Quel path passes-
tu à ton FolderItem ? "/Users/Seb/Desktop/" ?
A+
---
Stéphane Pinel - REAL Software
Support Technique en Français
43, Rue Marius Aufan 92300 Levallois-Perret (FR)
http://www.realsoftware.fr
Rejoignez la communauté francophone des développeurs REALbasic :
<http://www.realsoftware.com/support/listmanager/>
Le 12 avr. 08 à 16:44, Sébastien Debiève a écrit :
En mode debug, aucun message.
Il télécharge complètement, mais là où il doit enregistrer, le
fichier ne s'y trouve pas, rien, vide :-(
Sébastien
Le 12-avr.-08 à 16:38, Stephane Pinel a écrit :
Sébastien,
Aucun contrôle d'erreur :-( ... pas bien ça ;-)
Que se passe-t-il en mode debug ?
A+
---
Stéphane Pinel - REAL Software
Support Technique en Français
43, Rue Marius Aufan 92300 Levallois-Perret (FR)
http://www.realsoftware.fr
Rejoignez la communauté francophone des développeurs REALbasic :
<http://www.realsoftware.com/support/listmanager/>
Le 12 avr. 08 à 16:32, Sébastien Debiève a écrit :
Voici tout le code :
Dim F as FolderItem
Dim s As String
s=Right(MainWin.DownLinkText, 4)
Mainwin.IsOpen=true
Self.Title="Téléchargement de "+MainWin.NameText.Text
F = GetFolderItem(Mafenêtre.statictext.text ,_
FolderItem.PathTypeURL)
download.TCPSocket1.Get(MainWin.DownLinkText,F)
Sébastien
Le 12-avr.-08 à 16:30, Stephane Pinel a écrit :
Salut Sébastien,
Reçois-tu une erreur ?
Es-tu certain que le fichier a bien était téléchargé
(TCPSocket) ?
Peut-on voir le code ?
A+
---
Stéphane Pinel - REAL Software
Support Technique en Français
43, Rue Marius Aufan 92300 Levallois-Perret (FR)
http://www.realsoftware.fr
Rejoignez la communauté francophone des développeurs REALbasic :
<http://www.realsoftware.com/support/listmanager/>
Le 12 avr. 08 à 16:25, Sébastien Debiève a écrit :
Bonjour,
Me voici avec un problème auquel je n'arrive pas à résoudre.
J'ai un StaticText qui reprend le chemin d'un dossier que
l'utilisateur a sélectionné.
Le StaticText, j'ai ceci : Users/seb/desktop
Il m'a déjà converti le chemin avec des " : " vers " / " (en
chemin Unix)
Grâce à ce chemin il doit enregistré un document provenant
d'un TCPSocket. J'ai mis ce code :
F = GetFolderItem(Mafenêtre.statictext.text ,_
FolderItem.PathTypeURL)
ou même F = GetFolderItem(Mafenêtre.statictext.text)
Il n'enregistre pas le fichier, à croire qu'il ne voit pas le
chemin qu'il doit faire.
Je sais plus quoi foire, est-ce que vous auriez une idée ?
Merci d'avance,
Sébastien
|