OVH Cloud OVH Cloud

Interdir 2 lancement du même objet ???

27 réponses
Avatar
LE TROLL
Bonjour,

Heu, j'ai fait un truc mais c'est pas heureux, je voudrais que quand je
lance la calculatrice, on ne puisse si elle n'est pas fermée, la relancer
une seconde fois...

If calc.exe.PrevInstance Then Exit Sub

Ça marche pas !!!

Certes, je pourrais prendre le handle, ensuite lire tous les handles, et
si existes déjà, refuser le lancement mais y a peut être plus court, on
déclarer en tant qu'objet, mais là, je ne suis vraiement pas bon...

Une idée ???

Merci, au revoir et à bientôt.
--
ng75 arobase noos.fr
------------------------------------------------------------
LE TROLL, éleveur de trolls depuis César, qui disait :
Avec une hache, celui qui tient le manche a toujours raison !

10 réponses

1 2 3
Avatar
LE TROLL
Ah, merci Guy, merci bien, enfin une réponse exploitable et en français :o)
----

"Guy DETIENNE" a écrit dans le message de news:
OMkTHHA%
Salut ;O)

Vois la source postée ici - conçue par mes soins ;O)
DÉTECTION D'UNE INSTANCE - RESTAURATION DE L'ANCIENNE INSTANCE
http://www.vbfrance.com/code.aspx?ID44

Ou fais un copier-coller du code ci-dessous ;

'A COLLER DANS UN MODULE
'
'DECLARATION API
Declare Function OpenIcon Lib "user32" (ByVal hwnd As Long) As Long
Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal
lpClassName As String, ByVal lpWindowName As String) As Long
Declare Function GetWindow Lib "user32" (ByVal hwnd As Long, ByVal wCmd As
Long) As Long
Declare Function SetForegroundWindow Lib "user32" (ByVal hwnd As Long) As
Long

'DECLARATION CONSTANTE
Public Const GW_HWNDPREV = 3

Sub ActivatePrevInstance()

Dim OldTitle As String
Dim PrevHndl As Long
Dim result As Long

'Sauve le titre de l'applciation.
OldTitle = App.Title

'Renomme le titre de l'application, ainsi FindWindow
'ne trouvera pas l'instance de cette application.
App.Title = "unwanted instance"

'Tentative d'obtention du handle de la fenêtre utilisant le nom de
classe de VB4.
PrevHndl = FindWindow("ThunderRTMain", OldTitle)

'Vérification si le handle a été trouvé
If PrevHndl = 0 Then
'Tentative d'obtention du handle de la fenêtre utilisant le nom
de classe de VB5.
PrevHndl = FindWindow("ThunderRT5Main", OldTitle)
End If

'Vérification si le handle a été trouvé
If PrevHndl = 0 Then
'Tentative d'obtention du handle de la fenêtre utilisant le nom de
classe de VB6.
PrevHndl = FindWindow("ThunderRT6Main", OldTitle)
End If

'Vérification si le handle a été trouvé
If PrevHndl = 0 Then
'Aucune instance précédente trouvée.
Exit Sub
End If

'Obtention du handle de la fenêtre précédente.
PrevHndl = GetWindow(PrevHndl, GW_HWNDPREV)

'Restaure le programme.
result = OpenIcon(PrevHndl)

'Active l'application.
result = SetForegroundWindow(PrevHndl)

'Termine l'application.
End
End Sub



"LE TROLL" <le a écrit dans le message de news:


Bonjour,

Heu, j'ai fait un truc mais c'est pas heureux, je voudrais que quand
je lance la calculatrice, on ne puisse si elle n'est pas fermée, la
relancer une seconde fois...

If calc.exe.PrevInstance Then Exit Sub

Ça marche pas !!!

Certes, je pourrais prendre le handle, ensuite lire tous les handles,
et si existes déjà, refuser le lancement mais y a peut être plus court,
on déclarer en tant qu'objet, mais là, je ne suis vraiement pas bon...

Une idée ???

Merci, au revoir et à bientôt.
--
ng75 arobase noos.fr
------------------------------------------------------------
LE TROLL, éleveur de trolls depuis César, qui disait :
Avec une hache, celui qui tient le manche a toujours raison !







