begin process at 2010 03 19 14:23:06
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > Forum > 

PDA

 > 

Réseau & Internet

 > 

Sockets

 > 

FTP avec PDA

Derniers messages déposésPoser une question dans le forum ou lancer une discussion

FTP avec PDA

dimanche 25 novembre 2007 à 17:03:34 | FTP avec PDA

4u4me4us
Bonjour a tous et a toutes,
cela fait plusieurs semmaines que je voudrais faire une appli, qui transfert des fichier d'u, Pocet PC a un serveru FTP. (le tout en vb.net)

J'ai créer le code suivant

Imports

 System
Imports System.Text
Imports System.Text.Encoding
Imports System.Net
Imports System.Net.Sockets
Imports System.IO

PublicClass Form1
Dim vc_SocData As Socket
Dim vc_socket As Socket
PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim v_connect As IPEndPoint
Const BLOCK_SIZE = 10240
Dim v_buffer(BLOCK_SIZE) AsByte
Dim v_CodeRetour AsInteger
Dim v_chemin AsString
Dim vc_fichier As FileStream
Dim vc_LecFic As BinaryReader
Dim v_bit As Int32
Dim v_i AsInteger
v_i = 0

v_connect =

Nothing
vc_SocData = New Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp)

vc_socket =

New Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp)
v_connect = New IPEndPoint(Dns.Resolve(Mon serveur).AddressList(0), 21)
vc_socket.Connect(v_connect)

If vc_socket.Connected Then

MessageBox.Show("connecter")

MessageBox.Show(

"Envoi USER")

Dim vc_commande AsByte() = ASCII.GetBytes("USER NomUtilisateur" & ControlChars.CrLf)
v_CodeRetour = vc_socket.Receive(v_buffer)
vc_socket.Send(vc_commande)
v_CodeRetour = vc_socket.Receive(v_buffer)
MessageBox.Show(v_CodeRetour)

MessageBox.Show("Envoi PASS")
vc_commande = ASCII.GetBytes("MotPas" & ControlChars.CrLf)
vc_socket.Send(vc_commande)
v_CodeRetour = vc_socket.Receive(v_buffer)
MessageBox.Show(v_CodeRetour)

MessageBox.Show("Selectionner un repertoire)
vc_commande = ASCII.GetBytes("CWD /chemin rep" + ControlChars.CrLf)
vc_socket.Send(vc_commande)
v_CodeRetour = vc_socket.Receive(v_buffer)
MessageBox.Show(v_CodeRetour)

v_chemin = IO.Path.GetDirectoryName(System.Reflection.Assembly.GetExecutingAssembly().GetName().CodeBase) +

"\Test.txt"
vc_fichier = New FileStream(v_chemin, FileMode.Open, FileAccess.Read)
vc_LecFic = New BinaryReader(vc_fichier)
vc_LecFic.Read()
v_buffer = vc_LecFic.ReadBytes(CType(vc_fichier.Length, Integer))
vc_fichier.Close()

MessageBox.Show(

"Taill buff : " & v_buffer.Length)

MessageBox.Show(

"Envoi binary")
vc_commande = ASCII.GetBytes("BINARY" + ControlChars.CrLf)
vc_socket.Send(vc_commande)
v_CodeRetour = vc_socket.Receive(v_buffer)
MessageBox.Show("Retour " & v_CodeRetour)

MessageBox.Show(

"Envoi par   STOR " + v_chemin)
vc_commande = ASCII.GetBytes("STOR" & v_chemin & ControlChars.CrLf) '" /web/download/PO_LMC/" +
vc_socket.Send(vc_commande)
v_CodeRetour = vc_socket.Receive(v_buffer)
MessageBox.Show("Retour1 " & v_CodeRetour)

MessageBox.Show("Envoi buff")
vc_socket.Send(v_buffer, SocketFlags.MaxIOVectorLength)
v_bit = vc_fichier.Read(v_buffer, 0, v_buffer.Length)
v_CodeRetour = vc_socket.Receive(v_buffer)
MessageBox.Show("Rep envoi1 " & v_CodeRetour)

EndIf

EndSub
EndClass

Avec ça, la connection ce passe mais rein de plus. Les valeurs de retour que j'ai sont sur deux chiffre au lieu de trois, donc dur d'identifier le prob. Il faudrei que cela marche sans dll supp.

Vous voyez ! Je ne me suis pas tourné les pouces.  J'ai mis de la transpiration personnelle sur ma démarche.

Alors "so please Codes-Source PDA community HELP ME!!!!"
jeudi 14 février 2008 à 11:41:04 | Re : FTP avec PDA

wassimez


Cette discussion est classée dans : buffer, show, vc, socket, coderetour

Répondre à ce message

Sujets en rapport avec ce message

ping sur pocket pc: socket icmp ou tcp??? [ par troukatruc ] Bonjour, je suis actuellement en stage et je developpe une programme  pour pocket pc en c# avec .net.J' ai besoin de pinger un server.J'ai donc essaye comment créer une DLL en VC+++ 2005 [ par lhoua94 ] Bonjour,Je souhaite créer une DLL en VC++ 2005  pour un pocket pc 2005 ou un smartphone  que l'on  puisse appeler depuis un autre projet sous WINDEV . Socket pour PDA/PC en C# [ par Diafwl1 ] Bonjour, j'aimerai faire communiquer un PDA avec un PC par des sockets en C#. J'aimerai tester cette liaison en faisant un boutton sur le PDA, qui une Socket [ par AngelDiablo ] Bonjour je suis novice en Csharp et j'aimerais savoir comment redigé un socket en Csharp car je dois faire un envoi de fichier d'un pocket Pc vers un


Nos sponsors


Sondage...

CalendriCode

Mars 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

Photothèque

  
  

Visiter la photothèque
 
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

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,577 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)