Prosím poraďte, už se s tím mořím druhý den. Mám databázi access o dvou tabulkách, přičemž tabulky mají různý počet záznamů i různá pole. Jediné společné pole pro obě tabulky je "Jmeno". Jak mám prosím udělat, abych smazal záznamy v obou tabulkách kde Jmeno="nějaký text", přičemž ve druhé tabulce záznam Jmeno="nějaký text" nemusí vždy existovat. Mám to takto, ale hlásí mi to chybu na druhém příkaze mycmd.ExecuteNonQuery(), přičemž první se bez problémů provede:
Dim comazeme As String = TextBox1.Text 'to je ten nějaký text
sql = "DELETE * FROM vzorky_popis WHERE ID=" & Val(txtID.Text)
mycmd = New OleDb.OleDbCommand
If Not CN.State = ConnectionState.Open Then
CN.Open()
End If
mycmd.Connection = CN
mycmd.CommandText = sql
mycmd.ExecuteNonQuery()
'smazeme i druhou tabulku
sql = "DELETE * FROM vzorky_vlastnosti WHERE Jmeno='" & comazeme & "'"
mycmd.CommandText = sql
mycmd.ExecuteNonQuery()
Předpokládám, že se to udělat mnohem elegantněji...
|