bonjour
J'ai un programme HTA dans lequel je voudrais voir un message apparaître dans une fenêtre (OnLoad), puis écouter le contenu de ce message (OnUnLoad).
Hors, il se produit le contraire.
Je me trouve désappointé dans ce cas de figure.
bonjour
J'ai un programme HTA dans lequel je voudrais voir un message apparaître dans une fenêtre (OnLoad), puis écouter le contenu de ce message (OnUnLoad).
Hors, il se produit le contraire.
Je me trouve désappointé dans ce cas de figure.
Windows 10
Microsoft Edge (64 bits)
Google Chrome Version 67.0.3396.99 (Build officiel) (64 bits)
Salut
Et le code, il est ou le code dit donc, une fois
L'endroit, dans la page HTA, ou est écrit la partie VBScript a son importance.
Soyez sympa, pensez -y
Balises[CODE]...[/CODE]
Balises[CODE=NomDuLangage]...[/CODE] quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
Balises[C]...[/C] code intégré dans une phrase.
Balises[C=NomDuLangage]...[/C] code intégré dans une phrase quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
Le bouton en fin de discussion, quand vous avez obtenu l'aide attendue.
......... et pourquoi pas, pour remercier, un pour celui/ceux qui vous ont dépannés.
👉 → → Ma page perso sur DVP ← ← 👈
salut
C' est vrai que j'aurai du mettre le code.
Actuellement je ne suis pas chez moi et je ne parviens pas à accéder à mes données sur Dropbox.
Le PC sur lequel je suis ne m'appartient pas et je ne voudrais pas faire du dégât.
Je pourrai fournir le code la semaine prochaine.
Merci de t'intéresser à ma question.
A bientôt.
Windows 10
Microsoft Edge (64 bits)
Google Chrome Version 67.0.3396.99 (Build officiel) (64 bits)
Finalement j'ai récupéré mon PC plus tôt.
Code html : 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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434 <html><head><title>Dicton du jour</title> <HTA:Application ICON ="" SCROLL= 'no' MAXIMIZEBUTTON= 'no' > </head> <script language='VBScript'> Dim txt 'Self.document.title = "le dicton du " & aujourdhui 'Sub Window_onLoad window.resizeTo 350,150 'Set fs = CreateObject("Scripting.FileSystemObject") 'if Wscript.ScriptFullName <> adresse then 'fs.copyfile Wscript.ScriptFullName,adresse 'end if 'aujourd'hui en texte mois=array("janvier","février","mars","avril","mai","juin","juillet","août","septembre","octobre","novembre","décembre") aujourdhui=day(date) if aujourdhui=1 then aujourdhui="1er" aujourdhui=aujourdhui & " " & mois(month(date)-1) ' msgbox aujourdhui,,month(date) : wscript.quit 'ouverture du fichier en lecture pour récupérer le dicton With CreateObject("Scripting.FileSystemObject") Set fich = .OpenTextFile(document.location.pathname, 1, False) End with 'recherche du début des dictons do while txt<>"'##########" txt=fich.readline loop 'recherche de la ligne correspondant à aujourd'hui d=date cal=(31*(month(d)-1)) + day(d) -1 for num=1 to cal fich.skipline next 'affichage du message lig = mid(fich.readline,2) txt = replace(lig,"#",chr(10)) ' SF ttx = Replace(lig,"#","<br>") fich.Close Set fich = Nothing Window.Onload =GetRef("debut") Window.OnUnload=GetRef("sortie") sub debut 'window_onload document.write ttx Self.document.title = "le dicton du " & aujourdhui End sub Sub sortie 'window_onunload Set Voix = CreateObject("SAPI.Spvoice") Voix.Speak aujourdhui Voix.Speak txt End sub '########## 'S'il pleut la nuit de la nouvelle année,# Le laboureur n'aura guère de denrées# Et l'on aura pas de bon vin# Pour noyer son pauvre chagrin. 'Saint-Clair porte quarantaine 'Sainte Geneviève ne sort point ##si saint Marceau ne la rejoint. 'Le jour de la Saint Odilon #Souvent n'amène rien de bon. 'A la saint Siméon,#La neige et les tisons 'Si le soir des Rois# Beaucoup d'étoiles tu vois,# Auras sécheresse en été# Et beaucoup d'oeufs au poulailler. 'Saint Raymond, Sainte Mélanie.##S'il gèle à la saint Raymond, #L'hiver est encore long. 'Temps de saint Lucien,#Temps de chien.##Au jour de Sainte Gudule,#Le jour croît, mais le froid ne recule. 'Saint Adrien, Sainte Alix, Saint Julien.##Pour Saint Adrien, le froid nous revient. 'Saint Guillaume 'Dans la nuit du 11 au 12, regardez de quel côté le vent souffle :# S'il vient de l'Orient, il y aura mortalité de bestiaux ;# S'il vient du midi, il y aura des malades ;# S'il vient de l'Occident, c'est signe de guerre ;# S'il vient du Septentrion, les champs sont menacés de stérilité.###...moralité, il vaut mieux rester au lit ! ' Sainte tatiana##Les douze premiers jours de janvier# Indiquent le temps qu'iul fera# Les douze mois de l'année. 'Saint Arcade, Saint Hilaire, Sainte Yvette.##Les jours croissent à la Saint Hilaire#De quelques pas de bergère. 'Le soleil pour Saint-Hilarion,#Il faudra force tisons. 'Saint Maur, Saint Rémi.##A la Saint Maur,#Ne t'étonne pas si le vent souffle fort. 'Saint Marcel, Sainte Nina##Soleil de Sainte Nina,#Pour un long hiver rentre ton bois. ' Saint Antoine, Sainte Roseline.##Les jours à la Saint Antoine,#Croissent comme la barbe d'un moine.##Pour la Saint Antoine, #Il fait froid même dans l'huile. 'A Saint Pierre, coq chantant#Est présage de mauvais temps. 'Neige de la Sainte-Prisca#Va apporter une belle année que voilà 'A la Saint Sébastien,#L'hiver s'en va ou revient. 'Jour de Sainte Agnès,#Jamais trop de froid ne laisse. 'A la saint Vincent, #l'hiver se reprend ou perd sa dent.##Pour la Saint-Enérance,#Les jours rallongent d'une aune de gance. 'S'il géle à la Saint-Raymond,#L'hiver est encore plus long.##Saint-Barnard ensoleillé#Rend le vigneron gai. 'Saint François, Saint Priest##Soleil de Saint-Priest,#Abondance de Millet. 'A la saint Paul s'entrebattent les vents;#Celui qui l'emportera dominera l'an. 'Saint-Polycarpe nous écharpe. 'Beau temps à la Saint Julien#Promet abondance de biens. 'Saint-Thomas, Saint-Charlemagne##Saint-Charlemagne,#Février en armes ! 'S'il pleut à la Saint Sulpice,#C'est tous les jours comme vache qui pisse. 'Prends garde à la Sainte Martine,#Car, souvent, l'hiver se mutine !##A la Saint-Hippolite,#Bien souvent l'hiver nous quitte. 'Sainte Marcelle##Compte bien fin janvier#Que tu as mangé la moitié de ton grenier. 'Février trop doux, #Printemps en courroux.##A la Saint-Ignace,#L'eau est de glace. 'Soleil le matin de la chandeleur, quarante jours à la tanière.##A la chandeleur, l'hiver passe ou prend vigueur. 'A partir de la Saint Blaise, #L'hiver redouble ou s'apaise 'Sainte-Véronique, Saint-Isidore##Prenez garde au lendemain# De Saint Blaise, s'il esr serein,# Car cela présage une année# Toute fertile et fortunée. 'A la Sainte Agathe,#Les jours croissent du saut d'une bocatte. 'A la Sainte Dorothée,#La plus forte gelée. 'Saint-Romuald##Il n'est de février si mauvais et si méchant#Qu'il ne nous donne huit jours de printemps. 'A la Sainte Jacqueline,#Froid et bruine.##Eté de la Saint-Jean,#Quelques jours cléments. 'A la Sainte Apolline,# Présage certain,# L'hiver s'achemine# Ou touche à sa fin. 'Bise et grand vent à la Saint-Amand#Font mal au froment. 'Séverin et ses coquins#Font tout geler sur leur chemin. 'Sainte Eulalie avec la pluie,#Quarante jours reste dans ton lit ! 'De Sainte Béatrice la nuée#Assure six semaines mouillées. 'Souvent à la Saint Valentin,#La roue gèle avant le moulin. 'Les cerises, c'est Saint Claude#Qui les baille ou les ôte. 'A la Sainte-Julienne,# Faut toujours que le soleil vienne,# S'il luit un peu, bon pour les bufs,# S'il luit prou, c'est un bon août. 'Saint Alexis##Si février laisse les fossés pleins,#Les greniers seront pleins. 'A la Sainte Bernadette,#Souvent le soleil est de la fête.##A la saint Alexandre,#Finies les cendres. 'A partir de la Saint-Siméon,#Tu peux semer tes melons. 'Souvent à la Sainte Aimée,#La campagne est enneigée.##Taillis pluvieux à la Saint Sylvain#Fait tout l'an incertain. 'A la Saint Pierre Damien,#L'hiver reprend ou s'éteint.##Il est trop tard à la Saint Pépin#Pour planter les arbres à pépin. 'A la Sainte Isabelle,# Si l'aurore est belle,# Et s'il fait soleil au matin,# C'est du bon pour tous les grains. 'A la chaire du bon Saint Pierre,#L'hiver s'en va, s'il ne se resserre.##A la Saint Florent,#Il est bien de semer le froment#Mais sans perdre de temps.##Souvent quand Saint Lazare appelle le froid,#Il n'en reste pas. 'A la saint Mathias, #C'est souvent la fin des glaces. 'Saint Roméo##Février entre tous les mois,#Le plus court et le moins courtois. 'Saint Nestor##Quand février commence en lion,#il finit en mouton. 'A la Sainte Honorine,#Bourgeonne l'aubépine. 'Saint Romain##Soleil le dernier jour de février#Met des fleurs au pommier. 'Saint Auguste##L'année bissextile, soyez fin,#Semez du chanvre au lieu du lin. ' ' 'Mars haleux, #Fait bon marier la fille du laboureux.##S'il pleut à la Saint Aubin,#L'eau sera plus chère que le vin. 'Saint Charles, Saint Jacob. 'A la Sainte Cunégonde,#La terre redevient féconde. 'Souvent à Saint Adrien,#Gelée ne gèle que les mains. 'De Casimir la douceur#Fait peur aux jardiniers et aux laboureurs. 'Au jour de Sainte Colette#Commence à chanter l'alouette. 'De Saint Thomas à la Sainte Mathilde,#Le temps est à la neige souvent.##A la sainte Véronique,#Le soleil à l'hiver fait la nique. 'De Saint-Jean-de-Dieu à Saint-Grégoire,#Vent et giboulées font notre désespoir. 'Semé à la Sainte-Françoise,#Ton grain aura du poids. 'S'il gèle aux Quarante Martyrs,#Il gèlera encore quarante jours. 'Bon rédeux, à Saint-Euloge,#Voit les jeunes lapins à l'auge. 'A la Saint Grégoire,#Tailler sa vigne, c'est de l'or.##A la Saint Marius,#On voit clair à l'Angélus. 'A la Sainte-Euphrasie,#Pointe la fraise. 'Pluie de Sainte-Mathilde#N'est jamais trop. 'Sait Zacharie##A mi-mars,#Le coucou est dans l'épinard. 'Sainte Bénédicte 'Saint Patrice, Saint Patrick, Sainte Gertrude##Dème tes pois à la Saint Patrick,#Tu en auras à ton caprice. 'A Saint Narcisse les mouches,#Aux pêcheurs les touches. 'Le chaud à la Saint Joseph,#L'été sera bref. ' 'Une hirondelle ne fait pas le printemps. 'Sainte Léa##Fleur marsière#Ne tient guère. 'S'il pleut le jour de Saint Victorien,#Tu peux sûrement compter sur du bon foin. 'Sainte Catherine, Saint Gabriel 'Annonciation mouillée,#Crains les giboulées ! 'Neige en mars#vaut blé en sac. 'Mars venteux,#Vergers pommeux. 'A Saint Gontran, si la température est belle,#Arrivent les premières hirondelles. 'Quand mars bien mouillé sera,#Beaucoup de fruits cueilleras. 'Souvent, la Saint Amédée#Est de mars la plus belle journée. 'A la Saint Benjamin,#Le mauvais temps prend fin. 'Le premier avril, #On fait courir les sots. 'Sainte Sandrine. 'Saint Richard. 'En avril,#Ne te découvre pas d'un fil ! 'Sainte Irène 'Au jour de la Sainte Prudence,#S'il pleut, s'il vente,#Peu après le mouton danse. 'Au sept d'avril, aporès le coucou,#C'est le rossignol qui chante. 'Sainte Julie. 'A la sainte Marie, #Toutes les aubépines sont fleuries. 'Quand arrive la Saint Fulbert,#Dans la campagne tout est vert. 'S'il gèle à la Saint Stanislas,#On aura deux jours de glace. 'A la Saint Jules, mauvais temps #N'est pas installé pour longtemps. 'A la Sainte Clémence,#Les moutons prennent du ton. 'Saint Valérien, Saint Maxime.##Bourgeons de Saint Valérien,#Le fruit n'est pas loin. ' 'Gelée de Saint Fructueux#Rend le vigneron malheureux. 'Beau temps à la Saint Anicet#Est l'annonce d'un bel été. 'Saint Parfait 'Sainte Emma. 'Sainte Odette. 'Tel temps à la Saint Anselme,#Tel temps pendant une semaine. 'Saint Alexandre, Sainte Opportune##Pluie le jour de Sainte Opportune,#Ni cerises, ni prunes. 'Quand il pleut le jour de Saint Georges,#Sur cent cerises, on en a quatorze. 'A la saint Gaston,#Trie la semence, enlève le bourgeon. 'Quand Saint Marc n'est pas beau, #Pas de fruits à noyau. 'Saint Clet#Ferme la porte aux derniers pois. ' 'Sainte Valérie. 'Avril a trente jours.# Si trente et un il avait,# Personne ne s'en plaindrait. 'La pluie le jour de Saint Robert, #De bon vin remplira ton verre. ' 'A la veille de Saint Jacques# Si tu as le soleil de Pâques,# Compte que, pour la moisson, # Le blé sera dru et bon. 'En Mai, #Fait ce qui te plaît. 'Qui n'a pas semé à la sainte Croix, #Au lieu d'un grain en mettra trois. 'Regarde bien, si tu me crois,#Le lendemain de Sainte Croix#Si nous avons le temps serein.##Car on dit, comme un fait certain,#Que quand cela vient, Dieu nous donne#L'année premièrement bonne. 'Le temps de Sainte Judith #Va durer jusqu'au dix. 'S'il fait beau à la petite Saint Jean, #Année fructueuse en froment. 'A la sainte Gisèle, #Prends garde s'il gèle. 'A sainte Félicie, #Tous les lilas sont fleuris. 'Rosée de mai,#Fait tout beau ou tout laid. 'Sainte Solange 'Gare qu'il ne gèle#A la saint Estelle. ' 'A la Saint servais, #Sème ton chanvre, ou bien ne le sème jamais. 'En plantant tes fèves à la Saint Boniface, #Tu auras la bonne place. 'A la Sainte Denise #S'arrête la bise. 'A la Saint Honoré,# S'il fait gelée,# Le vin diminue de moitié. 'S'il tonne au jour de Saint Pascal, #Sans grèle, ce n'est pas un mal. 'Soleil à la Saint Eric #Promet du vin plein les barriques.##Bon fermier, à Sainte Juliette,#Doit vendre ses poulettes.##A la saint Félix,#Tous les lilas sont fleuris. 'A la Saint-Yves,#Le beau temps#Ote au laboureur ses dents. 'S'il pleut à la Saint Bernardin,#Tu peux dire adieu à ton vin. 'Si elle gèle, Sainte Quitère#Emporte tout dans sa devantière. 'Beau temps de Saint Emile#Donne du fruit à la folie. 'A la saint Didier, soleil orgueilleux#Nous annonce un été joyeux. 'Après Sainte Angèle, #Le jardinier ne craint plus le gel. 'Soleil à la Saint Urbain #Présage une année de vin. 'Quand il pleut à la Saint-Philippe,#Le pauvre n'a pas besoin du riche. 'A la Saint-Hildevert,#Est mort tout arbre qui n'est pas vert. 'A la Saint Cyrille,#Une fleur blanche pour mille.##Tant que mai n'est pas au vingt-huit,#L'hiver n'est pas tout à fait cuit. 'A Saint Gérard,#La récolte ets encore au hasard. 'Lorsque mai est trop jardinier,#Cela ne remplit pas le grenier. 'S'il pleut à Saint Pétronille, # Les raisins deviennent grappilles# Ou tombent en guenilles. 'Au mois de juin, quand les ânes secouent l'oreille,#C'est signe qu'il pleuvra à merveille. 'Le feu de Saint-Elme allant aux mâts,#Indique le vent grands ébats. 'A Sainte Clotilde, de fleur en buisson,#Abeille butine à foison. 'A Sainte Enna,#Tes fourrages en bas. 'Saint Igor##Prépare autant de tonneaux#Qu'en juin tu compteras de beaux jours. 'Saint Norbert, Saint Claude##La Saint Claude#Baille les cerises ou les ôte. 'Saint Gilbert. 'S'il pleut à la Saint Médard, #C'est du beau temps pour les canards. 'A Saint Félicien,#Mouche à miel n'a plus de bien. 'A la saint Landry, s'il tonne,#Restera vide la tonne. 'A la Saint Barnabé, #Les jours croissent d'un saut de baudet. 'Qui nait à la Saint Basilide#Ne sera jamais invalide. 'A la Saint Antoine de Padoue,#Toujours du temps doux. 'A Saint Rufin,#Cerises à plein jardin. 'Aujourd'hui, Saint Bernard, Saint Guy, Saint Modeste et Sainte Germaine.##Pluie de Saint Guy,#C'est tout l'an qui rit. 'Si le jour de la Saint Fargeau# La lune se fait dans l'eau,# Le reste du mois est beau. 'Soleil à la Saint Hervé #Fait présager d'un bel été. 'Pluie de la Saint Florentin #Dure jusqu'au lendemain. 'Quand il pleut à la Saint Gervais,#Il pleut quarante jours après. 'Pluie d'orage à la Saint Sylvère, #C'est beaucoup de vin dans le verre. 'Qui dit du mal de l'été, #Du Bon Dieu sera rejeté. 'Saint Alban##Qui pêche en juin,#Pêche fretin. 'Sainte Aure 'La nuit de la Saint Jean #Est la plus courte de l'an. 'S'il fait beau à la Saint Guillaume,#Auras du blé plus que de chaume. 'Saint Anthelme 'Saint Fernand##S'il pleut en juin,#Le jardinier ronge son poing. 'Le jour de la Saint Irénée, #C'est l'un des plus beaux de l'année.##Au jour de Saint Germain,#Travaille tôt ou tard. 'Saint Pierre et Saint Paul, #pluvieux,#Est pour trente jours dangereux. 'Saint Martial, Saint Thibault##Lorsqu'en juin on voit sa fin, #Saint Martial souvent lave le chemin. ' 31 06 (n'existe pas) 'A la saint Thierry,#Aux champs, jour et nuit. 'S'il pleut à la Visitation, #Pluie à discrétion. 'Saint Thomas, Saint Anatole##Saint Anatole ensoleillé#De blé emplit le grenier. 'Saint Florent, Sainte Berthe 'Saint Antoine, Sainte Zoé 'A Sainte Colombe,#Le ramier quitte sa colombe. 'Quand à Saint Raoul, le soleil brille,#C'est le moissonneur qui grille 'Saint Thibaut, Sainte Virginie, Saint Edgard##A la Saint Thibaut,#Ne t'étonne pas si le temps est chaud. 'Sainte Amandine, #Arrive la canicule. 'Saint Ulrich#Pluie du dix juillet,#Mouille sept fois,#Du moissonneur le bonnet 'Saint Benoît,#Rosée du jour de Saint-Savin,#Est, dit-on, rosée de vin. 'Saint Olivier.#Juillet, orage de nuit,#Peu de mal, mais que de bruit ! 'Saint Henri, Saint Joël, Saint Hippolyte, Saint Eugène##C'est vers la Saint Hippolyte#Que le raisin change plus vite. 'Pluie du matin,#En juillet est bonne au vin. 'Saint Donald,#Juillet sans orage,#Famine au village 'Notre Dame Mont Carmel,#Qui veut bon navet,#Le sème en juillet. 'Sainte Charlottes,#À Saint-Alexis,#Foin occis. 'Saint Frédéric,#En juillet, mois d'abondance,#Le pauvre a toujours sa pitance. 'À la Saint-Arsène,#Met au sec tes graines. 'A la Sainte Marguerite,#Forte pluie est maudite. 'Quand il pleut le jour de Saint Victor,#La récolte n'est pas d'or. 'S'il pleut à la Sainte Madeleine, #Il pleut durant six semaines. 'Nuages de la Sainte Brigitte, #Par le soleil sont chassés vite. 'A la Sainte Christine,#Coupe le blé, plie l'échine. 'Si Saint Jacques est serein,#L'hiver sera dur et chagrin. 'S'il pleut pour la Sainte Anne, #Il pleut un mois et une semane. 'A la Sainte Nathalie,#Temps joli. 'Si le jour de Saint-Samson,#Le pinson est au buisson,#Tu peux, bon vigneron,#Défoncer ton poinçon. 'Mauvais temps le jour de Sainte Marthe n'est rien, #Car il faut qu'il parte. 'A la Sainte-Juliette, #L'été est en fête. 'Au jour de Saint-Ignace, moissone quelque temps qu'il fasse. 'Qui se marie le 1er août, #La corde il se met au cou. 'Saint Julien brise glace ;#s'il ne la brise,#il l'embrasse.#Si le jour de saint Julien est trouble,#il met le vin au double. 'Sainte Lydie.#Quiconque en août s'endormira.#En janvier s'en repentira. 'St-Jean Marie Vianney#Quand août est bon,#Abondance à la maison. 'A la saint-Abel,#Faites vos confitures de mirabelles. 'Au mois d'août,#Le vent, est fou. 'Le mois d'août est toujours chaud,#Quand le premier de l'An est beau. 'A la Saint Dominique#Te plains pas si le soleil pique. 'Saint Amour##Mois d'Août pluvieux,#Rend le cep vineux. 'L'alouette à la Saint Laurent,# Pour voyager se met en rang.# L'hirondelle, à la Saint Matthieu,# Se prépare à nous dire adieu. 'Toujours pour la Sainte Claire,#Journée chaude et claire. 'S'il pleut à la Sainte Clarisse,#C'est souvent comme vache qui pisse. 'S'il pleut le jour de Sainte Radegonde,#Misère abonde sur le monde. 'A la Saint Evrard,#Temps trop beau en août,"Annonce hiver en courroux. 'Pluie à l'Assomption,#Huit jours de mouillon. 'Saint Armel#Après Saint-Roch,#Aiguise ton soc ! 'Quand août est bon,#Abondance à la maison. 'A la Sainte Hélène,# La noix est pleine,# Et le cerneau# Se met à l'eau. 'Saint Jean-Eudes,#Quand août est pluvieux,#Septembre est radieux. 'Pluie de la Saint Bernard#Fait déborder la marre. 'Pluie violente à la Saint Christophe#Peut mener à la catastrophe. 'Pluie à la Saint Fabrice#Ne rend pas le paysan riche. 'A la Sainte Rose,#Pour le travailleur, pas de pause. 'A la Saint Barthélémy,#La grenouille sort de son nid. 'Si la lune de Saint Louis#Se fait en beau, sois réjoui. 'Sainte Natacha,#Soleil rouge en août,#C'est de la pluie partout. 'A la Sainte Monique,#Ne te plains pas si le soleil pique. 'A la Saint Augustin,#Les orages sont proches de leur fin. 'Pluie à la Sainte Sabine#Est une grâce divine. 'A la Saint Fiacre, soleil ardent,#Pour huit jours encore, du beau temps. 'Saint Paulin##Temps trop beau en août,#Annonce un hiver en courroux. 'S'il fait beau à la Saint Gilles,#Cela durera jusqu'à la Saint Michel.##Saint Gilles et Saint Leu#Guérissent de la peu. 'Orages de septembre,#Neiges de décembre. 'Pluie du jour de Saint Grégoire,#Autant de vin de plus à boire. 'Sainte Rosalie##Septembre se nomme#Le mai de l'Automne. 'En septembre,#Le fainéant peut aller se pendre. 'Saint Bertrand,#À la Saint-Onésiphore,#La sève s'endort. 'A la Sainte Reine,#Sème tes graines. 'Le temps de la Nativité#Dure tout un mois sans variété. 'Saint Alain,#Septembre emporte les ponts,#Ou tarit les fontaines. 'A la Saint Inès,#Travaille sans cesse ! 'Tu peux semer sans crainte,#Quand arrive la Saint Hyacinthe. 'A la Saint Aubierge#Vole le fil de la Vierge. 'Saint Aimé##Septembre humide,#Pas de tonneaux vides. 'A la Sainte Croix, #Cueille tes pommes et gaule tes noix. 'La rosée de Saint Albin#Est dit-on, rosée de vin. 'Sainte Edith##Orages en septembre,#Noël en Décembre. 'La pluie au jour de Saint Lambert,#Il y en a pour un novenaire. 'Froid de la Saint Nadège#Annonce pour bientôt la neige. 'Qui sème à la Saint Janvier,#De l'an récolte le premier. 'Gelée blanche pour Saint-Eustache#Grossit le raisin qui tache. 'Automne en fleurs,#Hiver plein de rigueurs.##Quand vient Saint Matthieu,#L'été, adieu. 'Séme des pois à la Saint Maurice,#Tu en auras à ton caprice ! 'A la saint Lin,#Fait rouir le lin. 'A la Saint Gérard, les noix#Sont mûres pour toi et pour moi. 'A la Saint Firmin,#L'hiver est en chemin. 'A Sainte Justine, #Toute fleur s'incline. 'Priez Saint Côme et Saint Damien,#Vous vous porterez toujours bien ! 'Forte chaleur en septembre,#A pluie d'octobre, il faut s'attendre. 'A la Saint Michel,# Regarde le ciel.# Si l'ange se baigne l'aile,# Il pleut jusqu'à Noël. 'Saint Jerôme ' 31 09 (n'existe pas) 'A la Saint Rémy,#La grande chaleur, fini. 'Octobre à moitié pluvieux# Rend le laboureur joyeux,# Mais le vendangeur soucieux# Met de côté son vin vieux. 'Saint Gérard##Si octobre est trop chaud,#En février, la glace est au carreau. 'A la Saint François,#Vient le premier froid. 'A la Saint Placide,#Le verger est vide.##Quand arrive la Sainte Fleur,#Pour aller au verger, ce n'est plus l'heure. 'A la Saint Bruno,#Les feuilles tombent dans le bô. 'A la Saint Serge,#Achète des habits de serge. 'En octobre qui ne fume rien,#Ne récolte rien.### les autres un cancer du poumon 'S'il fait beau à la Saint Denis,#L'hiver sera bientôt fini. 'Saint Ghislain 'Si la Saint Gomer arrive par temps sec,#L'hiver sera humide dès le début. 'A la Saint Bertrand,#Double tes vêtements. 'Souvent à la Saint Géraud,#Nous arrive trois jours de beau. ' 'Il faut qu'à la Sainte Eugénie,#Toute semaille soit finie.##Souvent Sainte Thérèse nous apporte un petit été,#Mais surtout, jardinier, ne va pas te déshabiller. 'Sainte Edwige, Saint Gall.##Le vin de Saint Gall#N'est jamais un régal. 'A Saint Auneuil,#Cueille les querneuilles. 'A la Saint Luc, la pluie du vallon#Fait de la neige sur le mont. 'A la Saint René,#Couvre ton nez ! 'Sainte Adeline 'Sainte Céline, Saint Ursule##A la Saint Ursule, #Le froid recule. 'Au jour des Saintes Maries,#Laboure avec énergie. 'A la Saint Hyacinthe,#On peut semer sans crainte. 'A la Saint Raphaël,#La chaleur monte au ciel.##Souvent, à la Saint Florentin,#L'hiver lisse le chemin. 'Pour la Saint Pépin,#Sort donc ton pépin ! 'A la Saint Amand,#Sont mûrs les glands.##A Saint Evariste,#Jour de pluie, jour triste. 'A la Saint Dimitri,#Le froid est bien pris.##A la Sainte Antoinette,#La neige s'apprête. 'A la Sainte Simone,#Il faut avoir rentré ses pommes. 'Octobre au coin du feu,#Fait venir le leu. 'Si octobre s'emplit de vents,#Du froid tu pâtiras longtemps. 'A la Saint Quentin,#La chaleur a sa fin.##Après la Saint Urbain,#Ce qui reste de la vigne ne vaut rien. 'Autant d'heures de soleil à la Toussaint,#Autant de semaines à souffler dans tes mains. 'Quelque temps qu'il fasse en novembre,#Commence le feu dans ta chambre ! 'A la Saint Hubert, #Les oies sauvages fuient l'hiver. 'A la Saint Charles,#Souvent, l'hiver parle. 'Sainte Sylvie, Saint Ernest##A la Saint Ernest,#Abats les pommes qui te restent. 'Quand en novembre tu entends la grive chanter,#Rentre à la maison pour t'abriter#Et du bois pour te chauffer. 'Novembre chaud au début,#Froid à la fin. 'Il pleut au saint Jour des Reliques,# Et vente à décorner les biques;# Mais, souvent, le grand Saint Martin,# Pour trois jours, sèche le chemin. 'A la Saint Mathurin, #Des fruits rouges c'est la fin. 'A la Saint Léon,#Mets tes artichauts en monts. 'Il y a plus d'un âne qui s'appelle Martin.###Si le vent du sud souffle pour la Saint Martin,#L'hiver ne sera pas coquin. 'Saint Christian, saint Emilien 'Saint Brice 'A Saint Philomène,#Misère dans les garennes. 'A la Saint Albert,#Reste bien couvert ! 'Sainte Marguerite 'A la mi-novembre passée, #Il peut venter et neiger à souhait. 'Journée de Sainte Aude,#Ordinairement n'est pas chaude. 'Sainte Elisabeth nous montre#Quel bonhomme l'hiver sera. 'A la Saint Edmond,#Le temps n'est pas bon.##A la Saint Tanguy,#Jamais vent ne languit. 'Saint Félix et la Présentation#Amènent le froid pour de bon. 'Pour la Sainte Cécile,#Chaque fève en fait mille. 'Quand l'hiver vient doucement,#Il est là à la Saint Clément. 'Sainte Flora, Sainte Flore##A la Sainte Flora,#Plus rien ne fleurira 'Sainte Catherine,# Toute fille veut la fêter,# Mais point ne veut la coiffer. 'A Sainte Delphine, #Mets ton manteau à pèlerine ! 'Si elle n'est pas là à la Saint Séverin,#La neige n'est pas loin. 'S'il neige à la Saint Hilaire,#Il fera froid tout l'hiver. 'Soleil fin novembre, #Noël en décembre. 'Neige de Saint André,#Peut cent jours durer. ' 31 11 (n'existe pas) 'Sainte Florence, Saint Eloi##Lorsque Saint Eloi# A bien froid,# Quatre mois dure le plus grand froid. 'Sainte Viviane##Décembre trop beau,#Eté dans l'eau. 'Saint François Xavier 'A la Sainte Barbe,#Le soleil peu darde. 'Saint Gérald,#Si décembre et janvier ne font leur chemin,#Février fait le lutin. 'Le jour de Saint Nicolas,#De décembre est le moins froid. 'A la Saint Ambroise,#Du froid pour huit jours. 'Notre Dame de l'Avent,# Pluie et vent;# Tire ton bonnet jusqu'aux dents 'De Sainte Léocardie à Sainte Nicaise, #Les gelées naissent 'A Sainte Julie,#Le soleil ne quitte pas son lit. 'Tel temps à la Saint Daniel,#Même temps à Noël. 'A Saint Constance,#Plein hiver en France. 'Sainte Luce, Sainte Lucie, Sainte Odile##A la Sainte Luce, #Le jour croît du saut d'une puce. 'S'il neige à la Saint Florian,#Les récoltes seront en excédent. 'Quand il tonne hors saison,#Pluie ou neige sans raison. 'Quand il pleut à la Sainte Alice,#C'est souvent comme une vache qui pisse. 'Saint Gaêl,#Quand secs sont les Avents,#Abondant sera l'an. 'À la Saint-Gatien,#Le temps ne vaut rien. 'Saint Urbain,#En décembre, fais du bois,#Et endors-toi. 'Au vingt de Noël,#Les jours rallongent d'un pas d'hirondelle. 'Saint Thomas##Soleil d'hiver, amour de paillarde,#Tard vient et peu darde. 'Décembre prend,#Il ne rend. 'A Sainte Evariste,#Jour de pluie, jour triste. 'Entre Sainte Adèle et Saint Vincent,#Les gelées ont plus de mordant. 'Noël au balcon, Pâques aux tisons.##A la Noël ciel laiteux, # à la Saint Jean ciel orageux. 'A la Saint Etienne,#Les jours croissent#D'une aiguillée de laine. 'A la Saint Jean,#Se renouvelle l'an. 'S'il neige à la Sainte Eléonore,#Les récoltes seront d'or. 'Saint David,#À la Saint Thomas,#Les jours sont au plus bas. 'Saint Roger,#Quand il tonne hors saison,#Pluie et neige sans raison. 'Chaque Saint-Sylvestre sonnée,#Nous fait plus vieux d'une année. </script>
Windows 10
Microsoft Edge (64 bits)
Google Chrome Version 67.0.3396.99 (Build officiel) (64 bits)
Re
Ta ligne 45, essais simplement debut() plutôt que Window.Onload = GetRef("debut"), chez moi c'est la solution.
De plus, mets toutes la partie VBScript entre les balise <body> </body>, car document n'existe pas si tu n'as pas ces balises.
Soyez sympa, pensez -y
Balises[CODE]...[/CODE]
Balises[CODE=NomDuLangage]...[/CODE] quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
Balises[C]...[/C] code intégré dans une phrase.
Balises[C=NomDuLangage]...[/C] code intégré dans une phrase quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
Le bouton en fin de discussion, quand vous avez obtenu l'aide attendue.
......... et pourquoi pas, pour remercier, un pour celui/ceux qui vous ont dépannés.
👉 → → Ma page perso sur DVP ← ← 👈
Re
Au fait, pour aujourdhui, tu peux faire plus simple aujourdhui=FormatDateTime(date,vbLongDate) pour avoir la lecture de mardi 7 Aout 2018
Soyez sympa, pensez -y
Balises[CODE]...[/CODE]
Balises[CODE=NomDuLangage]...[/CODE] quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
Balises[C]...[/C] code intégré dans une phrase.
Balises[C=NomDuLangage]...[/C] code intégré dans une phrase quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
Le bouton en fin de discussion, quand vous avez obtenu l'aide attendue.
......... et pourquoi pas, pour remercier, un pour celui/ceux qui vous ont dépannés.
👉 → → Ma page perso sur DVP ← ← 👈
Je te remercie pour ces informations.
Windows 10
Microsoft Edge (64 bits)
Google Chrome Version 67.0.3396.99 (Build officiel) (64 bits)
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager