[ASP] Motore di ricerca interno su 2 tabelle

djjunior

Utente Attivo
24 Lug 2004
99
1
8
Salve,
potete suggerirmi qualche script in asp per la creazione di un motore di ricerca interno che faccia la ricerca su 2 tabelle contemporaneamente, il db è mysql.
Grazie 1000
 

djjunior

Utente Attivo
24 Lug 2004
99
1
8
Salve
non sono come uscire da questo problema, dovrei fare un motore di ricerca interno al sito su 2 tabelle (diverse) contemporanemente le tabelle sono composte tipo cosi:
TABELLA 1
id, nome colonna1, etc
1, testo1
2, testo2
3, testo3

TABELLA 2
id, nome colonna23, nome colonna56
1, testo1 , testo1
2, testo2 , testo2
3, testo3 , testo3

Il db è mysql

E questo script:
Codice:
<%
page = Cint(request.querystring("page"))
if page = 0 then page = 1

database = "Sql123456_4"
call dbConnect(objConn, database)
'Totale dei record

sek = request.form("keywords")
qstring = "keywords=" & server.URLEncode(sek)

function fixSQL(TheString)
    TheString = replace(TheString,"'","''")   
fixSQL = TheString
end function

strSQL = "SELECT COUNT(*) as tot FROM (SELECT id, NOME COLONNA1 FROM tabella1 WHERE NOME COLONNA1 LIKE '%" & sek & "%'       UNION SELECT id, NOME COLONNA23, NOME COLONNA56, FROM tabella2 WHERE NOME COLONNA23 LIKE '%" & sek & "%' OR NOME COLONNA56 LIKE '%" & sek & "%'         ) as total"
Set objRS = objConn.Execute(strSQL)

if not objRs.eof then
tot_record = Cint(objRS("tot"))
else
tot_record=0
end if
set objRS = nothing


pageSize = 15

inizio = (page - 1) * pageSize

pagine_totali = tot_record / pageSize

if pagine_totali - CInt(pagine_totali) > 0 then
pagine_totali = CInt(pagine_totali + 1)
else
pagine_totali = CInt(pagine_totali)
end If

strSQL = "SELECT * FROM (SELECT id, NOME COLONNA1 FROM tabella1 WHERE NOME COLONNA1 LIKE '%" & sek & "%' UNION SELECT id, NOME COLONNA23, NOME COLONNA56, FROM tabella2 WHERE NOME COLONNA23 LIKE '%" & sek & "%' OR NOME COLONNA56 LIKE '%" & sek & "%'         ) as total order by id desc LIMIT "& inizio &","& pageSize

Set stRS = server.CreateObject("ADODB.Recordset")
stRS.Open strSQL, objConn

if tot_record > 0 then
for i=1 to PageSize
if strs.eof<>true and strs.bof<>true then

%>

i risultati devono essere:
NOME DELLA COLONNA dove è stata trovare la parola cercata
+ l'id della stessa colonna dove è stata trovare la parola cercata


<%
stRS.movenext
end if
next
else

%>

Non ci sono prodotti  con il termine cercato

<%
end if
%>
<p align='center'>
<div class="paginazione">
<%

page = page
totPage = pagine_totali
Max = 9

startPage = page
EndPage = page + Max

