Discussion :

[Invité]

Bonjour,

Une suggestion m'a été demandée sur une application qui est utilisée en interne, dans lequel je dois afficher le message : "aujourd'hui, c'est la saint XXXX"

En faisant un tour sur google, je suis tombé à tout hasard sur un projet réalisé en java (dont voici le lien), je me demandais s'il était possible d’exécuter du code JAVA en faisant appel à des procédures qui sont dans le fichier src\epheremis.js

Je pensais voir du coté de JavaExécute ou à JavaExécuteFonction, mais il n'y a pas de public main dans ce fichier...

Le plus simple serait de tout traduire en wlangage? dois-je créer une méthode en wlangage avec du code en java, comme décrit ici ?

Merci

[Lo²]

Bonjour,

Je suis tombé sur cette discussion : https://www.developpez.net/forums/d8...ce-ephemeride/

[djejackk]

Bonjour,

A mon avis, vous pouvez juste récupérer le fichier "src/ephemeris.json" et le lire en WLangage (c'est du JSON).

Autrement, j'ai eu le même besoin il y a quelques années, j'avais fait un fichier à plat violent (après tout, les saints, ça ne change pas tous les 4 matins )
Le format c'est : libelle <TAB> jour (au format MMJJ)
Jour de l'an 0101
Basile 0102
...

Si ça peut aider

[serendib]

Bonsoir romulus,

S'il s'agit simplement d'afficher le Saint du jour, c'est effectivement suffisant, mais très gadget.
Et dans ce cas il me semble qu'un petit fichier de 366 enregistrements...

Par contre c'est très restrictif.
Mes Clients, eux, veulent savoir 'les fêtes à souhaiter ce jour' (à des fins commerciales, bien entendu).
Donc tous les prénoms de tous les pays.
J'y ai passé du temps mais à force de captures par ci par là,
je me suis constitué un fichier d'un peu plus de 50 000 prénoms.
Il suffit de sélectionner la date (MMJJ) pour faire défiler les prénoms concernés.
Avec celà ils font des publipostages et des envois de mails en fonction du prénom de leurs Clients.

Par exemple :
Aujourd'hui, nous fêtons également les Sainte Antonine, Saint Aubin ou Albin, Sainte Charise, Saint David, Sainte Eudoxie, Saint Léon, Saint Sevart, Saint Suibert.
Plus tous les prénoms étrangers

Tout dépends des besoins.

[Invité]

@Lo² : le lien indiqué par Vil Coyote n'existe plus, au départ, je pensais me servir de l'API présent ici, mais ils demandent à ce que l'ip soit fixe, comme le programme est utilisé par divers collègues, ça ne va pas le faire ...

@djejackk : méthode simple, je pensais aussi lire le fichier au format JSON mais je ne comment comment on lit un fichier dans ce format, je vais me renseigner d'ici demain, bien que je pense que ça reste assez trivial

@serendib : je ne suis pas le cas de fêtes à l'étranger, je suis dans une entreprise de 13 salariés seulement

[PhilDeDakar]

Bonsoir
une solution parmi tant d'autre...(si le site change cela peut poser problème, mais fonctionne sans ip fixe)

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
 
x,y est un entier
TempHttp, ligne1, ligne2 est une chaîne
 
IF HTTPRequête("http://fetedujour.fr/") THEN 
	TempHttp = UTF8VersAnsi(HTTPDonneRésultat(httpRésultat))
	IF TempHttp <> "" THEN
		x= Position(TempHttp, "<h2>Fête du ")
		IF x > 0 THEN
			TempHttp = TempHttp[[x A]]
			x = Position(TempHttp, "</section>")
			IF x > 0 THEN
				TempHttp = TempHttp[[1 A x-1]]
				ligne1 = SansEspace(ExtraitChaîne(Remplace(ExtraitChaîne(TempHttp, 1, "</h2>"), "<h2>", ""),2,":"))
				Trace(ligne1)
                  ligne2 = ExtraitChaîne(TempHttp, 2, "<p>Aujourd'hui, nous fêtons également les")
                  ligne2 = SansEspace(ExtraitChaîne(ligne2, 1,"</p>"))
                  IF Droite(ligne2,1)="." THEN ligne2 = ligne2[[1 A Taille(ligne2)-1]]
				Trace(ligne2)
			END
		END
	END
END

pour aujourd'hui :
Aubin
Sainte Antonine, Saint Aubin ou Albin, Sainte Charise, Saint David, Sainte Eudoxie, Saint Léon, Saint Sevart, Saint Suibert

[Invité]

Astucieux comme principe, à vrai dire, j'étais à des années lumières de penser ainsi

EDIT: j'ai un peu retouché ton code, le fait de manipuler des positions ne m'enchante pas tant que ça, j'ai fait la fonction suivante où j'ai à la place parser le code HTML :

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
PROCEDURE FetesASouhaiter()
 
TempHttp est une chaîne
l_fetes est une chaîne=""
l_titreCourant est une chaîne=FEN_MENU..Libellé
ContenuSection est une chaîne=""
l_fete1 est une chaîne
l_fete2 est une chaîne
 
SI HTTPRequête("http://fetedujour.fr/") ALORS 
	TempHttp = UTF8VersAnsi(HTTPDonneRésultat(httpRésultat))
	SI TempHttp<>"" ALORS
		ContenuSection=XMLExtraitChaîne(TempHttp,"section",1,XMLIgnoreLaCasse)
		l_fete1=SansEspace(ExtraitChaîne(XMLExtraitChaîne(ContenuSection,"h2",1,XMLIgnoreLaCasse),2,":"))
		l_fete2=XMLExtraitChaîne(ContenuSection,"p",1,XMLIgnoreLaCasse)[[40 A]]
 
		l_fetes=l_fete1+", "+l_fete2
	FIN
FIN
 
SI l_fetes<>"" ALORS
	TitreSuivant("Fêtes à souhaiter")
	Info("Aujourd'hui, nous fêtons les [%l_fetes%]")
	TitreSuivant(l_titreCourant)
FIN

[jurassic pork]

hello,
en insérant le code fourni en pièce jointe dans le code HTML d'un champ HTML (avec exécution de scripts) on peut se passer d'avoir une connexion internet. Code à ajuster pour la mise en forme et pour les saints à souhaiter.
Voici ce que cela donne dans windev :



Ami calmant, J.P