Avatar
Patrick Philippot
L'erreur majeure serait de répondre sur le même ton à cette logorrhée
sans intérêt.

Donc <zip>, <couic>, <snip>,... l'encombrant malotru est désormais
filtré. Il peut éructer et postillonner à l'envi des flots pathologiques
d'injures, je ne le vois plus.

Oubliez moi rapidement, mon pauvre ami.

Avec toute ma compassion.

--
Patrick Philippot - Microsoft MVP
MainSoft Consulting Services
www.mainsoft.fr
Avatar
dark poulpo
- la ferme!!!!!!!

Quand je te lis et que je vois ce que tu fais, t'es loin de faire ce que tu
dit être.

et j'ai noté ceci "Alors j'aime pas du tout les cons comme toi qui se
foutent de ma gueule", sache que le respect marche dans les 2 sens, et ayant
une certain rancune dans ma nature, je vais aprés avoir attendu
tranquillement mon heure te renvoyé l'ascenseur en jouant avec ton propre
jeu (cité les autres pour pretendre).

Le problême avec toi ce que parceque tu crois être intelligent, je cite:

"Je ne saurais te dire, je fais juste de la programmation indépendante en
logiciel individuel, généralement ludique, et de formation quasi
autodidacte... Alors je ne me sers par de choses de ce genre avec plusieurs
développeurs, projets et autres, désolé :o)"

alors que je vois à quel point tu es un âne ( juste en programmation ?) vu
les messages que tu postes. Ton manque de logique me donne à la fois de
l'intrigue et du suspense sur ce qui est loin d'être un postulat : "savoir
si tu es vraiment doué d'intelligence"

Dailleurs, tu n'es même pas capable de lire un code vb dans une page en
anglais (langage pourtant unniversel)

"Je n'ai pas identifié la langue, je ne sais pas ce que c'est je ne
comprends que le grec ancien et le latin, et puis un peu le français, et ici
on est dans un forum français, en français, donc on communique et on ne lit
que du français, mais surtout pas de l'anglais"

ciao,
Avatar
scraper
Bonjour dark poulpo
(dans news:41e4f545$0$7107$)
tu nous disais :

En fait c'est ca qui manque, un programme pour que toi tu la fermes.
lol

de plus, Patrick Philippot à raison dans ses réponses. Comprend déjà
de quoi tu parles avant de l'ouvrir.



ça n'a jamais été aussi vrai :


"Don't feed LE TROLL"

:-)

si personne ne lui répond ou l'ignore superbement, il y a des chances que ce
triste individu aille sévir ailleurs et ne pourisse pas la qualité de ce
forum, par ailleurs excellent ... (cci dit sans aucun esprit partisan ou
opportuniste : je fréquente plus ou moins assidûment 14 forums, et je dois
dire que l'ambiance de celui ci, à quelques rares dérapages près - suivez
mon regard - est *unique* )


--

Attention ! Adresse mail invalide ...
Pour me contacter, cliquez sur le lien ci-dessous:
http://scraper.chez.tiscali.fr/contact.htm

scraper
Avatar
dark poulpo
En fait c'est ca qui manque, un programme pour que toi tu la fermes. lol

de plus, Patrick Philippot à raison dans ses réponses. Comprend déjà de quoi
tu parles avant de l'ouvrir.

--
-----
http://dark.freezee.org/
Avatar
Pierre Alexis
LE TROLL a écrit :

C'est quoi des mesures plus définitives ???



Ho je ne sais pas moi... Porter plainte ? Tu sais qu'il est interdit par
la loi de tenir des propos dans ce genre ? (hé oui la diffamation et les
propos injurieux sont pénalisables).

Donc on se caaaaalme et on évite de s'emporter !!!! Et j'ajouterais
même, pouquoi pas, "et on s'excuse" !

- Déjà tu te fous de ma gueule en disant "Ah seigneur, il a compilé ça"...
Alors j'aime pas du tout les cons comme toi qui se foutent de ma gueule
parce que je ne sais pas déclarer un type d'objet !!!



