|
Zdravím všechny přítomné. Zkouším najít řešení nebo odpověď na chybu při vykonávání SQL dotazu na access MDB kde se má porovnat tabulky TAB1 a TAB2 a výsledek má být řádky z TAB1 které nejsou obsaženy v TAB2. mělo by fungovat "except", ale bohužel ať zkusím cokoliv tak to hází chybu.
Dim spoj As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "\data.mdb"
mespojeniSEL = New OleDb.OleDbConnection(spoj)
sqlSEL = "SELECT z.model FROM zbozi z" _
& " except SELECT model FROM zbozi_xml "
mujprikazIN = New OleDb.OleDbCommand(sqlSEL, mespojeniSEL)
mujprikazIN.Connection.Open()
Dim fdreadIN1 As OleDb.OleDbDataReader = mujprikazIN.ExecuteReader(CommandBehavior.CloseConnection)
While fdreadIN1.Read
' If fdreadIN1.HasRows = True Then MsgBox("data " & fdreadIN1.GetValue(0), , "")
Dim model = fdreadIN1.GetValue(0)
End While
mespojeniSEL.Close()
sqlSEL = ""
při provozu to spadne a zahlásí se chyba Funkce IErrorInfo.GetDescription se nezdařila - E_FAIL(0x80004005). Snažím se najít řešení a zjístit důvod proč to tomu dotyčnému padá. díky za rady a upozornění pokud jsem něco přehlédl
|