Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : INET et UPLOAD sur un SERVEUR: Presque! [ Archives Visual Basic / Réseau et Internet ] (Gabalgabow)

lundi 22 avril 2002 à 15:03:03 | INET et UPLOAD sur un SERVEUR: Presque!

Gabalgabow

J'essaie d'Uploader 1 fichier avec Inet sur un serveur.

J'y suis presque, les composants sont installés, pas de message d'erreur, tout se déroule correctement.
Mais que je vérifie sur le serveur, le fichier n'y est pas.

Vous pouvez m'indiquer l'erreur dans mon code?

Inet1.URL = "ftp://gabalgabow@ftp.membres.lycos.fr/"
Inet1.UserName = "Username"
Inet1.Password = "Password"
Inet1.Execute , "PUT index2.html index2.html"

MERCI!

lundi 22 avril 2002 à 16:19:42 | Re : INET et UPLOAD sur un SERVEUR: Presque!

Dark-Cr0w

J'ai bossé hier avec Inet ..... enfin j'ai essayé
Je crois pas qu'il y ai d'erreur...
ah si ... lol

Inet1.URL= "ftp://gabalgabow@ftp.membres.lycos.fr/"

gabalgabow c'est koi ???? ca serait pas ton login par hazard ?????

Si c'est le Cas essaye plutot

Inet1.URL = "ftp://ftp.membres.lycos.fr/"
Inet1.UserName = "Username" <==== ton "gabalgabow"
Inet1.Password = "Password" <=== là tu a capté je pense
Inet1.Execute , "PUT index2.html index2.html"


Par contre pendant mes tests hier j'ai rencontrer un problème qui est selon majeur vu le prog que je mets au point .....

