[Résolu] Microsoft Index Server

Microsoft Index Server [Résolu] - ASP - Programmation

Marsh Posté le 19-05-2006 à 08:40:36    

:hello:  
 
Je cherche a configurer Microsoft Index server, pour pouvoir utiliser des Tag que j'ai dans mes fichiers.
 
J'ai indexé le repertoire où se trouvent les fichiers, et dans l'outil de gestion du Index Server, je vois bien mes tags (Dans la colonne properties)
 
Mais avec cette page ASP, cela ne fonctionne pas du tout
 

Code :
  1. <%
  2. set objQuery =Server.CreateObject("ixsso.Query" )
  3. objQuery.Catalog = "telindus"
  4. objQuery.Columns = "Characterization, DocTitle, Filename, Path, Rank, Size, Vpath, Write, objecttype"
  5. objQuery.SortBy = "Rank[d], size"
  6.  
  7. Set objUtil = Server.CreateObject("ixsso.Util" )
  8. objUtil.AddScopeToQuery objQuery, "/", "deep"
  9. objQuery.Query = "(@objecttype = 22)"
  10.  
  11. set RecSet = objQuery.CreateRecordset("nonsequential" )
  12.  
  13. while not RecSet.EOF
  14. Response.Write "<A HREF=""" & RecSet("vPath" ) & """>" & RecSet("DocTitle" ) & "</A><BR>" & vbCrLf
  15. Response.Write "<b>Summary: </b>" & RecSet("Characterization" ) & "<BR>" & vbCrLf
  16. Response.Write "<b>Rank: </b>" & RecSet("Rank" ) & "<BR>" & vbCrLf
  17. Response.Write "<b>Size: </b>" & RecSet("Size" ) & "<BR>" & vbCrLf
  18. Response.Write "<b>Last Update: </b>" & RecSet("Write" ) &  "<HR>" & vbCrLf
  19. RecSet.MoveNext
  20. wend
  21. %>


 
Une idée ?
 
Merci


Message édité par didier1809 le 19-05-2006 à 09:45:26

---------------
.
Reply

Marsh Posté le 19-05-2006 à 08:40:36   

Reply

Marsh Posté le 19-05-2006 à 09:45:11    

Bon, j'ai trouvé sur le site microsoft (comme quoi ... ;))
 
Voici la reponse :

Code :
  1. <html>
  2. <head>
  3. <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
  4.  
  5. <%
  6. set Q = Server.CreateObject ("IXSSO.Query" )
  7. Q.catalog = "telindus"
  8. Q.DefineColumn "modelname (DBTYPE_WSTR) =   d1b5d3f0-c0b3-11cf-9a92-00a0c908dbf1 modelname"
  9. Q.Query = "@modelname  Pro*"
  10. Q.Columns = "modelname, filename"
  11. set RS = Q.CreateRecordSet("sequential" )
  12.  
  13. %>
  14.  
  15. <title>Exemple de recherche</title>
  16. </head>
  17. <body>
  18. Begin
  19. <p>
  20. <%
  21. Do While Not RS.EOF
  22. %>
  23. <p>
  24. <b>Nom de modele : </b><%= RS("modelname" ) %>
  25. </p>
  26. <%
  27.    RS.MoveNext
  28.         Loop
  29. %>
  30. </p>
  31. </body>
  32. </html>


---------------
.
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed