10 lines
516 B
VB.net
10 lines
516 B
VB.net
Public Class frmHistory
|
|
|
|
Private Sub frmHistory_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
|
'TODO: Diese Codezeile lädt Daten in die Tabelle "MyDataset.TBGI_HISTORY". Sie können sie bei Bedarf verschieben oder entfernen.
|
|
Dim user As String = Environment.UserDomainName & "\" & Environment.UserName
|
|
TBGI_HISTORYTableAdapter.Connection.ConnectionString = MyConnectionString
|
|
Me.TBGI_HISTORYTableAdapter.Fill(Me.MyDataset.TBGI_HISTORY, user)
|
|
|
|
End Sub
|
|
End Class |