 | Start a set with this search |
 | Include this search in one of my sets |
 | Exclude this search from one of my sets |
 | Permalink to these results Paste this link in email or IM: |
 | Atom feed for tracking future search results Paste this URL into your reader: |
15 messages in org.openoffice.fr.progRe: [prog] url et acents| From | Sent On | Attachments |
|---|---|---|
| Troumad | Mar 24, 2005 12:49 pm | |
| LE LOUARNE Serge | Mar 24, 2005 2:11 pm | |
| Troumad | Mar 24, 2005 10:00 pm | |
| LE LOUARNE Serge | Mar 24, 2005 10:44 pm | |
| Alain Nowak | Mar 25, 2005 5:49 am | |
| Laurent Godard | Mar 25, 2005 6:19 am | |
| Troumad | Mar 25, 2005 12:05 pm | |
| Troumad | Mar 25, 2005 12:13 pm | |
| Troumad | Mar 25, 2005 11:29 pm | |
| Laurent Godard | Mar 26, 2005 12:50 am | |
| laurux | Mar 28, 2005 11:56 am | |
| Troumad | Mar 29, 2005 6:42 am | |
| Troumad | Mar 29, 2005 7:12 am | |
| Troumad | Mar 29, 2005 7:16 am | |
| Troumad | Mar 29, 2005 7:47 am |
| Permalink for this message Paste this link in email or IM: |
| Permalink for this thread Paste this link in email or IM: |
| Atom feed for this thread Paste this URL into your reader: |
| Subject: | Re: [prog] url et acents | Actions... |
|---|---|---|
| From: | laurux (lau...@freesurf.fr) | |
| Date: | Mar 28, 2005 11:56:24 am | |
| List: | org.openoffice.fr.prog | |
Le Sat, 26 Mar 2005 08:29:33 +0100, Troumad a voulu dire :
Troumad a écrit :
Ou, mais ça marche avec objlancer.execute("http://www.sdv.fr/cgi/orthonet/orthonet?mot=al phab%E9tiser", "", "") mais pas avec objlancer.execute("http://www.sdv.fr/cgi/orthonet/orthonet?mot=al phabétiser", "", "")
Donc, ce serait à moi de faire la transformation dans ma macro...
Un autre exemple avec écouter qui donne une autre réponse : http://www.sdv.fr/cgi/orthonet/orthonet?mot=%C3%A9couter Ceci tombe sur des mots en "cou"...
nb : est-ce que quelqu'un peu tester avec autre chose que firefox sous linux ?
C'est le bouton [Orthonet] de ma feuille http://troumad.free.fr/Linux/verbes.sxc qui devrait donner la définition du verbe congugué
Essai avec Opéra sous Linux: http://www.sdv.fr/cgi/orthonet/orthonet?mot=%C3%A9couter
Réponse : affichage d'une page des mots commençant par "cou" comme cou, couper, ... Mais si tu passes l'url sans mettre l'accent http://www.sdv.fr/cgi/orthonet/orthonet?mot=ecouter tu as la bonne page! Mais si tu passes par le formulaire de recherche du site, l'url est de la forme http://www.sdv.fr/cgi/orthonet/orthonet?mot=%E9couter&x=31&y=8
Je te propose une modification de ta procédure wiki de ta macro :
sub wiki Dim objlancer As Object Dim Verbe As String Dim VerbeConverti As String Dim Lettre As String Dim URL As String Dim i As Long
objlancer = CreateUnoService("com.sun.star.system.SystemShellExecute") Verbe = ThisComponent.Sheets.getByName("Affichage").getCellByPosition(6,0).St ring VerbeConverti = ""
For i = 1 to len(Verbe) Lettre = Mid(Verbe, i, 1)
Select Case Lettre Case "â" VerbeConverti = VerbeConverti + "%E2" Case "à" VerbeConverti = VerbeConverti + "%E0" Case "é" VerbeConverti = VerbeConverti + "%E9" Case "è" VerbeConverti = VerbeConverti + "%E8" Case "ê" VerbeConverti = VerbeConverti + "%EA" Case "ç" VerbeConverti = VerbeConverti + "%E7" Case "î" VerbeConverti = VerbeConverti + "%EE" Case "ï" VerbeConverti = VerbeConverti + "%EF" Case "ù" VerbeConverti = VerbeConverti + "%F9" Case "û" VerbeConverti = VerbeConverti + "%FB" Case "ü" VerbeConverti = VerbeConverti + "%FC" Case Else VerbeConverti = VerbeConverti + Lettre End Select Next URL = "http://www.sdv.fr/cgi/orthonet/orthonet?mot="+VerbeConverti objlancer.execute(URL, "", "") end sub
****
A+
--