Patrick ne s'est pas foutu de ta gueule... Simplement la ligne de code
que tu as écrite est assez "rigolote". Il ne faut pas le prendre mal, ça
arrive à tout le monde d'écrire des choses "comiquo-absurdes" et si ça
fait sourire les autres et bien il ne sert à rien de s'emporter et de
crier au fautage de gueule. Au contraire, soit content, et dis-toi que
tu auras fait sourire au moins une personne...

- Déjà tu ne sais pas récupérer les handles des applications, et tu dis que
ce n'est pas possible de fermer en retrouvant le handle...



Si, si mais comme le dit Philippe ça dépend quel handle !

- Et puis en plus t'es même pas foutu de répondre, j'attends encore...



Bah avec ta réaction ça donne plus trop envie d'aider hein !

- Et puis tu te fous de ma gueule en m'envoyant un texte en anglais, et
pourquoi pas en arabe aussi...



Alors là non, je proteste ! On est peut-être sur un forum francophone,
mais désolé, le monde de l'informatique est baigné de l'anglais, c'est
comme ça, et il faut si faire. Alors si Patrick te répond avec lien
pointant avec une page anglophone c'est tout à fait normal... Et ce
n'est en aucun cas, mais alors vraiment en aucun cas, du foutage de gueule.

Et personnellement, si je pose une question et que quelqu'un me répond
en Chinois, langue que je ne maîtrise absolument pas, je serais déjà
bien content qu'une personne ait eu la gentilesse de prendre quelques
minutes pour s'occuper de mon problème. Et mieux vaut ça que de crier au
crime et de l'envoyer chier parce que "je suis un francophone et qu'il
faut donc me répondre en français".

- Et en plus t'es MVP, j'avais pas vu! faut dire que tu ne participes pas
beaucoup... Ils t'ont mis pour boucher un trou ou quoi, t'es le plus idiot
des MVP, je déconne pas, généralement les autres répondent correctement...



Patrick est un des plus actifs, mais seulement il ne répond pas
uniquement sur ce forum, mais sur bien d'autres. (ce forum est
d'ailleurs l'un dont il s'occupe le moins). Va voir sur d'autres forums
et tu comprendras.

Enfin bref, en un mot, calme toi et soit positif ;-).

--
Pierre ALEXIS
Courriel :
FAQ Visual Basic : http://faq.vb.free.fr/
Avatar
LE TROLL
Lol; c'est le même sous un autre pseudo, ou c'est un autre ?

