Morgen,
also ich komm mal direkt zur Sache, dies ist mein Code:
und nun brauche ich den Befehl um diese Datenbank bzw. Tabelle in der Datenbank zu durchsuchen.
Schonmal Danke
MfG Alaitoc
also ich komm mal direkt zur Sache, dies ist mein Code:
Code:
Public Class Form1
'Variabeln'
Dim ip As String
Dim host As String
Private Sub DataGridView1_CellContentClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs)
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'TODO: Diese Codezeile lädt Daten in die Tabelle "IpDataSet.Host". Sie können sie bei Bedarf verschieben oder entfernen.
Me.HostTableAdapter.Fill(Me.IpDataSet.Host)
End Sub
Private Sub Form1_FormClosing(ByVal sender As System.Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles MyBase.FormClosing
'Datenbank speichern'
Me.ValidateChildren()
Me.HostBindingSource.EndEdit()
Me.HostTableAdapter.Update(Me.IpDataSet)
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'Variabeln'
Dim IPADDR As System.Net.IPAddress
'IP Adresse'
IPADDR = System.Net.Dns.GetHostEntry(System.Net.Dns.GetHostName()).AddressList(0)
'Benutzernamen'
Dim hostreg = Microsoft.Win32.Registry.LocalMachine.OpenSubKey("software\microsoft\windows nt\CurrentVersion\Winlogon\", True)
host = hostreg.getvalue("AltDefaultUserName")
hostreg.close()
'In Datenbank schreiben'
Me.HostTableAdapter.Insert(IPADDR.ToString, host)
'Datenbank speichern'
Me.ValidateChildren()
Me.HostBindingSource.EndEdit()
Me.HostTableAdapter.Update(Me.IpDataSet)
End Sub
und nun brauche ich den Befehl um diese Datenbank bzw. Tabelle in der Datenbank zu durchsuchen.
Schonmal Danke

MfG Alaitoc