petit probleme urgent

Question

Salut 
je veux ouvrir un fichier matlab en mode exécution à partir d'une feuille vb 
pour cela j'ai ecrit le code suivant : 
Private Declare Function shellExecute Lib "shell32.dll" Alias "shellExecute a" (ByVal HWMD As Long, ByVal LPOperation As String, ByVal LPval As String, ByVal LPParameter As String, ByVal LPDirectory As String, ByVal Nshowcmd As Long) As Long

pour l'appel:
Call shellExecute(Me.HWMD, "d:\IIA3\cpi	p3	est.m", "", vbNullString, 1)
 
j'ai eu comme message d'erreur :"méthode ou membre de données introuvable"

est ce que vous pouvez m'aider à résoudre ce prob 
merci 
 :sad)

Arsena · Answer

ecrit: 
HWND et verifie le chemin de ton fichier

Call shellExecute(Me.HWND, "d:\IIA3\cpi	p3	est.m", "", vbNullString, 1)

MD

Arsena · Answer

ou plutot:

ShellExecute Me.hwnd, vbNullString, "Le chemin de ton fichier", vbNullString, "C:", SW_SHOWNORMA

A+
MD

cs_maryouma · Answer

Salut 
j'ai vérifié le chemin de mon fichier, il est juste 
j'ai esayé les deux solutions mais j'ai pas eu de résultats, en fait pour la 1ere j'ai eu ce message"cet argument n'est pas facultatif", pour la 2eme, j'ai eu cet erreur"Point d'entrée shellExecute a d'une DDL introuvable dans shell32.dll" 
Quoi faire ?
merci

Arsena · Answer

Un exemple de code qui ouvre un fichier 


Option Explicit
'ShellExecute Lance un programme a partir de l'extention de fichier
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
Const SW_SHOWNORMAL = 1
  
Private Sub Form_Load()
    
    'Me.hwnd = Le handle de la feuille
    'lpOperation = "Open"
    'lpFile = Chemin du fichier a lancer
    'lpParameters = vbNullString
    'lpDirectory = "C:"
    'nShowCmd = Etat de la fenetre (SW_SHOWNORMAL)
ShellExecute Me.hwnd, "Open", _
    "LeCheminDeTonFichier", _
    vbNullString, "C:", SW_SHOWNORMAL
Unload Me
End
End Sub



A+ et bonne prog
MD

Petit probleme urgent

4 réponses

Discussions similaires