Ben voui, je le dis, je suis quasi autodidacte, je ne l'ai pas fait
volontairement, c'est le hasard...
J'ai commencé par un CAP de mécanique Agricole, pour poursuivre sur un DEUG
et une Capacité en droit... Après je suis passé à la programmation (un an de
cours chez un développeur indépendant dans les années 78, 79 je crois, du
BAL de l'OS Prologue-Bull (basic)), le CPM aussi, c'est tout ce que j'ai
comme formation, si on ne compte pas un stage d'une semaine d'ASM5 et une
dizaine d'heures de cours en C (TC3++)...

Alors évidemment, venant du basic, et n'ayant pas eu de mise à jour, ben
j'avance comme je peux, d'autant que ce qui te semble un manque de logique,
serait plutôt un manque de connaissance dans certains domaines, comme la
manipulation des variables objet, des images, etc...

Je suis ni intelligent (à peine 130), ni instruit (à peine un bac +2),
ni cultivé (à peine un peu de piano et de peinture à l'huile), je suis juste
un pauvre moyen à moitié autodidacte...
Je reconnais moi-même que je suis totalement nul (j'ai à peine écrit 12
romans, et une centaine de programmes plus nuls les uns que les autres);
alors je te félicite d'avoir mis en valeur l'incapable que je suis,
cependant et de facto (ah oui, j'ai aussi fait du latin, mais si peu).. de
facto donc, il est normal que l'on ne se moque pas de moi, et que l'on
m'explique, ainsi, par syllogisme, il est logique que je m'insurge quand on
se gausse de moi, moi l'idiot du village...

Tu en as oublié, je suis couard aussi (à peine 15 mois de Légion,
réformé sur blessure), la preuve, j'écris de derrière mon écran à l'aide
duquel je me cache, c'est vrai, j'ai peur, ça fout la trouille, aucun
courage ne peut être décelé en moi, rien de rien, jamais...

In fine comme disait les romains, même si tu te moques de moi, tu sais,
dans la boîte où je travaille, ils embauchent en CDD de 3 mois, des mecs qui
ressortent avec des DUT d'informatique, pour filer un coup de main,. Ben
certes ils sont bons en mathématiques, ils comprennent bien, mais à part ça,
faut pas leur demander de faire une grosse applie, on court à la
catastrophe. Il savent paramétrer correctement avec toutes les applies
Microsoft et les moteurs, mais en code pur, fichiers, APi (en programmation,
quoi), etc... Bof, bof, ils deviendront bons avec 2, 3 ans de pratique, et à
ce moment ils auront presque un niveau maîtrise...
Je veux dire par là, et avec cet exemple, que si je voulais frimer en
demandant une validation des acquis, je crois que j'aurais, compte tenu de
ma logigraphie, une équivalence DEUG, voir licence, certes avec des lacunes
mais comblées par l'expérience en d'autres domaines (c'est le principe de la
validation des acquis et de l'expérience)... Mais c'est vrai, par rapport à
toi, et à beaucoup, je suis totalement idiot, j'en ai conscience, ainsi ce
n'est pas une psychose, c'est juste une névrose...

Tiens, c'est en français:
http://irolog.free.fr/

Vive les idiots, vive moi, mais ne vous moquez pas des idiots,
apprenez-leur :o)

---
"dark poulpo" a écrit dans le message de news:
41e4f40e$0$6407$
- la ferme!!!!!!!

Quand je te lis et que je vois ce que tu fais, t'es loin de faire ce que
tu
dit être.

et j'ai noté ceci "Alors j'aime pas du tout les cons comme toi qui se
foutent de ma gueule", sache que le respect marche dans les 2 sens, et
ayant
une certain rancune dans ma nature, je vais aprés avoir attendu
tranquillement mon heure te renvoyé l'ascenseur en jouant avec ton propre
jeu (cité les autres pour pretendre).

Le problême avec toi ce que parceque tu crois être intelligent, je cite:

"Je ne saurais te dire, je fais juste de la programmation indépendante en
logiciel individuel, généralement ludique, et de formation quasi
autodidacte... Alors je ne me sers par de choses de ce genre avec
plusieurs
développeurs, projets et autres, désolé :o)"

alors que je vois à quel point tu es un âne ( juste en programmation ?)
vu
les messages que tu postes. Ton manque de logique me donne à la fois de
l'intrigue et du suspense sur ce qui est loin d'être un postulat :
"savoir
si tu es vraiment doué d'intelligence"

Dailleurs, tu n'es même pas capable de lire un code vb dans une page en
anglais (langage pourtant unniversel)

"Je n'ai pas identifié la langue, je ne sais pas ce que c'est je ne
comprends que le grec ancien et le latin, et puis un peu le français, et
ici
on est dans un forum français, en français, donc on communique et on ne
lit
que du français, mais surtout pas de l'anglais"

ciao,

















Avatar
scraper
Bonjour LE TROLL
(dans news:uXMIkEK%)
tu nous disais :

[...]

à lire cet étalage d'autosuffisance béat, on prend mieux la mesure de la
très haute opinion que tu as de toi même .. ce qui de facto (tu as vu, j'ai
réussi à en caser un ;-) suffit à expliquer ton arrogance insupportable et
cette détestable manie que tu as de te croire tout permis, avec le sans gêne
qui te caractérise ...

ton ego surdimensionné ne te permet pas d'accepter ni reconnaitre tes
erreurs, dont tu rejettes la responsabilité sur les autres (c'est tellement
pratique ...)

... mais j'avais dit "Fon't feed Le TROLL" ... donc, je vais arrêter là ;-)
(pourtant, je crois qu'il y aurait matière ... il n'est que de voir la
formidable unanimité que tu génères à ton encontre, même de la part de gens
habituellement modérés !)

tu peux à l'avenir éviter mes posts, je me ferai un plaisir d'en faire de
même à ton encontre, et vais me dépêcher de t'oublier :-(


Je ne te salue pas (en tant qu'adjudant que tu me sembles être, c'est toi
qui me le dois ;-)


PLONK



--

Attention ! Adresse mail invalide ...
Pour me contacter, cliquez sur le lien ci-dessous:
http://scraper.chez.tiscali.fr/contact.htm

scraper
Avatar
LE TROLL
Salut,

Ah, alors tu veux déposer plainte pour diffamation, ben chiche, vas-y,
tu sembles surenchérir, après tout ça alimente la polémique, pourquoi pas...
Me dire un truc du genre "t'a compilé ça!", (sous entendu: "t'es débile"),
c'est un compliment sans doute?
Sinon, ce n'est pas de la diffamation, à mon avis tu mets une mauvaise
qualification juridique... Revois ton droit (pénal)... Et puis il ne faut
pas confondre des invectives usuelles avec de vraies insultes...
Franchement t'es trop démocrate, quand tu penses que quelqu'un est con, tu
ne dis rien (bravo); ben non, moi je lui dis que c'est "un con", pour qu'il
le sache au minimum...
T'as oublié les "abuses", comme je paye 19 euros pour 128 kb/s + 5 Mo
d'expédition de fichiers, et 20 Mo d'espace, je me tâte, là ça m'évitera de
faire une lettre d'annulation, sauf que, chez Noos ils ne sont peut être pas
totalement cons, et ne vont pas perdre un client, suite aux inventions d'une
balance doublée d'une taupe qui est chez un concurrent...
C'était peut être pas le meilleur point où il fallait intervenir, il me
semble que c'était à lui seul d'y répondre, puisque c'est lui qui l'a
proféré, tu vois, ça s'appelle "une menace" (de lui), je peux interpréter ça
comme j'en ai envie, et son "je peux même faire plus" (en gros), ben je peux
estimer qu'il veux me tuer (menaces de mort)...

Tu te vois pas un peu, il me traite de débile indirectement, il
sous-entend qu'il veut me tuer, c'est moi qui devrait faire ce que tu dis,
mais moi, j'oserais même pas en tant que demandeur (mais en tant que
défendeur, demandeur reconventionnel, j'ai mes chances), je ne suis pas
taré, je ne vais pas en justice parce qu'on me traite de con, car pour faire
ça faut être une ordure répugnante, une balance, etc Dis-moi, t'es comme ça
toi? Et si t'es pas comme ça, pourquoi tu dis ça?

Me calmer, lol, mais je suis calme, je n'ai répondu qu'à ceux qui
m'écrivent, parce qu'il m'a vexé, et me répond en plus des conneries, etc...
Non, tu n'es pas objectif, étudies sa primo réponse, et son ton docte qui
dit la connerie qu'on ne peut pas fermer une applie qui émane d'un autre
programme que le sien...
Lui ne s'est pas excusé, pour avoir dit des conneries ni s'être moqué de moi
et m'avoir insulté de facto (j'aime l'humour, mais quand c'est identifié
comme tel)...

Il est actif, bof, pas ici en tout cas, et surtout avec ce qu'il affirme
dans ses réponses, ça fait pas sérieux...

Non, je ne veux pas de textes en anglais dans un forum français... J'ai
assez des américains, des spams et des virus... Mais tu peux aller vivre en
Angleterre si t'es mal avec le français :o)
-------

"Pierre Alexis" a écrit dans le message de news:
OJm42kJ%
LE TROLL a écrit :

C'est quoi des mesures plus définitives ???



Ho je ne sais pas moi... Porter plainte ? Tu sais qu'il est interdit par
la loi de tenir des propos dans ce genre ? (hé oui la diffamation et les
propos injurieux sont pénalisables).

Donc on se caaaaalme et on évite de s'emporter !!!! Et j'ajouterais même,
pouquoi pas, "et on s'excuse" !

- Déjà tu te fous de ma gueule en disant "Ah seigneur, il a compilé
ça"...
Alors j'aime pas du tout les cons comme toi qui se foutent de ma gueule
parce que je ne sais pas déclarer un type d'objet !!!



Patrick ne s'est pas foutu de ta gueule... Simplement la ligne de code que
tu as écrite est assez "rigolote". Il ne faut pas le prendre mal, ça
arrive à tout le monde d'écrire des choses "comiquo-absurdes" et si ça
fait sourire les autres et bien il ne sert à rien de s'emporter et de
crier au fautage de gueule. Au contraire, soit content, et dis-toi que tu
auras fait sourire au moins une personne...

- Déjà tu ne sais pas récupérer les handles des applications, et tu dis
que ce n'est pas possible de fermer en retrouvant le handle...



Si, si mais comme le dit Philippe ça dépend quel handle !

- Et puis en plus t'es même pas foutu de répondre, j'attends encore...



Bah avec ta réaction ça donne plus trop envie d'aider hein !

- Et puis tu te fous de ma gueule en m'envoyant un texte en anglais, et
pourquoi pas en arabe aussi...



Alors là non, je proteste ! On est peut-être sur un forum francophone,
mais désolé, le monde de l'informatique est baigné de l'anglais, c'est
comme ça, et il faut si faire. Alors si Patrick te répond avec lien
pointant avec une page anglophone c'est tout à fait normal... Et ce n'est
en aucun cas, mais alors vraiment en aucun cas, du foutage de gueule.

Et personnellement, si je pose une question et que quelqu'un me répond en
Chinois, langue que je ne maîtrise absolument pas, je serais déjà bien
content qu'une personne ait eu la gentilesse de prendre quelques minutes
pour s'occuper de mon problème. Et mieux vaut ça que de crier au crime et
de l'envoyer chier parce que "je suis un francophone et qu'il faut donc me
répondre en français".

- Et en plus t'es MVP, j'avais pas vu! faut dire que tu ne participes pas
beaucoup... Ils t'ont mis pour boucher un trou ou quoi, t'es le plus
idiot des MVP, je déconne pas, généralement les autres répondent
correctement...



Patrick est un des plus actifs, mais seulement il ne répond pas uniquement
sur ce forum, mais sur bien d'autres. (ce forum est d'ailleurs l'un dont
il s'occupe le moins). Va voir sur d'autres forums et tu comprendras.

Enfin bref, en un mot, calme toi et soit positif ;-).

