Depuis la popularité d’Internet, il est devenu beaucoup plus pratique pour les gens de télécharger des fichiers, d’obtenir des informations instantanées et d’envoyer des e-mails. Internet peut être considéré comme une innovation majeure de la technologie humaine au 21e siècle. En raison de ce changement majeur, les modes de vie des gens ont également été considérablement affectés : les achats électroniques, les bases de données d'informations en ligne et les transactions boursières en ligne en temps réel se sont multipliés. Dans le passé, Visual Basic 4.0 ne fournissait pas une solution complète permettant aux passionnés de Visual Basic de concevoir des programmes Internet. Heureusement, Visual Basic 5.0 fournit certains contrôles nous permettant de concevoir des programmes liés à Internet. Dans cet article, l'auteur utilisera InternetTransfercontrol avec WebBrowsercontrol pour expliquer aux lecteurs comment concevoir facilement des programmes de navigateur et FTP avec Visual Basic 5.0.
Introduction au contrôle
Contrôle de transfert Internet
InternetTransfercontrol est un contrôle fourni par Microsoft pour faciliter la conception d'applications Internet par les utilisateurs. Il fournit deux protocoles Internet : HTTP et FTP. Lorsque nous l'utilisons, nous devons d'abord définir sa méthode d'accès. Les méthodes d'accès sont divisées en deux types : la connexion directe au réseau Internet ou la connexion au réseau Internet via un proxy, qui est entièrement déterminé par la nature de notre réseau. Après avoir défini les paramètres pertinents, InternetTransfercontrol propose deux méthodes : OpenURL et Execute pour nous permettre d'effectuer des opérations liées au réseau. Nous pouvons utiliser ces deux commandes pour exécuter certaines commandes Internet. Dans la conception ci-dessous, l'auteur expliquera son utilisation.
Contrôle du navigateur Web
WebBrowsercontrol a été fourni pour la première fois par IE3.0 et sera automatiquement chargé lorsque IE3.0 sera installé ; VisualBasic5.0 le transforme en contrôle interne. Il fournit la méthode Navigate qui nous permet de nous connecter au serveur WWW où nous voulons aller.
Les lecteurs doivent se demander : étant donné qu’InternetTransfercontrol peut se connecter à Internet via HTTP et TPprotocol, pourquoi avons-nous besoin de WebBrowsercontrol ? Tout simplement parce qu'InternetTransfercontrol ne fournit pas de méthode d'accès en mode graphique, le fichier résultant ne peut être retransféré qu'en mode texte. Si le fichier renvoyé contient des graphiques, le fichier HTML résultant doit être converti à l'aide d'un programme. L'auteur a donc choisi WebBrowsercontrol pour nous aider à effectuer une conversion.
Laissez l'auteur expliquer aux lecteurs comment concevoir un navigateur Web et un client FTP.
Programmation du navigateur Web
Étape 1 : Définissez les paramètres réseau
Nous devons d’abord savoir si notre système réseau est directement connecté à Internet ou connecté à Internet via un proxy. Nous pouvons déterminer comment notre système est connecté à Internet en suivant les étapes suivantes :
Double-cliquez sur l'option « Poste de travail » pour accéder au « Panneau de configuration ». Double-cliquez sur l'option "Internet" dans l'option "Panneau de configuration". Sélectionnez la connexion dans InternetDialogBox. À partir de la boîte de dialogue affichée à l'écran, vous pouvez savoir si le système est connecté à Internet via proxy ou numérotation. Étant donné que le système de l'auteur est connecté à Internet via un proxy, nous devons connaître l'adresse et le port du proxyServer pour faciliter la configuration du programme.
Cliquez ensuite sur l'option « paramètre » pour afficher son adresse et son port. L'écran affichera alors une boîte de dialogue avec "adressedeproxytouse":172.18.16.65 et "port":8080 enregistrés dedans. Enregistrez ceci, vous aurez besoin de ces paramètres plus tard.
Étape 2 : Démarrer le processus de conception
Sélectionnez NewProject dans l'option Fichier pour créer un nouveau projet. Vous verrez de nombreuses options à l'écran, telles que ActiveXDocument.EXE, ActiveXDocument.DLL, ActiveX.EXE, ActiveXControl, etc. À ce stade, vous devez sélectionner Standard.EXE.
Ensuite, sous Projet, sélectionnez l’option d’attribut Propriété et remplacez ProjectName par Webbrowser sous l’option générale. Ajoutez un contrôle Webbrowser au formulaire à l'écran et nommez-le web1, puis ajoutez un contrôle InternetTransfer et nommez-le Inet1.
Ajoutez trois contrôles TextBox nommés respectivement CGISearch, webname et htmlshow, ajoutez une étiquette devant CGISearchTextBox et modifiez sa légende en Rechercher.
Ajoutez trois contrôles Button nommés Search, Go et ShowDoc. Remplacez la légende par Se respectivement
arch, goto et showdocument.
Afin de permettre aux lecteurs de comprendre la relation, les éléments suivants sont expliqués dans un tableau :
(Boîte de texte)
Nom
--------------------------------------------------
CGISearch (entrez la commande CGI)
nom Web (entrez l'adresse Web à laquelle vous souhaitez accéder)
htmlshow (afficher les résultats du texte HTML)
(Bouton)
NomLégende
-------------------------------------------------- --------------------------
-----
Rechercher (exécuter la commande CGI) rechercher
Aller (exécuter l'action sur l'adresse Web) Aller à
ShowDoc (afficher les résultats en texte HTML)showdocument
Définissez ensuite les différentes propriétés d'Inet1 comme suit :
type d'accès = 2-icnamedproxy
protocole = 4-icHTTP
proxy=172.18.16.65:8080
Ajoutez le code de programme suivant à Go_Click(). Cette action consiste à vous connecter au serveur Web auquel vous souhaitez accéder et à afficher l'écran dans la zone carrée de Web1 :
PrivateSubGo_Click()
web1.Navigatewebname.Text
FinSub
Le programme ci-dessus utilise le Navigate de web1. Cette méthode connecte l'écran au site Web spécifié dans webnameTextBox.
Ajoutez le code de programme suivant à htmlshow_Click() :
PrivateSubhtmlshow_Click()
a$=web1.LocationURL
ShowDoc.Text=Inet1.OpenURL(a$)
FinSub
Le programme ci-dessus lit d'abord l'adresse URL à laquelle web1 est connecté via la propriété LocationURL et la stocke temporairement dans la chaîne a. Utilisez ensuite la commande OpenURL() pour afficher le code du programme HTML reçu dans ShowDoc TextBox.
Ajoutez le code de programme suivant à CGIserch_Click() :
PrivateSubCGIserch_Click()
Web1.Navigate"http://search.yahoo.com/bin/Search?p=" CGI.
Texte
FinSub
Cette action utilise des commandes CGI pour interroger le fichier. Nous spécifions ici la commande de requête à envoyer à Yahoo, le site de recherche Web.
De cette façon, nous avons réalisé un petit navigateur Web.
Étape 3 : Programme de test
Exécutez le navigateur Web que vous venez de concevoir et remplissez l'URL à laquelle vous souhaitez accéder dans la zone de texte du nom Web. Ici, nous le définissons sur http://www.Microsoft.com. Appuyez ensuite sur le GoButton et vous verrez la page d'accueil de Microsoft affichée dans la zone carrée de Web1control.
Appuyez sur ShowDocButton, vous pourrez voir le code du programme HTML de MicrosoftHomePage dans le htmlshow TextBox.
Essayons ensuite la fonction de recherche CGI. Après avoir ajouté la communication à CGIserchTextBox, nous avons constaté que les résultats de la requête étaient affichés dans la zone carrée web1.
De même, nous pouvons également appuyer sur le ShowDocButton pour voir le code du programme HTML renvoyé par les résultats de la requête dans la htmlshow TextBox.
Félicitations pour votre réussite !
Programmation FTP
Comme mentionné précédemment, InternetTransfercontrol peut fournir un protocole FTP. Ici, nous allons vous expliquer comment utiliser InternetTransfercontrol pour concevoir un programme client pouvant se connecter à FTPServer et télécharger le fichier bbb.txt sur FTPServer vers l'extrémité locale.
Étape 1 : Programmation
Sélectionnez NewProject dans l'option Fichier pour créer un nouveau projet. Vous verrez de nombreuses options à l'écran, telles que ActiveXDocument.EXE, ActiveXDocument.DLL, ActiveX.EXE, ActiveXControl, etc. À ce stade, sélectionnez Standard.EXE. Ensuite, sous Projet, sélectionnez l’option d’attribut Propriété et remplacez ProjectName par FTPclient sous l’option générale.
Ajoutez un contrôle InternetTransfer au formulaire à l’écran et nommez-le Inet1. Définissez les paramètres d'Inet1property comme suit :
Type d'accès = 2-icnamedproxy
Nom d'utilisateur = "david"
mot de passe = "2333334"
protocole = 2-icFTP
proxy=172.18.16.65:8080
Nous définissons ici le nom d'utilisateur et le mot de passe. Lorsque nous nous connectons au serveur FTP, le serveur ignorera directement l'écran de saisie du nom d'utilisateur et du mot de passe.
Ajoutez un TextBoxcontrol et nommez-le FTPgetfile. Ajoutez deux contrôles Button, nommez-les FTPget et FTPLink et modifiez leurs légendes en FTPget et FTPLink respectivement.
Ajoutez le code de programme suivant à FTPLink_Click() :
PrivateSubFTPLink_Click()
Inet1.execute"FTP128.9.200.4"
FinSub
Execute est une méthode fournie par InternetTransfercontrol pour exécuter les utilitaires FTP. Nous pouvons ajouter des commandes FTP après, afin de pouvoir utiliser n'importe quel utilitaire FTP familier pour terminer le travail. L'adresse FTPServer de l'auteur est 128.9.200.4, nous remplissons donc cette adresse après la commande FTP.
Ajoutez ensuite le code de programme suivant à FTPget_Click() :
PrivateSubFTPLink_Click()
Inet1.excute"GETaaa.txtc:/bbb.txt"
FinSub
Cette action consiste à transférer le fichier aaa.txt sur le serveur FTP vers le client.
Étape 2 : Testez
Exécutez FTPclient, appuyez sur FTPLinkButton et connectez-vous à FTPServer. Appuyez sur le FTPgetButton pour récupérer le fichier. Avez-vous remarqué qu'il existe un fichier bbb.txt supplémentaire dans le répertoire C:/ ? Félicitations pour votre réussite ! ->