Discussion :

[Bidulbuk]

Bonjour à tous,

Je reviens vers vous car j'essaye de régler un script dans un logiciel et, malgré des recherches sur le net, je n'arrive pas à rédiger correctement ma phrase de script.

Il s'agit d'une recherche de caractère toute bête et je voudrais activer la casse mais je n'arrive pas à comprendre la syntaxe à utiliser.

La syntaxe est la suivante :

Code :

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

Function find(what As String, Optional caseSensitive As Variant) Boolean

J'ai essayé

Code :

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

application.activeWindow.title.find("montexte", caseSensitive = true)

Ou

Code :

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

application.activeWindow.title.find("montexte", true)

Mais ça me renvoie une erreur...

Quelqu'un.e pour m'éclairer ?

Merci !

[ProgElecT]

Salut

La fonction n'est pas en langage VBScript puisque les variables sont typées.

[Bidulbuk]

Merci de la réponse !

Je ne comprends pas, la fonction fonctionne parfaitement si je me contente de chercher juste du texte (toutes les fonctions que j'utilise avec ce logiciel ont une grammaire similaire et la plupart fonctionnent).

Code :

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

application.activeWindow.title.find("mon texte")

Ca ça fonctionne très bien. Ca concernerait seulement les options ?

PS : je précise que ce n'est pas moi qui ai rédigé la fonction, elle est inscrite par défaut dans le logiciel.

[ProgElecT]

Re

Function find(what As String, Optional caseSensitive As Variant) Boolean, c'est bizarre,
Function find(what As String, Optional caseSensitive As Variant) As Boolean je m'attendrait plutôt avec le typage de la fonction, donc As.

caseSensitive étant un variant, il faudrait connaitre comment et traité ce variant dans la fonction pour savoir quoi lui proposer pour qu'il l’interprète correctement pour rendre la recherche sensitive au minuscule/majuscule.
As tu le code de la fonction à nous mettre ?

[Bidulbuk]

Je vais essayer de le trouver mais je ne promets rien... C'est un vieux logiciel dont la doc' n'est plus mise à jour. Tu penses que je peux trouver le code de la fonction dans les fichiers installés avec le programme ?

[ProgElecT]

Salut

Tu penses que je peux trouver le code de la fonction dans les fichiers installés avec le programme ?

Quelle est le logiciel désigné par la variable application, quel nom du logiciel correspond à application ?
Si c'est du VBA il sera peut être possible de trouver le code de la fonction.
Personnellement j'ai fait des recherche avec Google mais pas trouvez avec les mots find(what As String, Optional caseSensitive As Variant)

[ProgElecT]

J'ai trouvé application.activeWindow.title.find("mon texte"),true, mais cela me parait bizarre comme syntaxe.

[Bidulbuk]

Effectivement, je viens de tester et la syntaxe marche !

Où est-ce que tu as pu trouver la référence ? Le logiciel s'appelle WinIBW, c'est un logiciel de bibliothèque et il fonctionne avec du VBS (et je suis preneur de toute source d'information dessus).

Merci beaucoup !

[ProgElecT]

Re

....
Où est-ce que tu as pu trouver la référence ?

J'ai entre autre taper "activeWindow.title.find(" dans le moteur de recheche Google, puis sur chaque pages/liens, avec Ctrl+F, recherche das la page ces mêmes mots.
La page est: http://documentation.abes.fr/sudoc/m..._installer.txt

....
Le logiciel s'appelle WinIBW, c'est un logiciel de bibliothèque et il fonctionne avec du VBS (et je suis preneur de toute source d'information dessus)

Justement dans la même recherche, il y a plusieurs liens sur le sujet WinIBW.

Effectivement, je viens de tester et la syntaxe marche !

là est bien l’essentiel.

[Bidulbuk]

Alors, je viens de constater que si j'écris :

Code :

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

application.activeWindow.title.find("montexte", true)

Ca me renvoie bien l'erreur suivante : "L'appel d'une fonction Sub n'admet pas de parenthèses".

Mais si je place tout ça dans une variable :

Code :

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

cherche = application.activeWindow.title.find("montexte", true)

Ca fonctionne parfaitement...

[omen999]

J'ai trouvé application.activeWindow.title.find("mon texte"),true, mais cela me parait bizarre comme syntaxe.

bonsoir,

juste une subtilité du VBS très largement méconnue
dans ce cas précis, le premier argument (la chaine) est passé par valeur et le second par références

les explications du père du VBS 5.5, Eric Lippert

PS : une doc sur les scripts