Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Internet (https://www.clubdelphi.com/foros/forumdisplay.php?f=3)
-   -   Buscador? (https://www.clubdelphi.com/foros/showthread.php?t=2880)

olaya 11-08-2003 19:33:46

Buscador?
 
Soy nueva en este club y hace tiempo no trabajaba con Delphi, en estos momentos realizo aplicaciones en web pero necesito un buscador para mi Intranet y he visto que el Delphi es mas fuerte para este tipo de aplicaciones que llevan un trabajo en bajo nivel mas fuerte, por lo que pienso que esta función(buscador) ya debe estar implementada hace tiempo o alguien la debe tener pensada, si tienen algo parecido o igual a esto le agradecería me hicieran llegar su ayuda,consejos,guía, etcétera,
gracias de antemano
Olaya

__hector 12-08-2003 00:23:37

En que esta montado tu servidor web en la intranet? Existen modulos que implementan busquedas en paginas web o documentos en un servidor de intranet.

Si es MS/IIS implementar un motor de busqueda es relativamente sencillo, sobre todo si corre bajo Win2k o superior.

olaya 12-08-2003 00:45:05

mi servidor usa el IIS de w2k...si es tan sencillo, pues espero instrucciones....
nota: el buscador debe buscar en los metas de las páginas de la intranet.

__hector 13-08-2003 17:14:38

Si utilizas IIS me imagino que estas programando en ASP. Un breve resumen de lo que tienes que hacer es:

Poner el servicio de Indexing Service a correr, Crear un catalogo en el manager del servicio (el manager esta en Computer Managment/Services and Applications/Indexing service), con el directorio a indexar, y luego aplicar los filtros. Los objetos para el servicio de indexado los brinda la ixsso Control Library, contenida en la dll ixsso.dll. De estas derivas algunos objetos con los que trabajas, y aqui te paso un breve ejemplo de un componente que yo cree en vb para trabajar con el indexado:

Código:

Dim ObjQuery As New CissoQuery
Dim Util As New CissoUtil
....

    'El catalogo que definimos en el Index Manager
    ObjQuery.Catalog = "WebSite" 

    ' Tipo de busqueda, y desde donde se inicia la busqueda
    Util.AddScopeToQuery ObjQuery, "/", "deep"

    ' Los resultados que queremos obtener
    ObjQuery.Columns = "DocTitle, Vpath, Characterization, Rank, size"

...
Aqui definimos el filtro de la consulta:

query = "@contents " & textoabuscar & "* "
' Contents contiene el texto a buscar... puedes utilizar comodines

 "and not #filename *.|(txt|,inc|,mdb|,cnt|,class|,toc|,css|,gif|,jpg,|,swf|,png|,pps|) "
'Incluimos tambien las extensiones en las que no se hara la busqueda

"and not #filename home.asp "
'Podemos definir los archivos en los que no queremos buscar

"and not #Vpath =*\perfil* "
'O incluso las rutas donde no debe buscar

..............

    ObjQuery.query = query
    Set rs = ObjQuery.CreateRecordset("nonsequential")

Ahi ya manejarias el resultado como un recordset comun y corriente, con las propiedades EOF, y los metodos MoveNext y MovePrevious.

Te dejo con algunos enlaces, y suerte!

Enlaces:
http://msdn.microsoft.com/library/de...webov_4i0j.asp

http://msdn.microsoft.com/library/de...webqy_1ai5.asp

olaya 18-08-2003 19:52:30

Hola, Hector,
ya tenemos el buscador funcionando pero no busca en los metas sino en toda la página, debe existir una forma para especificarle donde buscar, puede ser en las propiedades, ya que usamos un método de indexación llamado Dublin Core en todas las intranets, abajo te pongo un ejemplo:
<meta name="DC.Title" content="Reaprovisionamiento">
<meta name="DC.Author" content="Nildo Simón">
<meta name="DC.Subject" content="reaprovisionamiento, pedidos, recepción, ociosos, inventario, plan">
<meta name="DC.Description " content="Recepción y distribución de los productos nacionalmente según el plan">
<meta name="DC.Publisher" content="Ing. Olaya Jiménez">
<meta name="DC.Date" content="2003-08-13">
y como ves ahi definimos lo único que debe encontrar,
espero tu certera respuesta,
saludos
Olaya
PD: Quisiera establecer un contacto mas directo por correopara intercambiar, podría ser?


La franja horaria es GMT +2. Ahora son las 17:29:05.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi