Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
2026 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Ouvrir un .CHF en VB

 
 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Ouvrir un .CHF en VB

n°1282680
Crawdge
Posté le 13-01-2006 à 09:34:46  profilanswer
 

:hello:  
 
J'aurai voulu savoir comment je pourrai ouvrir un ".CHF" par le code en VB...  
J'ai bien testé ca :  

Code :
  1. Shell "command.com /c C:\Program~1\Symantec\pcAnywhere\CMS\TIVOLI.CHF"


 
Mais ca ne marche pas :(  
 
Si quelqu'un pourrai m'aider je lui en serai fort reconnaissant ! merci d'avance  
:)

mood
Publicité
Posté le 13-01-2006 à 09:34:46  profilanswer
 

n°1282682
Manu la Sc​ience
...la science ... pas toujours
Posté le 13-01-2006 à 09:37:23  profilanswer
 

et ca :
 
Shell "command.com /c C:\\Program~1\\Symantec\\pcAnywhere\\CMS\\TIVOLI.CHF" ?


---------------
Proverbe chinois: il vaut mieux apprendre à pêcher à un mendiant que de lui donner du poisson...
n°1282683
Manu la Sc​ience
...la science ... pas toujours
Posté le 13-01-2006 à 09:39:37  profilanswer
 

Dans l'aide de VBA :
 
Shell, fonction, exemple
Cet exemple utilise la fonction Shell pour exécuter une application indiquée par l'utilisateur. Sur Macintosh, le nom de l'unité par défaut est "HD", les éléments constitutifs du chemin d'accès étant séparés par des deux-points au lieu des barres obliques inversées. De même, vous devez remplacer \Windows par des dossiers Macintosh.
 
' Si vous attribuez la valeur 1 au deuxième argument,
' l'application s'ouvre à sa taille normale  
' et devient l'application active.
Dim RetVal
' Exécute la calculatrice.
RetVal = Shell("C:\WINDOWS\CALC.EXE", 1)


---------------
Proverbe chinois: il vaut mieux apprendre à pêcher à un mendiant que de lui donner du poisson...
n°1282686
Crawdge
Posté le 13-01-2006 à 09:47:37  profilanswer
 

Merci de vos 2 réponses mais ceci ne marche pas :( Les commandes marchent avec les .exe mais pas avec les .CHF on dirai :'(
 
pourtant sous Windows quand je le lance ca amrche très bien, bizarre bizarre ^^


Message édité par Crawdge le 13-01-2006 à 09:49:05
n°1282692
Manu la Sc​ience
...la science ... pas toujours
Posté le 13-01-2006 à 10:14:58  profilanswer
 

Je pense que c'est normal que cela ne marche pas car Shell ouvre que des fichiers exécutables...


---------------
Proverbe chinois: il vaut mieux apprendre à pêcher à un mendiant que de lui donner du poisson...
n°1282697
Crawdge
Posté le 13-01-2006 à 10:20:11  profilanswer
 

Ah bah voilà alors :p
 
Et saurai tu comment je pourrai faire pour ouvrir mon CHF alors s'il te plait?

n°1282698
Manu la Sc​ience
...la science ... pas toujours
Posté le 13-01-2006 à 10:21:09  profilanswer
 

Essaies ca :
 
Open "C:\Program~1\Symantec\pcAnywhere\CMS\TIVOLI.CHF"
 
ce doit être la fonction Open la plus appropriée mais avec peut être des variantes...


---------------
Proverbe chinois: il vaut mieux apprendre à pêcher à un mendiant que de lui donner du poisson...
n°1282701
Manu la Sc​ience
...la science ... pas toujours
Posté le 13-01-2006 à 10:22:14  profilanswer
 

Je n'en sais pas beaucoup plus que toi, mais je cherche...  :lol:  Et à deux, on a plus de chances de réussir...


---------------
Proverbe chinois: il vaut mieux apprendre à pêcher à un mendiant que de lui donner du poisson...
n°1282703
Crawdge
Posté le 13-01-2006 à 10:24:58  profilanswer
 

voilà, merci bcp je continue a cherché aussi alors ;)

n°1282706
Crawdge
Posté le 13-01-2006 à 10:32:25  profilanswer
 

