Sökning på för och efternamn?

strSearch = "anders andersson"
minArray = split(strSearch," ")

SQL = "SELECT * FROM tblUsers WHERE user IN ("

for i = lbound(minarray) to ubound(minarray)
   SQL = SQL & minArray(i)
   if cint(i) <> cint(ubound(minarray)) then
      SQL = SQL & ", "
   end if
next
   SQL = SQL & ")"

Heeelt otestat. ;)

Det fungerar inte - följande felkod:

Kompileringsfel i Microsoft VBScript (0x800A0401)
Slut på programsats förväntas.
/snippets/sok.asp, line 30, column 48
SQL = "SELECT * FROM Personuppg WHERE user IN ("for i = lbound(minarray) to ubound(minarray) SQL = SQL & minArray(i) if cint(i) <> cint(ubound(minarray)) then
-----------------------------------------------^

Jag har datan i två olika fält och jag förstår inte hur jag skall ange fält namnen enligt ditt exempel.

SQL = "SELECT * FROM Personuppg where Efternamn LIKE '%" & Request.Form("Sok") & "%' OR Fornamn LIKE '%" & Request.Form("Sok") & "%' "

JPS skrev:

Det fungerar inte - följande felkod:

Kompileringsfel i Microsoft VBScript (0x800A0401)
Slut på programsats förväntas.
/snippets/sok.asp, line 30, column 48
SQL = "SELECT * FROM Personuppg WHERE user IN ("for i = lbound(minarray) to ubound(minarray) SQL = SQL & minArray(i) if cint(i) <> cint(ubound(minarray)) then
-----------------------------------------------^

Jag har datan i två olika fält och jag förstår inte hur jag skall ange fält namnen enligt ditt exempel.

SQL = "SELECT * FROM Personuppg where Efternamn LIKE '%" & Request.Form("Sok") & "%' OR Fornamn LIKE '%" & Request.Form("Sok") & "%' "

Det är klart att det inte fungerar, koden skall vara som den är skriven. Meningen med den är att generera fram variabeln SQL och sedan exekvera den. Du har ju klämt ihop allt på samma rad. :D

strSearch = "anders andersson"
' // dela söksträngen med split(), använd mellanslag som separerare
minArray = split(strSearch," ")

' // här skapar vi den första delen av SQL-strängen
SQL = "SELECT * FROM tblUsers WHERE user IN ("

' // här loopar vi igenom arrayen (som vi skapade på första raden)
' // och genererar klart SQL-strängen med värdena i
for i = lbound(minarray) to ubound(minarray)
   SQL = SQL & minArray(i)
   if cint(i) <> cint(ubound(minarray)) then
      SQL = SQL & ", "
   end if
next
   ' // lägg till en sista sak, efter loopen
   SQL = SQL & ")"

' // och här KÖR vi SQL-strängen
set objRs = objConn.execute(SQL)

:)

Kan se hur jag gjorde

http://www.webforum.nu/showthread.php?s=&postid=442387#post442387

Tackar för alla svar - koden

strSearch = replace(strSearch," ","%")
q = "select * from (select dbo.DistributorContacts.ForeName + ' ' + dbo.DistributorContacts.LastName AS ContactName from t) s
where s.contactName like '%" & strSearch & "%'"

där fälten läggssamman funkar super!