HEJ! är det ungefär så här du menar?SQL-kommandon problem!!
jag har gjort ett program som registrerar kunder. Men jag vill lista ut alla kunder som deras förnamn börjar bokstav med 'A', sedan när jag trycker bokstav 'A' så får jag alla kunder med sina förnamn som börjar med 'A' bokstav t.ex.
Hur skriver man med hjälp av SQL-kommandon (via VB)?
Jag hoppas att Ni förstått
MVH
/AbbeSv: SQL-kommandon problem!!
Option Explicit
Private Sub Text1_Change()
Dim db as new ADODB.Connection
Dim rst as new ADODB.Recordset
Dim strSQL as String
Dim strLista as String
db.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & App.Path & "\DB.mdb;uid=Admin"
strSQL = "SELECT Namn FROM Namn Where Namn LIKE '" & Text1.text & "%'"
Set rst = db.Execute(strSQL)
List1.Clear
While Not rst.EOF
strLista = rst.Fields(0)
List1.Additem strLista
rst.MoveNext
Wend
rst.Close
db.Close
End Sub
' Du behöver
'En lsitbox
'En TextBox
'Referens till Microsoft ActiveX Data Objects 2.1 Library
Testa detta och se om det funkar...
//Petter