Guten Tag allerseits,
Hab mit nem neuem Projekt angefangen, Windows Form Projekt, hab 3 Buttons erstellt, "Lese MDB" , "Verbinde mit SQL Datenbank" (SQL Server 2008) , "UPDATE Database"
Der Lese MDB button besitzt folgenden Code
Jetzt bin ich an den Punkt gekommen wo ich die .MDB eingelesen habe, aber was nun? Hab ne denk Blocklade.. In der .mdb gibts 10 Spalten die möcht ich über den Update Button 1zu1 mit nem Update Befehl in den SQL Server übertragen, aber ich komm grad nich weiter beim proggen. (Den Connection String setz ich unten noch)
Mein Button Verbinde SQL:
*Topic verschoben*
Hab mit nem neuem Projekt angefangen, Windows Form Projekt, hab 3 Buttons erstellt, "Lese MDB" , "Verbinde mit SQL Datenbank" (SQL Server 2008) , "UPDATE Database"
Der Lese MDB button besitzt folgenden Code
VB.NET-Quellcode
- Private Sub btn_lesemdb_Click(sender As System.Object, e As System.EventArgs) Handles btn_lesemdb.Click
- Dim DS As System.Data.DataSet
- Dim MyCommand As System.Data.OleDb.OleDbDataAdapter
- Dim MyConnection As System.Data.OleDb.OleDbConnection
- MyConnection = New System.Data.OleDb.OleDbConnection( _
- "provider=Microsoft.Jet.OLEDB.4.0; " & _
- "data source=C:\GM_SQL.mdb")
- MyCommand = New System.Data.OleDb.OleDbDataAdapter( _
- "select * from Categories", MyConnection)
- DS = New System.Data.DataSet()
- MyCommand.Fill(DS)
- MyConnection.Close()
- End Sub
Jetzt bin ich an den Punkt gekommen wo ich die .MDB eingelesen habe, aber was nun? Hab ne denk Blocklade.. In der .mdb gibts 10 Spalten die möcht ich über den Update Button 1zu1 mit nem Update Befehl in den SQL Server übertragen, aber ich komm grad nich weiter beim proggen. (Den Connection String setz ich unten noch)
Mein Button Verbinde SQL:
VB.NET-Quellcode
- Public Class CCEUpdater
- Dim connectionString As String
- Dim connection As SqlConnection
- Dim adapter As SqlDataAdapter
- Dim cmdBuilder As SqlCommandBuilder
- Dim ds As New DataSet
- Dim changes As DataSet
- Dim sql As String
- Dim i As Int32
- Private Sub Btn_Verbinde_Click(sender As System.Object, e As System.EventArgs) Handles btn_verbinde.Click
- connectionString = ""
- connection = New SqlConnection(connectionString)
- sql = "select * from Spalte"
- Try
- connection.Open()
- Status.Text = "Okay"
- adapter = New SqlDataAdapter(sql, connection)
- adapter.Fill(ds)
- Status.Text = "Verbindung wurde geschlossen"
- 'DataGridView1.DataSource = ds.Tables(0)
- Catch ex As Exception
- MsgBox(ex.ToString)
- Status.Text = "Failed"
- Finally
- connection.Close()
- End Try
*Topic verschoben*
Dieser Beitrag wurde bereits 3 mal editiert, zuletzt von „Marcus Gräfe“ ()