Inet envoie bien les fichiers .txt mais il me mets une erreur pour les fichiers .jpg (image dont j'ai besoin pour mon prog)

Si quelqu'un a une solution ..... je suis preneur

Sinon pour savoir pourkoi ton Inet foire rajoute cette partie (quelqu'un l'avait mis dans un commentaire pour une de ses sources) et ca marche très bien .....

Ca permet de suivre le déroulement de la conection , de l'envoi etc .....

Private Sub Inet1_StateChanged(ByVal State As Integer)
Select Case State
Case 1
etat.Caption = "Recherche l' IP de l'ordinateur hôte."
Case 2
etat.Caption = "IP de l'ordinateur hôte spécifié."
Case 3
etat.Caption = "En cours de connexion avec l'ordinateur hôte."
Case 4
etat.Caption = "La connexion avec l'ordinateur hôte est réussie."
Case 5
etat.Caption = "Envoie une demande à l'ordinateur hôte."
Case 6
etat.Caption = "La demande a été envoyé avec succès."
Case 7
etat.Caption = "Reçoit une réponse de l'ordinateur hôte."
Case 8
etat.Caption = "Contacte avec l'ordinateur hôte réussi."
Case 9
etat.Caption = "En cours de déconnexion avec l'ordinateur hôte."
Case 10
etat.Caption = "La déconnexion avec l'ordinateur hôte est réussie."
End Select

If State = 11 Then
etat.caption = "Erreur"
End If
If State = 12 Then
etat.caption = "Transfert Réussi"
End If

End Sub


Ayant rencontrer un probleme avec mes envois image .jpg (envoi non reussi) j'ai bien peur que ton envoi de fichiers .html foire aussi
Apparement les seuls fichiers que Inet puisse envoyer sans probleme sont des fichiers .txt :-(

A suivre et à résoudre si quelqu'un connait bien Inet



lundi 22 avril 2002 à 16:55:28 | Re : INET et UPLOAD sur un SERVEUR: Presque!

Gabalgabow

Si je remplace "ftp://gabalgabow@ftp.membres.lycos.fr/"

par "ftp://ftp.membres.lycos.fr/",

ça change rien, toujours pas de fichier.


Quand j'essaie le code que tu m'as refilé, j'ai droit à un objet est requis.

avec l'Url suivante: "ftp://gabalgabow@ftp.membres.lycos.fr/" c'est au niveau:
"Recherche l' IP de l'ordinateur hôte."

avec celle ci: ftp://ftp.membres.lycos.fr/
c'est au niveau:
"Recherche l' IP de l'ordinateur hôte."


Quelqu'un à une idée??

Pout ton transfert, pourquoi tu renommes pas ton JPG en TXT, et inversement 1 fois sur le serveur?
(...sais jamais!)

Je commence à me demander si quelqu'un sur ce forum arrive à envoyer des fichier avec Inet (Lol),
peu de monde répond au messages à ce sujet.

Déconnez pas! j'ai besoin de cette fonction pour un programme que je vais présenter au BTS (épreuve pratique), si elle manque le programme part à moitié en couille... HELP!!



-------------------------------
Réponse au message :
-------------------------------

J'ai bossé hier avec Inet ..... enfin j'ai essayé
Je crois pas qu'il y ai d'erreur...
ah si ... lol

Inet1.URL= "ftp://gabalgabow@ftp.membres.lycos.fr/"

gabalgabow c'est koi ???? ca serait pas ton login par hazard ?????

Si c'est le Cas essaye plutot

Inet1.URL = "ftp://ftp.membres.lycos.fr/"
Inet1.UserName = "Username" <==== ton "gabalgabow"
Inet1.Password = "Password" <=== là tu a capté je pense
Inet1.Execute , "PUT index2.html index2.html"


Par contre pendant mes tests hier j'ai rencontrer un problème qui est selon majeur vu le prog que je mets au point .....

Inet envoie bien les fichiers .txt mais il me mets une erreur pour les fichiers .jpg (image dont j'ai besoin pour mon prog)

Si quelqu'un a une solution ..... je suis preneur

Sinon pour savoir pourkoi ton Inet foire rajoute cette partie (quelqu'un l'avait mis dans un commentaire pour une de ses sources) et ca marche très bien .....

Ca permet de suivre le déroulement de la conection , de l'envoi etc .....

Private Sub Inet1_StateChanged(ByVal State As Integer)
Select Case State
Case 1
etat.Caption = "Recherche l' IP de l'ordinateur hôte."
Case 2
etat.Caption = "IP de l'ordinateur hôte spécifié."
Case 3
etat.Caption = "En cours de connexion avec l'ordinateur hôte."
Case 4
etat.Caption = "La connexion avec l'ordinateur hôte est réussie."
Case 5
etat.Caption = "Envoie une demande à l'ordinateur hôte."
Case 6
etat.Caption = "La demande a été envoyé avec succès."
Case 7
etat.Caption = "Reçoit une réponse de l'ordinateur hôte."
Case 8
etat.Caption = "Contacte avec l'ordinateur hôte réussi."
Case 9
etat.Caption = "En cours de déconnexion avec l'ordinateur hôte."
Case 10
etat.Caption = "La déconnexion avec l'ordinateur hôte est réussie."
End Select

If State = 11 Then
etat.caption = "Erreur"
End If
If State = 12 Then
etat.caption = "Transfert Réussi"
End If

End Sub


Ayant rencontrer un probleme avec mes envois image .jpg (envoi non reussi) j'ai bien peur que ton envoi de fichiers .html foire aussi
Apparement les seuls fichiers que Inet puisse envoyer sans probleme sont des fichiers .txt :-(

A suivre et à résoudre si quelqu'un connait bien Inet




lundi 22 avril 2002 à 17:01:06 | Re : INET et UPLOAD sur un SERVEUR: Presque!

Dark-Cr0w

L'objet qui est recquis c'est un Label1 renomé etat (faut lire lol)

A mon avis ton prob est le meme que toi ... essaye de Sender un fichier .txt .... si ca marche c'est que Inet aime que les .txt ;-)

Je peux rien faire d'autre je suis bloké aussi
En tout cas en mettant l'url que je t'ai dit chez moi ca send bien le fichier .txt (rien d'autre :-( )

lundi 22 avril 2002 à 17:01:40 | Re : INET et UPLOAD sur un SERVEUR: Presque!

Gabalgabow

Le code de vérification fonctionne bien maintenant,
ça ne va pas plus loin que la connexion avec l'hôte...

??????????????


-------------------------------
Réponse au message :
-------------------------------

Si je remplace "ftp://gabalgabow@ftp.membres.lycos.fr/"

par "ftp://ftp.membres.lycos.fr/",

ça change rien, toujours pas de fichier.


Quand j'essaie le code que tu m'as refilé, j'ai droit à un objet est requis.

avec l'Url suivante: "ftp://gabalgabow@ftp.membres.lycos.fr/" c'est au niveau:
"Recherche l' IP de l'ordinateur hôte."

avec celle ci: ftp://ftp.membres.lycos.fr/
c'est au niveau:
"Recherche l' IP de l'ordinateur hôte."


Quelqu'un à une idée??

Pout ton transfert, pourquoi tu renommes pas ton JPG en TXT, et inversement 1 fois sur le serveur?
(...sais jamais!)

Je commence à me demander si quelqu'un sur ce forum arrive à envoyer des fichier avec Inet (Lol),
peu de monde répond au messages à ce sujet.

Déconnez pas! j'ai besoin de cette fonction pour un programme que je vais présenter au BTS (épreuve pratique), si elle manque le programme part à moitié en couille... HELP!!



-------------------------------
Réponse au message :
-------------------------------

J'ai bossé hier avec Inet ..... enfin j'ai essayé
Je crois pas qu'il y ai d'erreur...
ah si ... lol

Inet1.URL= "ftp://gabalgabow@ftp.membres.lycos.fr/"

gabalgabow c'est koi ???? ca serait pas ton login par hazard ?????

Si c'est le Cas essaye plutot

Inet1.URL = "ftp://ftp.membres.lycos.fr/"
Inet1.UserName = "Username" <==== ton "gabalgabow"
Inet1.Password = "Password" <=== là tu a capté je pense
Inet1.Execute , "PUT index2.html index2.html"


Par contre pendant mes tests hier j'ai rencontrer un problème qui est selon majeur vu le prog que je mets au point .....

Inet envoie bien les fichiers .txt mais il me mets une erreur pour les fichiers .jpg (image dont j'ai besoin pour mon prog)

Si quelqu'un a une solution ..... je suis preneur

Sinon pour savoir pourkoi ton Inet foire rajoute cette partie (quelqu'un l'avait mis dans un commentaire pour une de ses sources) et ca marche très bien .....

Ca permet de suivre le déroulement de la conection , de l'envoi etc .....

Private Sub Inet1_StateChanged(ByVal State As Integer)
Select Case State
Case 1
etat.Caption = "Recherche l' IP de l'ordinateur hôte."
Case 2
etat.Caption = "IP de l'ordinateur hôte spécifié."
Case 3
etat.Caption = "En cours de connexion avec l'ordinateur hôte."
Case 4
etat.Caption = "La connexion avec l'ordinateur hôte est réussie."
Case 5
etat.Caption = "Envoie une demande à l'ordinateur hôte."
Case 6
etat.Caption = "La demande a été envoyé avec succès."
Case 7
etat.Caption = "Reçoit une réponse de l'ordinateur hôte."
Case 8
etat.Caption = "Contacte avec l'ordinateur hôte réussi."
Case 9
etat.Caption = "En cours de déconnexion avec l'ordinateur hôte."
Case 10
etat.Caption = "La déconnexion avec l'ordinateur hôte est réussie."
End Select

If State = 11 Then
etat.caption = "Erreur"
End If
If State = 12 Then
etat.caption = "Transfert Réussi"
End If

End Sub


Ayant rencontrer un probleme avec mes envois image .jpg (envoi non reussi) j'ai bien peur que ton envoi de fichiers .html foire aussi
Apparement les seuls fichiers que Inet puisse envoyer sans probleme sont des fichiers .txt :-(

A suivre et à résoudre si quelqu'un connait bien Inet





lundi 22 avril 2002 à 17:14:28 | Re : INET et UPLOAD sur un SERVEUR: Presque!

Gabalgabow

J'ai essayé avec un fichier txt,
il ne l'envoies pas non plus.
Tu peux me refiler ton code que je compare avec le mien? (peut être 1 erreur).


Il m'affiche tous les messages de bon déroulement jusqu'à "Contacte avec l'ordinateur hôte réussi",
pas les deux derniers

Ou c'est multimania qui n'accepte pas...


-------------------------------
Réponse au message :
-------------------------------

L'objet qui est recquis c'est un Label1 renomé etat (faut lire lol)

A mon avis ton prob est le meme que toi ... essaye de Sender un fichier .txt .... si ca marche c'est que Inet aime que les .txt ;-)

Je peux rien faire d'autre je suis bloké aussi
En tout cas en mettant l'url que je t'ai dit chez moi ca send bien le fichier .txt (rien d'autre :-( )

lundi 22 avril 2002 à 17:26:38 | Re : INET et UPLOAD sur un SERVEUR: Presque!

Dark-Cr0w

Private Sub Command1_Click()
With Inet1
.URL = "ftp://" & Text1 ' TextBox Contenant mon url
.UserName = Text2 ' TextBox contenant mon Login
.Password = Text3 ' Textbox Contenant mon Pass
.Execute , "PUT test.txt test.txt"
End With
End Sub

Pour info je viens d'essayer avec un .exe ca marche aussi donc pour mon prob de .jpg c'est sans doute parce que c'est trop lourd ......

Sinon essaye sur un autre Ftp ou vérifie que tu a aussi acces a ton Ftp avec un Client Pro (on sait jamais ils sont peut etre débordés lol)


lundi 22 avril 2002 à 17:45:54 | Re : INET et UPLOAD sur un SERVEUR: Presque!

Gabalgabow

Tu peux me donner un autre FTP que Lycos/multimania?

Qu'est ce qu'1 client pro?
(J'ai accés au serveur avec 1 login...)

Gab



-------------------------------
Réponse au message :
-------------------------------

Private Sub Command1_Click()
With Inet1
.URL = "ftp://" & Text1 ' TextBox Contenant mon url
.UserName = Text2 ' TextBox contenant mon Login
.Password = Text3 ' Textbox Contenant mon Pass
.Execute , "PUT test.txt test.txt"
End With
End Sub

Pour info je viens d'essayer avec un .exe ca marche aussi donc pour mon prob de .jpg c'est sans doute parce que c'est trop lourd ......

Sinon essaye sur un autre Ftp ou vérifie que tu a aussi acces a ton Ftp avec un Client Pro (on sait jamais ils sont peut etre débordés lol)



mercredi 12 février 2003 à 12:55:29 | Re : INET et UPLOAD sur un SERVEUR: Presque!

pcpunch


g mm probleme apparement c parce que je decharge ma form et le upload de inet n est pas terminé!!! personne n arrive a me dire comment faire attendre inet afin de quitter le form apres le upload???


-------------------------------
Réponse au message :
-------------------------------

> Tu peux me donner un autre FTP que Lycos/multimania?
>
> Qu'est ce qu'1 client pro?
> (J'ai accés au serveur avec 1 login...)
>
> Gab
>
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> Private Sub Command1_Click()
> With Inet1
> .URL = "ftp://" & Text1 ' TextBox Contenant mon url
> .UserName = Text2 ' TextBox contenant mon Login
> .Password = Text3 ' Textbox Contenant mon Pass
> .Execute , "PUT test.txt test.txt"
> End With
> End Sub
>
> Pour info je viens d'essayer avec un .exe ca marche aussi donc pour mon prob de .jpg c'est sans doute parce que c'est trop lourd ......
>
> Sinon essaye sur un autre Ftp ou vérifie que tu a aussi acces a ton Ftp avec un Client Pro (on sait jamais ils sont peut etre débordés lol)
>
>
>

jeudi 14 août 2003 à 00:29:15 | Re : INET et UPLOAD sur un SERVEUR: Presque!

mathieuc





-------------------------------
Réponse au message :
-------------------------------
voici le code

With Me.transfertftp
.URL = ("ftp://" & frm_stat.txt_nom_ftp & ":" & frm_stat.txt_pass_ftp & "@" & frm_stat.txt_serveur_ftp)
'.Execute , ("PUT " & frm_stat.txt_fichier_ftp & " " & frm_stat.txt_destination_ftp)
.Execute , ("PUT " & "C:\1_1\1.gif" & " " & frm_stat.txt_destination_ftp)
End With
direction = True
Do While Me.transfertftp.StillExecuting
DoEvents
Loop


tiens c'est pas si compliquer. De même, ca marche pas si ya un espcae dans le path. Je cherche tjrs

>
> g mm probleme apparement c parce que je decharge ma form et le upload de inet n est pas terminé!!! personne n arrive a me dire comment faire attendre inet afin de quitter le form apres le upload???
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> > Tu peux me donner un autre FTP que Lycos/multimania?
> >
> > Qu'est ce qu'1 client pro?
> > (J'ai accés au serveur avec 1 login...)
> >
> > Gab
> >
> >
> >
> > -------------------------------
> > Réponse au message :
> > -------------------------------
> >
> > Private Sub Command1_Click()
> > With Inet1
> > .URL = "ftp://" & Text1 ' TextBox Contenant mon url
> > .UserName = Text2 ' TextBox contenant mon Login
> > .Password = Text3 ' Textbox Contenant mon Pass
> > .Execute , "PUT test.txt test.txt"
> > End With
> > End Sub
> >
> > Pour info je viens d'essayer avec un .exe ca marche aussi donc pour mon prob de .jpg c'est sans doute parce que c'est trop lourd ......
> >
> > Sinon essaye sur un autre Ftp ou vérifie que tu a aussi acces a ton Ftp avec un Client Pro (on sait jamais ils sont peut etre débordés lol)
> >
> >
> >
>


1 2

Cette discussion est classé dans : upload, serveur, inet1, inet, presque


Répondre à ce message

Sujets en rapport avec ce message

INET et UPLOAD sur un SERVEUR: Presque! [ par Gabalgabow ] J'essaie d'Uploader 1 fichier avec Inet sur un serveur.J'y suis presque, les composants sont installés, pas de message d'erreur, tout se déroule corre progress bar et upload avec inet? [ par pcpunch ] Sltg ci dessous un code basic pour envoyer un fichier avec inet, comment faire pour affecter une progress bar qui indique la progression du upload?je Inet ????? [ par montane ] Bonjour,j'essaye de déposer un fichier que j'ai créé sur un serveur sur un autre serveur linux.j'utilise la fonction : Inet1.Protocol = icFTP Inet1.UR Upload Fichier [ par maesius ] Bonjour,Voila, je desirait "uploader" DES fichiers (photos) via un programme (un peu comme une applet) sur un serveur WEB.Ainsi avoir une petit interf Probleme inet [ par dionysos6868 ] voici mon codePrivate Sub Form_Load()With Inet1 .Protocol = icFTP .URL = "ftp.membres.lycos.fr" .UserName = "******" .Password = "******"<br HELP !!! Inet et upload de dossier [ par sylvain34 ] Bonjour à tous, j'ai fini mon petit soft de client ftp en utilisant le controle Inet. Malheureusement, je n'arrive pas à trouver le moyen de uploader Inet et code src [ par pcpunch ] j'ai un probleme avec ce code :Private Sub Command1_Click()Dim codesrc As StringInet1.AccessType = icUseDefaultInet1.Protocol = icDefaultcodesrc = Ine Upload via Inet [ par kelu95 ] Bonjour a tous!Voila j'utilise un code que j'ai trouvé sur vbfrance qui permet d'uploader des fichiers sur FTP. Cela fonctionne tres bien.Cependant, l Comment Stopper un controle Inet [ par Danyz ] Bonjour ,comment peut on stopper un control Inet ?avec la commande Inet1.Cancel ca veut pas marcher moi :(De + , j'arrive pas a gerer les erreurs (qua faire attendre inet? qd il upload sur ftp.. [ par pcpunch ] slt tous et dans la question je pense, g parcouru les forum et rien sur inet et cette question.En effet lorsque je lance un upload sur un ftp, et que


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :

Comparez les prix Nouvelle version

Photothèque Nouveau !



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,390 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.