kev900001
Messages postés119Date d'inscriptionmercredi 7 juillet 2004StatutMembreDernière intervention 9 avril 2008
-
7 avril 2008 à 19:34
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 2021
-
10 avril 2008 à 09:21
bonjour a tous,
voila j'ai un gros souci sur le quel je buche depuis quelques jours
je suis en train de faire un programme pour sinplifier l'utilisation de windows xp
mais je doit a partir d'un command demarrer un logiciel dot je n'ai pas acces au code puisque c'est un logiciel payant
mais je n'arrive a le demarrer j'ai essaye plusieurs facon
avec shell....
avec set form= nothing
dim stappname as string
stappname =" c: programme files .........."
call shell (stappname, vbmaximizedfocus)
ne marche pas non plus ca ne fai rien du tout et pourtant avec d'autre prog sa marche comme media player sans souci
a savoir que ce logiciel n'a pas de handle il n'est pas redimensionnable car demarre par double click sont icon est prend tout l'ecran sans possibilite de le reduire
sinon j'aimerai aussi savoir comment reduir media player a partir d'un command et dememe pour l'agrandir
il ne me manque plus que sa et ma source devrai bientot etre fini
je vous remerci pour votre aide
NHenry
Messages postés15083Date d'inscriptionvendredi 14 mars 2003StatutModérateurDernière intervention19 septembre 2023159 8 avril 2008 à 12:31
Bonjour
Euh, je ne sais pas si c'est une erreur dans le code ou non, mais c'est pas "programme files", mais "program files"
Et essaye cela :
Shell("""c:\Program Files\...""")
Nous captons le cockpit coupable qui a capoté
VB (6, .NET1&2), C++, C#.Net1
Mon site
kev900001
Messages postés119Date d'inscriptionmercredi 7 juillet 2004StatutMembreDernière intervention 9 avril 2008 8 avril 2008 à 13:54
non tkt pas il n'y a pas d'erreur j'airetaper le exte je n'ai pas fait decopier coller
je te proment renfield que sa ne marche pas et j'en suis sur car c'est le seul logiciel de qui ne demarre pas je n'ai aucun probleme avec les autres logiciel
je pense mais je sais pas si c'est possible de simuler le double ou smple click de la souri quand on clique sur l'icone
kev900001
Messages postés119Date d'inscriptionmercredi 7 juillet 2004StatutMembreDernière intervention 9 avril 2008 8 avril 2008 à 16:28
dsl Renfield mais ce "foutu" logiciel ce lance toujour pas jai essayer quelques ligne avec tes conseils je peu metre n'importe quel autre logiciel genre mediaplayer le bloc note ou d'autre sa lance sans probleme mais lui y veu rien savoir je comprend carrement pas
kev900001
Messages postés119Date d'inscriptionmercredi 7 juillet 2004StatutMembreDernière intervention 9 avril 2008 8 avril 2008 à 16:33
sinon vous pourriez pas me dire comment je pourrai a l'aide d'un command reduir et d'un autre command agrandir Wmp mais bon je prefererai reussir a lancer ce logiciel je vai passer plus de temps juste pour ca que j'ai passer afaire tout le reste
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 202175 8 avril 2008 à 16:38
quel soft est-ce ?
pour jouer avec la taille d'une fenetre:
Private Const SC_MAXIMIZE As Long = &HF030&
Private Const SC_MINIMIZE As Long = &HF020&
Private Const SC_RESTORE As Long = &HF120&
Private Const WM_SYSCOMMAND As Long = &H112
Private Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByRef lParam As Any) As Long
kev900001
Messages postés119Date d'inscriptionmercredi 7 juillet 2004StatutMembreDernière intervention 9 avril 2008 8 avril 2008 à 20:32
si je peu abusé de ta gentilesse Renfield pourrai tu stp me faire un exemple
pour resise le notepad car jdoit oublie de faire quelque chose soit j'ai une erreur a chaque ou alors je redemarre l'appli a chaque au lieu juste de redimansioner
merci bcp
kev900001
Messages postés119Date d'inscriptionmercredi 7 juillet 2004StatutMembreDernière intervention 9 avril 2008 8 avril 2008 à 20:40
oui lolokun c'est bien un exe si je clique avec ma dessus il demarre trankil mais par vb impossible je ne sais plus quoi faire j'ai cherche et trouver plusieur source sur le site mais rien ne marche
lolokun
Messages postés1241Date d'inscriptionmardi 10 octobre 2006StatutMembreDernière intervention27 août 20137 8 avril 2008 à 21:07
Alors là...
A part le chemin incorrect je ne vois pas ce qui pourrait bloquer..Dans
le nom ou le chemin de cet exe, y'a t'il des caractères spéciaux ou des
espaces?
L'expérience, c'est une connerie par jour, mais jamais la même..
kev900001
Messages postés119Date d'inscriptionmercredi 7 juillet 2004StatutMembreDernière intervention 9 avril 2008 8 avril 2008 à 21:17
non c'est rien de plus simple mais sa lance pas il n'y a pas d'erreur dans le chemin car j'ai fe un copier coller de l'adresse du racourci dans propriete mais j'ai essayer avec d'autre apli sa marche nickel il y a que avec se logiciel la
lolokun
Messages postés1241Date d'inscriptionmardi 10 octobre 2006StatutMembreDernière intervention27 août 20137 8 avril 2008 à 22:03
Etrange..Je ne vois pas du tout ce qui pourrait bloquer
Et avec ceci ?
Private Declare Function ShellExecute Lib "shell32.dll" Alias
"ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal
lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As
String, ByVal nShowCmd As Long) As Long
kev900001
Messages postés119Date d'inscriptionmercredi 7 juillet 2004StatutMembreDernière intervention 9 avril 2008 9 avril 2008 à 16:00
bon j 'arrive toujour pas a le lancer j'ai trouver un autre log aussi qui fe pareil si vous voulez essayer clavicom est un logiciel de clavier virtuel ba lui non plus y se lance pas il est telechargable gratuitement sur internet
lolokun
Messages postés1241Date d'inscriptionmardi 10 octobre 2006StatutMembreDernière intervention27 août 20137 9 avril 2008 à 20:50
Re,
Bah j'ai téléchargé le programme en question ça fonctionne avec l'API Shellexecute :
Private Declare Function ShellExecute Lib "shell32.dll" Alias
"ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal
lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As
String, ByVal nShowCmd As Long) As Long