--
Pierre ALEXIS
Courriel :
FAQ Visual Basic : http://faq.vb.free.fr/


Avatar
dark poulpo
re,

blablabla qui ne sert a rien et pour lequel je suis totalement


désintéressé, en fait nous étions 2 à te lire chez moi, et on a

tout les 2 décider de passer. pourquoi? plusieurs raisons :

1) ta vie on s'en fou

2) j'aime pas les gens qui se plaignent ou se cache derrière leur passé pour
trouver des excuses

3) tu dit être militaire (ou un truc comme ça), désolé pour toi, mais je
trouve pas que t'as un esprit combatif, de plus je croyais qu'il faisait
passer des tests d'aptitudes mental. Je me trompe.

4) ya pas de 4

5) tu te fou des autres, si tu le fait, fait le bien, connaît ton sujet
d'abord!!! (ce n'est pas ton cas)

6) t'as la mentalité d'un gamin

7) yen a sûrement d'autre mais j'ai la flemme



Il va falloir que tu grandisses un peu bp passionnément!!!!



Des programmeurs qui apprennent tout d'eux mêmes, il y en as des tas. un
chiffre au hasard 70%, 90% sont autodidactes par la suite (mes chiffres sont
faux, mais je dois pas être loin ).Ton cas sans intérêt supplémentaire est
un cas parmis d'autre à plonger dans les oubliettes du déjà vu.



Tiens, c'est en français:
http://irolog.free.fr/




Franchement je préfères me taire sur cela, quand je vois que t'es assez naïf
pour croire en l'astrologie, je préfère faire abstraction de toi et de ton
pseudo. A condition bien sur que ce soit ton site.



Vive les idiots, vive moi, mais ne vous moquez pas des idiots,
apprenez-leur :o)





A condition que l'idiot n'est pas assez con et respecte le maître!!!



Cordialement,

--
-----
http://dark.freezee.org/
1 2 3