[VB.NET] Indexing Service

Version imprimable

13/06/2006, 16h47
yoann19

[VB.NET] Indexing Service

Bonjour,

J'arrive à parcourir et récupérer les différents catalogues présents dans le service d'indexation de Windows mais je n'arrive pas à récupérer les différents répertoires qui leur sont associés. J'ai tenté plusieurs choses grâce à la classe CIODMLib.ICatAdm mais je ne vois pas comment accéder aux répertoires des catalogues en vb.net. Quelqu'un aurait-il une idée ?

Je souhaite juste afficher une liste des répertoires pour chaque catalogue.

Merci pour vos réponses

J'ai finalement réussi à trouver, voila mon code si ça intéresse quelqu'un (je retourne les résultats sous la forme d'un DataSet) :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
 
''' <summary>
    ''' Retourne la liste des répertoires du catalogue
    ''' </summary>
    ''' <returns></returns>
    Public Function LoadAllDirectory() As DataSet
 
        Dim isFoundDirectory As Boolean = oICatAdm.FindFirstScope()
        Dim dsDirectories As New DataSet
        Dim ligne As DataRow
 
        'création d'une table dans le dataset
        dsDirectories.Tables.Add()
 
        'création des différentes colonnes de la table
        dsDirectories.Tables(0).Columns.Add("RepertoirePhysique", GetType(String))
        dsDirectories.Tables(0).Columns.Add("TailleRepertoirePhysique", GetType(Long))
 
        While isFoundDirectory
 
            ligne = dsDirectories.Tables(0).NewRow
 
            Dim scope As New CIODMLib.ScopeAdm
            scope = CType(oICatAdm.GetScope, CIODMLib.ScopeAdm)
 
            Dim chemin As String = scope.Path
 
            'on récupère les infos du catalogue trouvé
            Dim oDirectory As New CDirectory(chemin)
 
            ligne("RepertoirePhysique") = oDirectory.RepertoirePhysique
            ligne("TailleRepertoirePhysique") = oDirectory.TailleRepertoirePhysique
            'Debug Pour vérifer les propriétés
            'on ajoute les infos du site web dans une ligne de la table
            dsDirectories.Tables(0).Rows.Add(ligne)
            isFoundDirectory = oICatAdm.FindNextScope()
        End While
 
        Return dsDirectories
 
    End Function

Je reprends ce topic même si le problème est différent : Je n'arrive pas à faire de requête sur un catalogue pointant sur un serveur distant.

Voilà sur quoi point le catalogue appelé "Test3" :

Code:

\\Serveur\Repertoire$\Projets

Donc dans mon code, j'écris ma requête :
Code:

1 2 3 4 5 6 7 8 9 10 Private MonoleDbSelectCommand1 As New System.Data.OleDb.OleDbCommand Private MondbAdapter As New System.Data.OleDb.OleDbDataAdapter Private MadbConnection As New System.Data.OleDb.OleDbConnection Private MaDataTable As New DataTable MondbAdapter.SelectCommand = MonoleDbSelectCommand1 MonoleDbSelectCommand1.Connection = MadbConnection MadbConnection.ConnectionString = "Provider=MSIDXS.1;Data Source=Test3" SQLSettingDir = "SELECT path FROM SCOPE() ORDER BY path" MondbAdapter.SelectCommand.CommandText = SQLSetting MondbAdapter.Fill(MaDataTable)
Mais voilà, que je mette dans le Scope() :

Citation:

- """"
- ""/"" (ainsi que //, \, \\ ...)
- ' DEEP TRAVERSAL OF ""\"" '
- ' DEEP TRAVERSAL OF ""\\"" '
- ' DEEP TRAVERSAL OF ""/"" '
- ' DEEP TRAVERSAL OF ""//"" '

Rien ne fonctionne, à chaque fois le MondbAdapter.Fill(MaDataTable) me balance une exception.

Peut être que quelqu'un a une solution sur ce problème où je bloque assez stupidement.

27/05/2008, 11h45
koukoula
Ok, j'ai fais des tests à partir d'un serveur lié sous SQL Server, et quand j'exécute une requête distribuée de ce type :
Code:

1 2 3 4 SELECT * FROM OPENQUERY( SERVDIST1, 'SELECT path, FileName, Size, docauthor FROM SCOPE('' "\" '') ')
Ca me renvoie un résultat !

Mais dès que je rajoute un nom de répertoire après le '\', plus aucun résultat (mais pas d'erreur), alors que je fais pointer mon catalogue sur plusieurs répertoires : Clients, Modèles, etc...

Comment pourrait-on dans ce cas utiliser le scope pour pouvoir naviguer dans les répertoires ?
27/05/2008, 14h58
koukoula
Enfin ! Après pas mal de test, il semblerais qu'un alias UNC soit créé par défaut, celui correspond au chemin du serveur réseau soit un chemin de type :

\\nomserveur\rép\etc...

Donc la véritable requête serait :
Code:

1 2 3 4 SELECT * FROM OPENQUERY( SERVLIEE, 'SELECT path, FileName, Size, docauthor FROM SCOPE('' SHALLOW traversal of "\\NomServ\NomRep\NomSousRep\" '') ')
27/05/2008, 15h55
koukoula

Bon ben je me sens un peu seul moi^^

Je viens une autre question complètement différente mais toujours concernant l'indexing service :

Peut-on utiliser "hierarchical traversal of ..." avec Indexing Service ? Parce que dès que j'essaye d'exécuter une requête contenant ce type d'exploration, une exception me retourne :

Code:

Syntaxe incorrecte à côté de 'h'. '(', DEEP_TRAVERSAL, SHALLOW_TRAVERSAL, URL attendu. SQLSTATE=42000

?