1 Κάντε κλικ στο κουμπί των Windows " Start" και επιλέξτε " Όλα τα προγράμματα ". Κάντε κλικ στο " Microsoft. NET Framework , " και στη συνέχεια κάντε κλικ στο κουμπί " Visual Studio " για να φορτώσετε το λογισμικό ανάπτυξης . 2
διπλό κλικ στο όνομα αρχείου του έργου σας στη λίστα των πρόσφατων έργων . Μετά τα φορτία του έργου , κάντε δεξί κλικ στη φόρμα στο « Λύση Explorer " που θέλετε να χρησιμοποιήσετε για να κατεβάσετε την ιστοσελίδα .
Εικόνων 3
Προσθέστε το " WebClient " βιβλιοθήκη. Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα βιβλιοθήκη εισαγωγής στην κορυφή του αρχείου κώδικα VB σας :
εισαγωγές System.Net
Η 4
Δημιουργήστε τις μεταβλητές για τη λήψη. Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα για να δημιουργήσει τις μεταβλητές :
Dim web Όπως WebClient = Νέα WebClient ( )
Dim ρεύμα Δεδομένου ότι η Stream = web.OpenRead ( " domain.com " )
Dim αναγνώστη Όπως StreamReader = Νέα StreamReader ( ρεύμα )
Αντικαταστήστε το " domain.com " με τη θέση της ιστοσελίδας που θέλετε να κατεβάσετε . Ο κώδικας συνδέεται με τον τομέα και ιδρύει το " αναγνώστη " μεταβλητή για να διαβάσετε το περιεχόμενο της ιστοσελίδας .
5
Αποθηκεύστε το περιεχόμενο του δικτυακού τόπου σε μια μεταβλητή συμβολοσειράς . Ο κώδικας που ακολουθεί φορτώνει το περιεχόμενο της ιστοσελίδας σε μια σειρά :
Dim περιεχόμενο = reader.ReadLine ( ) Όπως String
Η 6
Εκτυπώστε το περιεχόμενο της ιστοσελίδας . Μπορείτε να χρησιμοποιήσετε το string περιεχόμενο που δημιουργήσατε στο βήμα 5 και να εκτυπώσετε το περιεχόμενο για τους χρήστες σας . Ο κώδικας που ακολουθεί εκτυπώνει το περιεχόμενο σε ένα πλαίσιο μηνύματος :
MsgBox περιεχόμενο
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα