I forum Ricerca FAQ
Fai una domanda
Ultimo messaggio
valerylula
valerylula
il 23 novembre 2001 alle 17:20
9 messaggi dal 23 novembre 2001
Raga io so poco e niente di asp...aiutatemi vi prego il problema e' questo devo costruire un motore di ricerca per un sito, ho utilizzato index server, ho creato il catalogo e funziona ma ora devo implementarlo nel sito credo usando una pagina asp come letto in una guida qui sul sito ho copiato il codice e ho provato a personalizzarlo, non funziona dove sbaglio??
Si accetta qualunque consiglio
<html>
<head>
<title>valery</title>
</head>
<body>
<%@LANGUAGE="VBSCRIPT"%>
<%
set Q=Server.CreateObject("ixsso.Query")
Q.SortBy="rank[d]"
Q.columns="filename,vpath,rank"
Q.catalog="catalosositoitd"
Q.Query=CompSearch
Q.MaxRecords=100
Set RS=Q.CreateRecordSet("nonsequential")
%>
<%
If RS.Eof=False then 'sono stati trovati degli elementi
%>

<!--mostra i risultati-->
<hr size="1">
<font face="Arial" size="1" color="#FF0000"> Documenti da <%=(np-1)*RS.Pagesize+1%>a
<%if(np*RS.PageSize)<RS.RecordCount then
response.write np* RS.PageSize
else
response.write RS.RecordCount
end if
%> su <%=RS.RecordCount%>
</font>
<table widht="100%">
<tr bgcolor="#000080">
<td widht="30"> </td>
<td><font face="Arial" size="1" color="#FFFFFF><b>File</b></font></td>
<td widht="22"><font face="Arial" size="1" color="#FFFFFF><b>Vedi</b></font></td>
</tr>
<%
Do while(Not RS.Eof)and(NextRecordNumber<=RS.PageSize)
%>
<tr<%If nr=0 then%>bgcolor="#E6E6E6"<%Else%>bgcolor="#D0D0D0"<%End If%>>

<td><font face="Arial" size="1><%=NextRecordNumber+(np-1)*RS.PageSize%>.</font></td>
<td><font face="Arial" size="1" color="#000080"><font color="#000000"><a target="_blank"
href="<%RS("vpath")%>"><%=RS("Filename")%></a></font></td>


<td><a target="_blank"href="<%RS("vpath")%>"><img src="lente.gif" widht=20 height=20 alt="" border="0"></a></td>
</tr>

<%
RS.MoveNext
NextRecordNumber=NextRecordNumber+1
Loop
%>
</table>
</body>
</html>

Grazie mille!


RispondiQuoting
mpiscitelli
mpiscitelli
il 23 novembre 2001 alle 17:46
46 messaggi dal 06 settembre 2002
Dovresti indicare cosa c'è che non va:

la pagina da errore, e nel caso che errore è e a che riga

oppure

la pagina non da errore, ma dovrebbe fare questo e invece fa quest'altro.

Altrimenti diventa difficile e lungo esaminare tutto il tuo codice lettera per lettera.

Cmq, a intuito, credo che nella riga

Q.catalog="catalosositoitd"

o hai riportato male il codice, oppure è sbagliato il codice, nel senso che dubito che il tuo catalog si chiami "cataloSositoitd", ma piuttosto "cataloGositoitd". Ma può darsi che non c'entri niente.

Saluti

matteo

RispondiQuoting
valerylula
valerylula
il 23 novembre 2001 alle 22:34
9 messaggi dal 23 novembre 2001
Allora l'errore e' nella riga dove c'e' scritto LOOP , io non lo so ma non e' che il ciclo do...while... vuole un end?
Grazie matteo cmq il nome del catalogo per assurdo e' proprio giusto cosi.....

RispondiQuoting
ojd
ojd
il 23 novembre 2001 alle 23:12
635 messaggi dal 06 settembre 2002
Ciao, non sono sicuro ma... prova a modificare la riga:
Do while(Not RS.Eof)and(NextRecordNumber<=RS.PageSize)

con

if NextRecordNumber<=RS.PageSize then
DO WHILE NOT RS.EOF

LOOP

end if

ciao


JD
OJD
RispondiQuoting

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.