if page > 1 then
Response.write("<a href=""search.asp?keywords=" & request.form("keywords") &"&page="& page -1 &"""><<</a>")
end if

if EndPage > totPage then EndPage = totPage

for i = StartPage to EndPage
If i = totPage then
Response.Write("")
Else
If i = page then
Response.Write("<b>" & i & "</b>")
else
Response.write ("<a href=""search.asp?keywords=" & request.form("keywords") &"&page=" & i & """> " & i & " </a> ")
end if
end if
next

if page < totpage then
Response.write ("<a href=""search.asp?keywords=" & request.form("keywords") &"&page=" & page +1 & """>>></a> ")
end if
%>
 

Paolo69

Moderatore
Membro dello Staff
MOD
18 Feb 2010
555
13
18
Italy
www.caprioli.info
Penso che ci voglia un esperto in SQL non in ASP.

Prova con una query del genere:
Codice:
SELECT     *
FROM         Table1 INNER JOIN
                      Table2 ON Table1.id = Table2.id
WHERE     (Table1.colonna1 LIKE 'ciao') OR (Table2.colonna23 LIKE 'giampaolo')
 

djjunior

Utente Attivo
24 Lug 2004
99
1
8
Grazie PAOLO69
per l'aiuto, ma non ho capito che valore richiamare per la stampa a video dei risultati
Ricordo che la ricerca deve essere fatta su tutte e 2 le tabelle indistintamente.
E poi i risultati che vorrei visualizzare dovrebbero essere:

NOME DELLA COLONNA dove è stata trovare la parola cercata (es: colonna1)
+ ID (della stessa colonna) dove è stata trovare la parola cercata (es: 2)

Perchè come vedi da questo esempio di struttura tabella il testo è nei campi di ogni tabella.
 
Discussioni simili
Autore Titolo Forum Risposte Data
S Problema motore di ricerca in Asp Classic ASP 2
C Codice Asp Motore Ricerca Classic ASP 1
L motore di ricesca in asp Discussioni Varie 2
I asp | includere un file, indirizzo depositato in un db Classic ASP 0
Paolo69 Risolto reCAPTCHA v2 per ASP Classic ASP 0
P lanciare script asp (o php) da jquery Javascript 1
L Modifica file upload in ASP Classic ASP 2
felino ASP.net MVC: Exception e chiamata AJAX ASP.NET 1
W Rinominare Documenti Con Form Asp Classic ASP 9
G Registrazione utente su pagina asp Classic ASP 14
R Sviluppatore ASP.NET Offerte e Richieste di Lavoro e/o Collaborazione 0
seranto [ASP] Controllare il testo inserito in Textarea Classic ASP 6
F classic asp popolare combo box javascript Presentati al Forum 1
P Passagio dati complessi tra una ASP.NET webapi e Angular ASP.NET 1
A [ASP.Net] Gestire il profilo ADMIN in un progetto ASP NET e pattern MVC ASP.NET 0
P [ASP.Net] Problema ERR_INCOMPLETE_CHUNKED_ENCODING 206 (Partial Content) con Font ASP.NET 4
A [ASP] Confronto tra dati Form e DB Classic ASP 2
A Mantenere la validazione reindirizzandoci su un secondo sito WEb. (ASP.NET) ASP.NET 0
StephenSoftware [ASP.Net] Pagina Master ed eventi... ASP.NET 0
K [ASP] Visualizzare nome del file selezionato Classic ASP 3
S [ASP] rubrica telefonica Classic ASP 2
M MySQL e classic ASP Classic ASP 5
D [ASP] Eliminare gli zeri che nn servono Classic ASP 1
G [ASP] Ciclare i valori di 2 array Classic ASP 2
S [RISOLTO] aggiorna tabella da select option asp classic Classic ASP 7
S elimina record sql asp classic Classic ASP 5
D [ASP] Autocomplete cerca su 2 campi del db Classic ASP 1
D [ASP] Leggere Campo decimal MYSQL Classic ASP 1
S [ASP] SALVARE VALORE SELECT OPTION SU CAMPO TABELLA ACCESS Classic ASP 9
NuviaSoftware [Retribuito] [Cerco] Programmatore ambienti ASP.NET,. Net Azure web apps, Javascript Offerte e Richieste di Lavoro e/o Collaborazione 0
D [ASP] scaricare articoli Classic ASP 8
D [ASP] Mysql insert e update Classic ASP 2
V [ASP.Net] avento keydown crh13 enter ASP.NET 0
A [ASP.Net] Dropdownlist ASP.NET 0
S [ASP.Net] [ASP] Upload Image ASP.NET 6
V Ricevere messaggi email certificata con CDO o altro oggetto in ASP Classic ASP 0
A [ASP] query wish list Classic ASP 3
riminese77 [ASP.Net] Popup Bootstrap in datagrid ASP.NET 0
D [ASP] si può fare? Classic ASP 29
D [ASP] ordinamento query Classic ASP 2
M [ASP] Upload file da form controllo Classic ASP 5
S SQL, ACCESS & ASP CLASSIC - QUERY Classic ASP 3
G [ASP] Incrementare un valore on the fly su selezione select Classic ASP 3
K [ASP.Net] Realizzazione menu a tendina dipendenti ASP.NET 1
Tommy03 Aprire un file .asp nel browser Classic ASP 5
E [ASP.Net] Access 2016 ? Non si usa Microsoft Jet 4.0 ma Engine 2016 o 2010. Non va ! ASP.NET 2
D csrf : Cross Site Request Forgery in classic asp Classic ASP 0
M [ASP.Net] [ASP] geoblocking e web.config ASP.NET 3
N Cerco sviluppatore ASP per aggiornamento sito e-commerce esistente Offerte e Richieste di Lavoro e/o Collaborazione 0
D prima prova con ASP... dove sbaglio? Classic ASP 13

Discussioni simili