Sök anställd

Bygg ihop hela namnet i din fråga med
Select bla,bla,bla, firstname+' '+surname as UsrName Where UsrName LIKE '" & strString "'

q = "SELECT * " & _
"FROM personnel " &_
" WHERE firstname = '" & strString & "'" & _ 
" OR lastname = '" & strString & "'" & _
" OR firstname & ' ' & lastname = '" & strString & "'" &_
" OR lastname & ' ' & firstname = '" & strString & "'"

Alternativt så kan du ha separata fält för för- och efternamn så vet du vad som är vad.

Antingen så eller så får du testa att göra en Split på söksträngen på mellanslag. Något i stil med:

Dim astrNames() As String
Dim strWhere As String

strWhere = vbNullString
astrNames = Split(strSearch, " ")

For i = 0 To Ubound(astrNames) - 1
    strWhere = strWhere & "firstname LIKE '" & astrNames(i) & "' OR lastname LIKE '" & _
        astrNames(i) & "' "
    If i < Ubound(astrNames) - 1 Then
        strWhere = strWhere & "OR "
    End If
Next i

strSQL = "SELECT * FROM personnel WHERE " & strWhere & ";"

/r. eller så gör du som LarsG föreslår (Hålla på å skriva vettiga svar samtidigt som jag skriver annan typ av svar... sicken en )

Tack för hjälpen allihop! Jag kör på LarsGs kod eftersom den aldrig svikit mig tidigare.

Din attan