Hi can anyone help me with this rather traitorous question
I'm putting a small search page in a friend's website (which is not cf-enabled, unfortunately) The search results code I want is (in coldfusion): <cfquery name="get_titles" datasource="gaslight_cf" dbtype="ODBC"> SELECT tbl_category.category, shstock.BOOKNUM, shstock.TITLE, shstock.Author, shstock.PRICE, shstock.CategoryID FROM tbl_category INNER JOIN shstock ON tbl_category.category_id = shstock.CategoryID WHERE 0=0 <CFLOOP INDEX="i" FROM="1" TO="#ListLen(Title, ' ')#"> AND Title LIKE '%#ListGetAt(Title, i, " ")#%' </CFLOOP> <CFLOOP INDEX="i" FROM="1" TO="#ListLen(Author, ' ')#"> AND Author LIKE '%#ListGetAt(Author, i, " ")#%' </CFLOOP> <CFIF Len(FORM.Category_id)> AND shstock.CategoryID=#FORM.Category_id# </CFIF> ORDER BY Title </CFQUERY> Is anyone able to translate the middle bit to VBScript for me, please ie <CFLOOP INDEX="i" FROM="1" TO="#ListLen(Title, ' ')#"> AND Title LIKE '%#ListGetAt(Title, i, " ")#%' </CFLOOP> <CFLOOP INDEX="i" FROM="1" TO="#ListLen(Author, ' ')#"> AND Author LIKE '%#ListGetAt(Author, i, " ")#%' </CFLOOP> <CFIF Len(FORM.Category_id)> AND shstock.CategoryID=#FORM.Category_id# </CFIF> MTIA Seamus ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Your ad could be here. Monies from ads go to support these lists and provide more resources for the community. http://www.fusionauthority.com/ads.cfm FAQ: http://www.thenetprofits.co.uk/coldfusion/faq Archives: http://www.mail-archive.com/[email protected]/ Unsubscribe: http://www.houseoffusion.com/index.cfm?sidebar=lists

