Hi,
wahrscheinlich nerve ich die Community mit meiner Frage aber es ist für mich wirklich wichtig und um etwas dazulernen zu können -gefunden hab ich viel aber nichts durchschlagendes...
Mein Problem sieht folgend aus: Datenbank: Acces2003 mit einigen Tabellen und Indices. Windows-Form 2010. Ich würde gerne wie gehabt die DTB zu Fuß auslesen - anzeigen - bearbeiten und zurückschreiben. Da es in Vb 2010 wirklich unzählige Versionen dazu gib bin ich etwas überfordert. Ich war bis jetzt gewohnt die Datei zu öffnen, zu Benamsen und mit z.B. tbVorName.Text = rsKunden![VorName) Daten auszulesen. Diese Automation über PROJEKT > VORHANDENES ELEMENT EINFÜGEN... > DATENBANK TYP ACCESS2003-DATABASE ist mir zu undurchsichtig. Ich möchte (be)greifen können was da geschieht! Weitere Beschreibung meines Problems im folgenden PGM-Code:
PGM-Ablauf wie folgt:
Imports System.Data.OleDb
Imports System.IO
'----------------------------------------------------------------------------------------
Module Module1
Public strDatDir As String
Public conn As New OleDbConnection
Public cmd As New OleDbCommand
Public Sub DtbOpen()
strDatDir = Directory.GetCurrentDirectory & "\Daten\"
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & strDatDir & "Test2003.mdb"
Try
conn.Open()
Catch ex As Exception
MessageBox.Show(ex.Message, "Fehler beim öffnen der Datenbank: " & conn.ConnectionString)
End Try
End Sub
'------------------------------------------------------------------------------------------
Public Sub DtbClose()
conn.Close()
End Sub
'-----------------------------------------------------------------------------------------------
End Module
'UND
'IN DER MID-Child-FORM
Imports System.Data.OleDb
Imports System.IO
Private Sub frmPStamm_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
DtbOpen()
Try
Dim ds As New DataSet()
Dim da As New OleDbDataAdapter("SELECT * FROM Stammdaten", conn)
da.Fill(ds, "Stammdaten")
'und ab hier würde ich gerne "zu Fuß" den Datenbank-Table oder dasDataset
' auslesen in System.Windows.Forms.Texbox(es) einlesen, bearbeiten und dann wieder zurückschreiben.
'Bin ich vernagelt , blöd oder wahnsinnig?
'Geht das wirklich nicht über sowas wie:
'Z.B. tbFamNam.Text = Table[FamName] oder so????
'wo liegt mein Irrtum oder hab ich die Systematik noch nicht verstanden?
'Ich möchte nicht über PROJEKT > VORHANDENES ELEMENT EINFÜGEN... > DATENBANK TYP ACCESS2003-DATABASE
'da passiert viel zu viel in Hintergrund was ich nicht kontollieren kann (vielleicht noch nicht)
Catch ex As Exception
MessageBox.Show(ex.Message, "Fehler beim öffnen der Datenbank: " & conn.ConnectionString & "DataSet_frmPStamm_Load")
End Try
End Sub
Falls sich doch jemand findet der sich mit meiner Frage beschäftigt bin ich wirklich dankbar.
In der Hoffnung Antworten zu bekommen verbleibe ich
mfg
vbdido
wahrscheinlich nerve ich die Community mit meiner Frage aber es ist für mich wirklich wichtig und um etwas dazulernen zu können -gefunden hab ich viel aber nichts durchschlagendes...
Mein Problem sieht folgend aus: Datenbank: Acces2003 mit einigen Tabellen und Indices. Windows-Form 2010. Ich würde gerne wie gehabt die DTB zu Fuß auslesen - anzeigen - bearbeiten und zurückschreiben. Da es in Vb 2010 wirklich unzählige Versionen dazu gib bin ich etwas überfordert. Ich war bis jetzt gewohnt die Datei zu öffnen, zu Benamsen und mit z.B. tbVorName.Text = rsKunden![VorName) Daten auszulesen. Diese Automation über PROJEKT > VORHANDENES ELEMENT EINFÜGEN... > DATENBANK TYP ACCESS2003-DATABASE ist mir zu undurchsichtig. Ich möchte (be)greifen können was da geschieht! Weitere Beschreibung meines Problems im folgenden PGM-Code:
PGM-Ablauf wie folgt:
Imports System.Data.OleDb
Imports System.IO
'----------------------------------------------------------------------------------------
Module Module1
Public strDatDir As String
Public conn As New OleDbConnection
Public cmd As New OleDbCommand
Public Sub DtbOpen()
strDatDir = Directory.GetCurrentDirectory & "\Daten\"
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & strDatDir & "Test2003.mdb"
Try
conn.Open()
Catch ex As Exception
MessageBox.Show(ex.Message, "Fehler beim öffnen der Datenbank: " & conn.ConnectionString)
End Try
End Sub
'------------------------------------------------------------------------------------------
Public Sub DtbClose()
conn.Close()
End Sub
'-----------------------------------------------------------------------------------------------
End Module
'UND
'IN DER MID-Child-FORM
Imports System.Data.OleDb
Imports System.IO
Private Sub frmPStamm_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
DtbOpen()
Try
Dim ds As New DataSet()
Dim da As New OleDbDataAdapter("SELECT * FROM Stammdaten", conn)
da.Fill(ds, "Stammdaten")
'und ab hier würde ich gerne "zu Fuß" den Datenbank-Table oder dasDataset
' auslesen in System.Windows.Forms.Texbox(es) einlesen, bearbeiten und dann wieder zurückschreiben.
'Bin ich vernagelt , blöd oder wahnsinnig?
'Geht das wirklich nicht über sowas wie:
'Z.B. tbFamNam.Text = Table[FamName] oder so????
'wo liegt mein Irrtum oder hab ich die Systematik noch nicht verstanden?
'Ich möchte nicht über PROJEKT > VORHANDENES ELEMENT EINFÜGEN... > DATENBANK TYP ACCESS2003-DATABASE
'da passiert viel zu viel in Hintergrund was ich nicht kontollieren kann (vielleicht noch nicht)
Catch ex As Exception
MessageBox.Show(ex.Message, "Fehler beim öffnen der Datenbank: " & conn.ConnectionString & "DataSet_frmPStamm_Load")
End Try
End Sub
Falls sich doch jemand findet der sich mit meiner Frage beschäftigt bin ich wirklich dankbar.
In der Hoffnung Antworten zu bekommen verbleibe ich
mfg
vbdido