Les Snippets

Nouveaux snippets
Snippets les plus consultés
Proposer un snippet

 Abonnez vous à ce fil d'information Les rss

Rechercher :

Par langages :

Par Catégorie

Compteurs


Nombre de sujets : 472
Nombre de snippets : 1507
Connexion

Ouvrir un fichier

Niveau requis pour utiliser/comprendre cette source : 1 ( Débutant )
Créé le 25/03/2006 00:08:29 et initié par Willi [Liste]
Vue : 11319
Catégorie(s) : Fichier / Disque
Langages dispo pour ce code :
- VB6, VBA
- VBScript
- Delphi 5
Proposer ce code dans un autre langage



Langage : VB6 , VBA
Date ajout : 25/03/2006
Posté par Willi [Liste]

'Déclaration de la fonction 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
'Constantes déterminant le mode d'affichage de la fenêntre
Private Const SW_SHOWDEFAULT = 10
Private Const SW_SHOWMAXIMIZED = 3
Private Const SW_SHOWMINIMIZED = 2
Private Const SW_SHOWMINNOACTIVE = 7
Private Const SW_SHOWNA = 8
Private Const SW_SHOWNOACTIVATE = 4
Private Const SW_SHOWNORMAL = 1

Utilisation (exemple - ouverture d'un fichier word)
ShellExecute Me.hwnd, vbNullString, "D:\tonfichier.doc", vbNullString, "C:\", SW_SHOWNORMAL
Langage : VBScript
Date ajout : 25/03/2006
Posté par Willi [Liste]
dim wshShell
set wshShell = createobject("wscript.shell")
'Execution du fichier
'Exemple - ouverture d'un fichier excel
wshShell.run "D:\tonfichier.xls"
Langage : Delphi 5
Date ajout : 27/03/2006
Posté par ni69 [Liste]
 ShellExecute(0,Nil,PChar('C:\Fichier.txt'),Nil,Nil,SW_SHOW);
Remarque :
"ShellApi" doit être ajouté dans la clause "uses" de l'unité pour que ce code fonctionne

Snippets en rapport avec : Fichier, Ouvrir, Shellexecute, Shell

22/04/2008 - Obtenir la durée d'un fichier AVI

21/04/2008 - Dessiner l'icône d'un dossier ou d'un fichier

16/04/2008 - Récupérer le nom du fichier le plus récent

08/03/2008 - Ouvrir un fichier PDF à une page précise

04/02/2008 - Imprimer un fichier excel sans l'ouvrir

21/01/2008 - Récupérer le chemin du programme associé à un fichier d'après son extension

17/01/2008 - GetUnique - Génération d'un nom de fichier auto-incrémenté

08/12/2007 - Boite de dialogue pour choisir un Fichier

04/12/2007 - Récupérer le contenu d'un fichier sous forme d'un tableau multidimensionnel d'après des colonnes structurées

02/12/2007 - Sauvegarder un stream dans un fichier



Codes sources en rapport avec : Fichier, Ouvrir, Shellexecute, Shell

{Visual Basic, VB6, VB.NET, VB 2005} OUVERTURE D'UN FICHIER PAR UN LOGICIEL EXTERNE
Ce code permet d'ouvrir un fichier quelconque dans le logiciel associé à ce type de fichier. Il s...

{C# / C#.NET} EXTRACTION DES MINIATURES DES FICHIERS (COMME DANS L'EXPLORATEUR MODE DÉTAILS)
Ce code permet d'extraire les miniatures des fichiers comme en mode Détails de l'explorateur Windows...

{Visual Basic, VB6, VB.NET, VB 2005} (.NET) EXTRACTION DES MINIATURES DES FICHIERS (COMME DANS L'EXPLORATEUR MODE DÉTAILS)
Ce code permet d'extraire les miniatures des fichiers comme en mode Détails de l'explorateur Windows...

{Visual Basic, VB6, VB.NET, VB 2005} OUVRIR DES HTA SANS MESSAGE DE LA PART DE WINDOWS
Lorsque l'on essaie d'ouvrir un fichier a partir d'un hta, window (IE version6.00.2900 et +) nous ...

{Visual Basic, VB6, VB.NET, VB 2005} EXTRACTION DES MINIATURES DES FICHIERS (COMME DANS L'EXPLORATEUR MODE DÉTAILS)
Ce code permet d'extraire les miniatures des fichiers comme en mode Détails de l'explorateur Windows...

{Visual Basic, VB6, VB.NET, VB 2005} RÉCUPÉRER LE HANDLE APRÈS UN SHELLEXECUTE
Bon, ça y est. Après un week-end entier à m'arracher le peu de cheveux qui me reste, voilà une versi...

{JAVA / J2EE} IMPLÉMENTATION D'UN SHELL POUR LA GESTION D'UN SYSTEME D'EXPLOITATION
Cette application consiste en un shell éxécuté avec succés sous windows (Linux pas encore testé) Ce...

{Visual Basic, VB6, VB.NET, VB 2005} EXÉCUTION D'UN PROGRAMME ET ATTENDRE LA FIN DE L'EXÉCUTION DE FAÇON NON BLOQUANTE
Permet d'exécuter un fichier et d'attendre la fin de l'exécution sans figer le programme en cours...

{Visual Basic, VB6, VB.NET, VB 2005} OUVRIR PLUSIEURS FICHIERS DANS UNE SEULE INSTANCE
Voici un bout de code qui permet d'ouvrir des fichiers dans une seule instance de votre appli. je l'...

{Javascript / DHTML} OUVRIR DES FICHIERS DE L'INTERNAUTE SANS DEMANDE D'AUTORISATION
Voici une source que j'ai trouvé intéressante à mettre (mais pour IE seulement). En effet, elle mon...