Ich schreibe gerade eine VB .NET-Anwendung, wo ich versuche, 1 Datenbank zu öffnen, erstellen Sie eine Select-Anweisung und dann die Ergebnisse in eine andere Datenbankdatei mit Microsoft Access-Datenbank 2003.Verwenden von Select-Anweisung aus 1 Datenbank zum Einfügen in eine andere Datenbank mit VB .NET
der Code scheint bei der Ausführung der Anweisung zu stoppen cmdJetDB.ExecuteNonQuery()
ich den folgenden Code verwenden:
Dim conn1 As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data source=C:\Sample.mdb")
Dim conn2 As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data source=C:\db2.mdb")
conn1.Open()
conn2.Open()
Dim mySelectQuery As String
mySelectQuery = "SELECT Sample.LANE_ADDR, Sample.LANE_DT, Sample.LANE_TM, Sample.LANE_SPEED FROM (Sample) WHERE ((Sample.LANE_ADDR) = '164.909' OR (Sample.LANE_ADDR) = '164.909' AND Sample.LANE_DT BETWEEN #4/4/2003# AND #4/5/2003#)"
Dim cmdJetDB As New OleDbCommand(mySelectQuery, conn1)
cmdJetDB.ExecuteNonQuery()
Dim cmdInsert As String
cmdInsert = "Insert INTO Table1 (Sample.LANE_ADDR, Sample.LANE_TM,Sample.LANE_SPEED) VALUES ('164.909', '00:12:30' , '30')"
Dim cmdJetDB2 As New OleDbCommand(cmdInsert, conn2)
cmdJetDB2.ExecuteNonQuery()
conn2.Close()
conn1.Close()
Frage: Was ist es, dass ich nicht tue. Ich habe beide Verbindungen geöffnet, meine beiden SQL-Anweisungen angegeben, funktioniert aber immer noch nicht. Ich muss diese Anwendung wirklich funktionieren lassen. Bitte helfen .........