Discussion :

[Micle]

Bonjour à tous.
Je développe une petite application en VB6 qui devra remplir (selon le niveau de difficulté) une grille de mots fléchés.
J’ai déjà une liste de mots(environ 130000) avec leurs fréquences d’utilisation (très pratique).
Je recherche un fichier style .txt ou .dat qui regrouperait une liste de mots français et leur synonymes style ‘mot,synonyme1, synonyme2 ect’,et malgré plusieurs heures de recherche sur le net aucune source trouvée.
J'ai essayer de rechercher dans les forums,mais pas de réponses.
Si vous pouvez m’aider car je commence à désespérer de trouver ce fichier.
Merci à toutes réponses.
Cordialement.

[Micle]

ReBonjour à tous.
Résolu grace à thesaurus-v2.3
Si vous exploiter cette base merci de m'expliquer le fonctionnement du fichier .idx.
Car j'ai du mal à trouver un mot avec accent grave ou aigu alors qu’ils existent dans le fichier.
J'utilise la fonction InStr qui trouve tous les mots sans accent sans problèmes,
et j'ai essayer la comparaison binaire ou textuelle, si une personne à une autre idée je suis preneur ...
Merci à toute aide possible.
bonne soirée à tous.
Michel

[ProgElecT]

Salut

J'utilise la fonction InStr qui trouve tous les mots sans accent sans problèmes,

L'utilisation de RegExp pourrait être plus performant, en tout cas plus pointu dans la réponse suivant le(s) critère(s).
Pour le code, il faut faire référence à Microsoft VBScript Regular Expressions 5.5 ou créer un objet

Sans référence à Microsoft VBScript Regular Expressions 5.5

Code :

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

1
2
Dim RegularExpressioN As Object
Set RegularExpressioN = CreateObject("VBScript.RegExp")

Si reference à Microsoft VBScript Regular Expressions 5.5

Code :

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

1
2
Dim RegularExpressioN As RegExp
Set RegularExpressioN = New RegExp

http://lgmorand.developpez.com/dotnet/regex/
https://vb.developpez.com/faq/?page=Langage#regexp
http://tahe.developpez.com/web/vbscr...e=page_4#LIV-B

[Micle]

Merci de votre réponse trés calée pour moi.
J'ai bien compris (et appris) la création de variable objet , mais comment l'utiliser dans mon code
la je sèche,je ne suis pas un pro.
Si vous avez un exemple,sachant que mon code était;

Code :

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

ChnTemp3 = InStr(1, ChnTemp2, StMot, 1)

J'ai entrer ces déclarations;

Code :

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

1
2
Dim RegularExpressioN As Object
Set RegularExpressioN = CreateObject("VBScript.RegExp")

svp comment transformer ChnTemp3 = InStr(1, ChnTemp2, StMot, 1) avec l'utilisation de RegExp
car malgré les liens que vous m'avez donnés je ne trouve pas de solution.
ps j'ai essayer strcomp même problème.
merci d'avance à toutes réponses qui me sortirai de ce problème.
Bonne aprem à vous tous.

[ProgElecT]

Salut

Le plus simple, télécharger la source de ce petit programme Manipulation de l'objet RegExp
Je te conseil de faire référence (Alt+p ---> r dans l'éditeur VB6) cocher Microsoft VBScript Regular Expressions 5.5, puis, toujours dans l'éditeur VB6, F2 qui ouvre la boite explorateur d'objet, sélectionner la librairie VBScript_RegExp_55.
De cette boite, toutes les méthodes et propriétés sont définies, avec une petite explication.
Pour une aide plus poussée, charger scr55fr.exe sur le site de http://www.bellamyjc.org/fr/vbsgeneralites.html.

[Micle]

Merci de vos précieux conseils que je vais suivre à la lettre,
et essayer de me dépatouiller avec mon peu de connaissances en vb6.
Je reviendrai pour dire si cela a résolu mon problème.
merci encore et bonne soirée à tous.