Dim temp_Boek As String = txt_Zoeken.Text
temp_Boek = "%" & temp_Boek & "%"
Dim temp_sql = "SELECT * FROM tbl_BoekDBase WHERE BOEK LIKE" & "'" & temp_Boek & "'"
dbSource = "Data source= " & mod_Settings.path_DBase
ds_SQL.Clear()
con_SQL.ConnectionString = dbProvider & dbSource
con_SQL.Open()
da_SQL = New OleDb.OleDbDataAdapter(temp_SQL_Statement, con_SQL)
da_SQL.Fill(ds_SQL, "BoekDBase")
con_SQL.Close()
Dim temp_ID As Integer = 0
For x = 0 To mod_Database.ds_SQL.Tables("BoekDBase").Rows.Count - 1
Dim temp_BOEK_ID As String = mod_Database.ds_SQL.Tables("BoekDBase").Rows(x).Item("Id")
Next
Ik heb een vraag over een SQL statement in VB.NET ...
In het voorbeeld heb ik er één om te zoeken naar een titel... ik zou die willen vervangen door de query die ik in de MS Access mdb file zelf heb... (voor het aantal dupes te zoeken )
SELECT First(tbl_BoekDBase.BOEK) AS [BOEK Veld], Count(tbl_BoekDBase.BOEK) AS AantalDuplicaten
FROM tbl_BoekDBase
GROUP BY tbl_BoekDBase.BOEK
HAVING (((Count(tbl_BoekDBase.BOEK))>1));
ik zou dus deze string willen vervangen door een string van de query hierboven...
Dim temp_sql = "SELECT * FROM tbl_BoekDBase WHERE BOEK LIKE" & "'" & temp_Boek & "'"
maar ik heb geen idee hoe ik dat gemakkelijk in een string krijg
mvg,
bedankt bij voorbaat
Laatst bewerkt: