Visual Basic Code Support.

[KirChhOff]

Έχω το εξής πρόβλημα:
Θέλω να φτιάξω σε μια εφαρμογή, ένα button να μου βγάζει την Default Gateway του η/υ σ'ένα messagebox

( Click to show/hide )

και αν γίνεται κι'όλας να την κάνει copy στο clipboard.

Με λίγο ψάξιμο βρήκα δυο τρόπους για να γίνει αυτό.
ο πρώτος είναι μέσω της εντολής ipconfig, στο cmd, εξαγωγή σε txt, ύστερα εντοπισμός αυτού που θέλουμε στο txt, στην σειρά που θέλουμε κτλ κτλ.
και ο άλλος ήταν πολύ ψιλά γράμματα για'μένα (Imports System.Net.NetworkInformation etc)
Καθώς στο λύκειο είχαμε μάθει τα πολύ βασικά στην Visual, και με το ζόρι φτάσαμε στην εντολή ElseIf, μπορεί κάποιος να με βοηθήσει ως προς τον κώδικα γιατί δεν έχω ιδέα πως αποκλείω κείμενα, lines και όλα αυτά τα περίεργα που διάβαζα 3 ώρες τώρα.

Ευχαριστώ εκ των προτέρων όποιον ασχοληθεί.

[K[a]ne]

http://lmgtfy.com/?q=visual+basic+ge...lt+gateway&l=1

[KirChhOff]

Τα'χω κοιτάξει όλα αυτά αλλά δεν βγάζω άκρη. Ευχαριστώ για την πολύτιμη βοήθεια σου.

[K[a]ne]

Το πρώτο πρώτο link έχει έτοιμο τον κώδικα. Τον κάνεις copy&paste και δουλεύει.
Σε ποιο πράγμα δε βγάζεις άκρη;

[KirChhOff]

1o link: http://www.daniweb.com/software-deve...efault-gateway

• Dim NetworkAdapters()As NetworkInterface = NetworkInterface.GetAllNetworkInterfaces
• Dim myAdapterProps As IPInterfaceProperties =Nothing
• Dim myGateways As GatewayIPAddressInformationCollection =Nothing
• ForEach adapter As NetworkInterface In NetworkAdapters
• myAdapterProps = adapter.GetIPProperties
• myGateways = myAdapterProps.GatewayAddresses
• ForEach Gateway As GatewayIPAddressInformation In myGateways
• IfNot Gateway.Address.ToString ="0.0.0.0"Then
• MessageBox.Show("Router IP is "& Gateway.Address.ToString)
• EndIf
• Next
• Next
• EndSub

[K[a]ne]

Βάλε πάνω πάνω στο αρχείο:

Imports System.Net
Imports System.Net.NetworkInformation

[KirChhOff]

Βάλε πάνω πάνω στο αρχείο:

Imports System.Net
Imports System.Net.NetworkInformation

Αυτό μπαίνει στο form load ή στον κώδικα του button πριν τον υπόλοιπο κώδικα;

[K[a]ne]

Στο αρχείο που περιέχει τον κώδικα που σου βγάζει τα errors.
Απλά κάνει import τα libraries για να μπορείς να χρησιμοποιήσεις τα αντίστοιχα functions.

[KirChhOff]

Βασικά με διπλό click στο error μου έβγαλε κάποιες λύσεις, και η πρώτη δούλεψε μια χαρά.

Τα import τα έσβησα δεν χρειάστηκαν αφού τα κάνει μόνο του.
Ευχαριστώ πάντως.