Jag har kopplat till Access och vill göra en SQL där resultatet läggs i en ny tabell. Först skall befintlig tabell tas bort. Förr fanns ett kommande som hette Connection.Execute(SQL) Dim cmd As New OleDb.OleDbCommand("SELECT @@IDENTITY AS NEWID FROM " & Me.TableName)Execute SQL
Hur gör man nu när man vill lha fler SQL-satser på rad exekverade? Måste man ha en dataadapter? Så här har jag börjat
Dim Connection, Sql As String
Sql = "DROP TABLE resultat"
Connection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:\handel\kunder.mdb"
Dim objConn As New OleDb.OleDbConnection(Connection)
Dim objDataAdapter As New OleDb.OleDbDataAdapter(Sql, objConn)
objConn.Open()
Tabellen tas bort om den finns
Därefter skall en ny SQL-sates exekveras.
Sql="SELECT * INTO resultat Where...Sv: Execute SQL
cmd.Connection = Me.Connection
Dim obj_id As Object = cmd.ExecuteScalar()