Tujuan: Kata kunci artikel kueri di tabel artikel
Format kueri: Baidu Google Baidu lebih baik atau Google lebih baik Baidu + Google (Anda juga dapat meminta tanpa memasukkan kondisi)
<!-#includeFile = "conn.asp"->
<%
Functionsearshsql (tname, lname, str) 'Tname-Table namelname-column karakter namestr-query
Iftrim (str) = "" Lalu
Mysql = "SELECT*from" & tname
Kalau tidak
String string kueri preprocessing sqlencode (str) '
Arrstr = split (str, "") 'String diproses dengan spasi
Umax = ubound (arrstr) 'Setelah segmentasi, array dibagi, tentukan jumlah kata kunci yang dibagi menjadi
IFUMAX> 0Then 'Pemrosesan beberapa spasi di kata kunci "ifumax> 0then" dimulai dari dimensi kedua
Fori = 1toumax
Strtemp = arrstr (i)
Iftrim (strtemp) = "" thenstrtemp = "/~~~~~/" 'Elemen dibagi menjadi kosong dan digantikan oleh karakter khusus.
Sql = sql & "atau" & lname & "seperti '%" & strtemp & "%'"
Berikutnya
Endif
Mysql = "SELECT*from" & tname & "where" & lname & "like '%" & arrstr (0) & "%'" & sql
Melakukan
j = instr (1, mysql, "%/~~~~~/%", 1)
Ifj = 0then
Exitdo
Endif
Mysql = ganti (mysql, "atau" & lname & "like '%/~~~~~/%'", "")