Discussion :

[calagan99]

Bonjour à tous,

je me prends la tête depuis plusieurs jours déjà sur la manière dont je dois implémenter un moteur de recherche dans mon appli.
J'ai développé un moteur, mais je pense que Google et autres MSN ont des algorithmes plus calés que les miens.

Aussi j'ai étudié les solutions disponibles et quitte à faire du full Microsoft, autant utiliser l'API LiveSearch.
Celle-ci est directement intégrée au framework 3.5 avec un nouveau contrôle: le SearchDataSource. Je ne suis pas encore au 3.5 donc j'utilise le webservice.

Pour cela, je reference le web service grace a l'adresse:
http://soap.search.msn.com/webservices.asmx?wsdl
Cela me crée un repertoire MSNSearchService qui contient MSNSearchService.Discomap et MSNSearchService.wsdl

mon code fonctionne de la sorte:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
 Protected Sub BTNSearch_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles BTNSearch.Click
        ' Création d'un objet msnSearch
        Dim SearchService As New MSNSearchService.MSNSearchService
        ' Instanciation de la recherche
        Dim SearchRequest As New MSNSearchService.SearchRequest
        SearchRequest.Query = TxtChercher.Text
        SearchRequest.AppID = "51B8EE99AA64E2B7B8E66E204B870551496A8A88"
        SearchRequest.CultureInfo = "en_US"
        SearchRequest.SafeSearch = MSNSearchService.SafeSearchOptions.Moderate
        'Instanciation du lieu de la recherche
        Dim arraySize As Integer = 0
        Dim SourceRequest As MSNSearchService.SourceRequest() = New MSNSearchService.SourceRequest(arraySize) {}
        SourceRequest(0) = New MSNSearchService.SourceRequest
        SourceRequest(0).Source = MSNSearchService.SourceType.Web
        SourceRequest(0).ResultFields = MSNSearchService.ResultFieldMask.All
        SourceRequest(0).Count = 10
 
        Dim SearchReponse As New MSNSearchService.SearchResponse
        Try
            SearchReponse = SearchService.Search(SearchRequest)
        Catch ex As Exception
            Dim TEST As String = ex.Message
        End Try
 
        AfficherResultatsRecherche(SearchReponse)
    End Sub

Je ne vois pas où je commets une erreur mais a chaque tentative, au moment de lancer la recherche (SearchReponse= SearchService.Search(SearchRequest)
j'obtiens un "Client Error", je ne peux plus debugger en pas à pas, et en gros la connexion avec le webservice est impossible.

Avez vous des idées ?

Merci d'avance

[calagan99]

Pas la moindre idée sur ce sujet ?

Je suis derrière le proxy de ma boîte et je suppose que cela peut être la cause du problème de connexion. Mais je n'ai pas d'admin réseau pour m'expliquer cela ou régler le problème, personne n'a idée sur la maniere de solutionner ou quelques minutes pour tester le morceau de code et voir la réaction ?

D'avance merci

[calagan99]

un ptit up

[mafyoso]

Bonjour,

As-tu déjà vu fonctionner le webservice?
J'ai fais le test de mon côté, sans proxy, en changeant les paramètres, sans résultat.
Donc je plante .

A suivre

[The_badger_man]

Un tuto pour toi: http://badger.developpez.com/tutorie...s-live-search/

[calagan99]

Un tuto pour toi: http://badger.developpez.com/tutorie...s-live-search/

Merci à toi the_badger_man, c'est de ce tutoriel que je me suis servi pour creer ma fonction.
Vois tu quelque chose dans mon code qui pourrait causer ce probleme car j'ai beau tout retourner je ne vois pas ?

Merci pour le test Mafyoso

[Flamby38]

( J'ai pas beaucoup d'experience en .NET alors je vais ptet dire une grosse connerie )

Dim arraySize As Integer = 0 -> faudrait pas mettre 1? Pour avoir 1 element dans ton array et non pas 0?

Et sinon, ton SourceRequest, tu l'utilises null part? tu le crees mais il intervient ou? y'a pas un lien qui manque, genre entre ton searchrequest et ton sourcerequest?

( c'est comme la license MS, c'est livré tel quel et vous n'avez pas le droit de vous retourner contre moi si mon message cause des plantages )

[calagan99]

Bah il me semble que le premier index d'un array est 0, que pour deux elements l'index est 1, etc.
En ce qui concerne le sourceRequest, je le stocke et le passe en parametre a une fonction qui affiche les résultats.

Mais merci de ton aide

[Flamby38]

un ptit dernier post parce que je pense quand meme qu'il te manque une ligne.

Dans le tutorial je lis :

on affecte le tableau d'objets SourceRequest à la propriété Requests de l'objet SearchRequest.

Donc avant de lancer la recherche moi je mettrai bien la ligne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

SearchRequest.Requests = sourceRequest

[calagan99]

Bah je suis en ce moment sur autre chose, mon boss m'a mis une pression d'enfer ce matin pour que je revoie un truc de A à Z, truc pour lequel il me faudrait une journée complète heures sup comprises, sauf que là je dois avoir fini pour dans ... 2H30.
Donc en jettant un coup d'oeil j'ai vu ca effectivement. Merci pour le coup d'oeil, je teste dés que j'ai 5 minutes

[calagan99]

Je ne comprends définitivement plus.
Si je crée la fonction en C#, alors ca fonctionne.
Si je fais à l'identique en VB, je n'obtiens rien...

Paumé je suis

EDIT: Il y a quelque chose que je ne comprends vraiment pas:
- en C#, j'arrive sans problème à utiliser "using MonProjet.Com.Msn.Search.Soap"
- en VB, si j'essaye de faire de même avec "imports", mon projet n'apparaît pas. Dans ce cas, est ce suffisant de referencer Com.Msn.Search.Soap ?

Je commence vraiment à ne plus comprendre comment je vais solutionner ce problème.