y'a tout simplemenet ca sinon mais il l'ouvre mais je ne le vois pas (il l'ouvre car quand je reclic il dis que c déjà ouvert o_O)
 
 
Open "C:\Program Files\Symantec\pcAnywhere\CMS\TIVOLI.CHF" For Input As #1
 
 
(cependant open c'est pas que pour les .txt ? lol)


Message édité par Crawdge le 13-01-2006 à 10:33:48
mood
Publicité
Posté le 13-01-2006 à 10:32:25  profilanswer
 

n°1282712
Manu la Sc​ience
...la science ... pas toujours
Posté le 13-01-2006 à 10:37:43  profilanswer
 

Ce doit être le mode d'ouverture qui ne convient pas... Mets Random à la place


---------------
Proverbe chinois: il vaut mieux apprendre à pêcher à un mendiant que de lui donner du poisson...
n°1282728
Crawdge
Posté le 13-01-2006 à 10:45:08  profilanswer
 

il reconnait pas random, faut faire quoi comme déclaration?

n°1282752
Manu la Sc​ience
...la science ... pas toujours
Posté le 13-01-2006 à 11:02:50  profilanswer
 

Je sais pas trop comment faire...


Message édité par Manu la Science le 13-01-2006 à 11:03:57

---------------
Proverbe chinois: il vaut mieux apprendre à pêcher à un mendiant que de lui donner du poisson...
n°1282753
Crawdge
Posté le 13-01-2006 à 11:04:25  profilanswer
 

Fonction non défini me dis t'il

n°1283509
luminilux
Posté le 14-01-2006 à 08:43:26  profilanswer
 

Essai éventuellement « ShellExecute » / « ShellExecuteEx » par un appel d'API, mais je crois que ça ne fonctionne que si ton extention est associée à une application
 
http://msdn.microsoft.com/archive/ [...] elexec.asp
 
Rubrique « Opening Documents »
N'oublie pas la déclaration de la fonction « A Shelling We Will Go! » : Declare Function...
 
Bonne chance
 
 

n°1284285
Crawdge
Posté le 16-01-2006 à 09:02:59  profilanswer
 

Hum hum... a vrai dire j'arive pas a l'executer... lol
 
Il me mets "Type d'argument ByRef incompatible"...  
C'est quoi ce qu'il appele le FormName ?  C'est pas le nom du formulaier o_O
 
Merci

n°1284856
luminilux
Posté le 16-01-2006 à 18:54:33  profilanswer
 

Teste ceci :
 
ajoute un bouton (command1) et crée un fichier « fichierbidon.txt » à la racine de ton disque « C: » par exemple
 
Colle le code qui suit :
 

Citation :


 
Option Explicit
 
Const SW_HIDE As Long = 0
Const SW_SHOWNORMAL As Long = 1
Const SW_NORMAL As Long = 1
Const SW_SHOWMINIMIZED As Long = 2
Const SW_SHOWMAXIMIZED As Long = 3
Const SW_MAXIMIZE As Long = 3
Const SW_SHOWNOACTIVATE As Long = 4
Const SW_SHOW As Long = 5
Const SW_MINIMIZE As Long = 6
Const SW_SHOWMINNOACTIVE As Long = 7
Const SW_SHOWNA As Long = 8
Const SW_RESTORE As Long = 9
Const SW_SHOWDEFAULT As Long = 10
Const SW_FORCEMINIMIZE As Long = 11
Const SW_MAX As Long = 11
 
 
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
 
Private Sub Command1_Click()
    OpenThisDoc Me.hwnd, "c:\fichierbidon.txt"
End Sub
 
Private Sub OpenThisDoc(hForm As Long, FileName As String)
    On Error Resume Next
    Dim X As Long
    X = ShellExecute(hForm, "Open", FileName, 0&, 0&, SW_SHOWNORMAL)
End Sub
 


 
Chez moi ça ouvre le fichier avec le bloc notes
 
Bonne chance

n°1285224
Crawdge
Posté le 17-01-2006 à 08:36:49  profilanswer
 

Bonjour et meci de ta réponse, cependant je vois bien qu'il ouvr le notepazd.exe dans les processus démarrés, mais je ne le vois pas autrement...
Bizarre bizarre
 
(et c'est pareil pour un .CHF ?)
 
 merci

n°1285693
luminilux
Posté le 17-01-2006 à 16:39:27  profilanswer
 

il ouvre le bloc notes parceque l'extention TXT est associée au bloc notes comme il ouvrirait un fichier DOC avec Word ou HTM avec Internet Explorer, il devrait ouvrir ton CHF avec l'application qui lui est dédiée si cette extention est associée à une application dont tu disposes
D'où vient le CHF (quelle application) ?

n°1286267
Crawdge
Posté le 18-01-2006 à 08:58:21  profilanswer
 

Ok je comprend mieux :)  
merci bien
 
le CHF vient de PcAnywhere... cependant il ne veut plus l'ouvrir directement... alors qu'avant il voulai bien... bizarre lol...
 
(sinon ton code marche parfaitement :) Merci)


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Ouvrir un .CHF en VB

 

Sujets relatifs
ouvrir une applicationProbleme en C#: Ouvrir une Form a partir d'un bouton d'une autre Form
ouvrir page htmlouvrir deux fenetre en php
[Help]Comment ouvrir un jeux 2 foisouvrir la page ds une nouvelle fenetre pour liens aleatoires
Fermer une fenetre JAVA pour en ouvrir une autreJavascript - possibilité d'ouvrir plusieurs pages en include
batch pour ouvrir un dossier au demarrage ?[FLASH] ouvrir une image dans une popup
Plus de sujets relatifs à : Ouvrir un .CHF en VB

Forum MesDiscussions.Net, Version 2010.2
(c) 2000-2011 Doctissimo
Page générée en 0.066 secondes

Copyright © 1997-2025 Groupe LDLC (Signaler un contenu illicite / Données personnelles)