Accueil > > > DETECTION DU CODEC VIDEO D'UN AVI (FONCTION)
 DETECTION DU CODEC VIDEO D'UN AVI (FONCTION)
 Information sur la source
 Description
MAJ : 25/08/03 : J'ai mis a jour la source du projet. La fonction utilise maintenant un fichier txt (celui de Gspot) pour detecter le code du codec.(fichier joint a la source!!!) voila le code codec se trouve a l'octec 113 d'un fichier avi, donc on le lit en mode binaire... c'est tous simple et efficace!!!
 Source
- Public Function CkelCodec(fichier_avi As String)
- Open fichier_avi For Binary As #1
- Dim Codec As String * 4
- Get #1, 113, Codec
- Close #1
- Select Case Codec
- Case "divx"
- CkelCodec = "c'est un divx4"
- Case "div3"
- CkelCodec = "c'est un Divx3 (Low Motion)"
- Case "div4"
- CkelCodec = "c'est un Divx3 (Fast Motion)"
- Case "div5"
- CkelCodec = "c'est un Divx5"
- Case "cvid"
- CkelCodec = "c'est un Cinepak Codec By radius"
- Case "dx50"
- CkelCodec = "c'est un Divx 5"
- Case "iv50"
- CkelCodec = "c'est un Intel Indeo r5.0"
- Case "wmv2"
- CkelCodec = "c'est un Windows Media Video 8"
- Case "yvu9"
- CkelCodec ="C'est un Indeo Video Raw 1.1"
- Case "xvid"
- CkelCodec ="C'est un Xvid"
- Case "mrle"
- CkelCodec ="Microsoft RLE"
- Case "yvu9"
- CkelCodec ="C'est un Indeo Video Raw 1.1"
- Case "vdom"
- CkelCodec ="VDOnet VDOWave"
- Case "mpv4"
- CkelCodec = "MS MPEG-4 Video Codec V1"
- Case "mp42"
- CkelCodec ="MS MPEG-4 Video Codec V2"
- Case "i263"
- CkelCodec = "Intel I.263 Video Driver 2.55.012"
- Case "iv41"
- CkelCodec ="Intel Indeo Video Interactive"
- End Select
-
- End Function
-
-
- Pour utiliser la fonction
-
- msgbox CkelCodec("c:\fichier.avi")
- ou encore
- text1 = CkelCodec("c:\fichier.avi")
Public Function CkelCodec(fichier_avi As String)
Open fichier_avi For Binary As #1
Dim Codec As String * 4
Get #1, 113, Codec
Close #1
Select Case Codec
Case "divx"
CkelCodec = "c'est un divx4"
Case "div3"
CkelCodec = "c'est un Divx3 (Low Motion)"
Case "div4"
CkelCodec = "c'est un Divx3 (Fast Motion)"
Case "div5"
CkelCodec = "c'est un Divx5"
Case "cvid"
CkelCodec = "c'est un Cinepak Codec By radius"
Case "dx50"
CkelCodec = "c'est un Divx 5"
Case "iv50"
CkelCodec = "c'est un Intel Indeo r5.0"
Case "wmv2"
CkelCodec = "c'est un Windows Media Video 8"
Case "yvu9"
CkelCodec ="C'est un Indeo Video Raw 1.1"
Case "xvid"
CkelCodec ="C'est un Xvid"
Case "mrle"
CkelCodec ="Microsoft RLE"
Case "yvu9"
CkelCodec ="C'est un Indeo Video Raw 1.1"
Case "vdom"
CkelCodec ="VDOnet VDOWave"
Case "mpv4"
CkelCodec = "MS MPEG-4 Video Codec V1"
Case "mp42"
CkelCodec ="MS MPEG-4 Video Codec V2"
Case "i263"
CkelCodec = "Intel I.263 Video Driver 2.55.012"
Case "iv41"
CkelCodec ="Intel Indeo Video Interactive"
End Select
End Function
Pour utiliser la fonction
msgbox CkelCodec("c:\fichier.avi")
ou encore
text1 = CkelCodec("c:\fichier.avi")
 Conclusion
Ps: Laissez moi un commentaire!!! et une bonne note lol ++
 Sources du même auteur
 Sources de la même categorie
 Commentaires et avis
 Discussions en rapport avec ce code source dans le forum
video [ par Ninja ]
Je voudrai savoir comment créer un avi,c'est t'a dire utilisation de codec etc... a partir d'image les assembler et créer un avi... aussi exiterai t'i
Lancer un AVI (divx) a parttir d'un prog VB URGENT!! [ par $KuLL-d0zeN_ ]
Salut, si kk1 sait comment faire pour lancer un divx a partir d'un prog vb maaaaaail mooooooooooooooaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa
Convertisseur DVD -> AVI (Divx) :) [ par MOA ]
URL :http://deltasoftfr.free.fr/URL DOWNLOAD : http://deltasoftfr.free.fr/downloads/convertdvdfile.php3#21_betaDESCRIPTION :Utilitaire GUI (Graphical
Convertisseur DVD -> AVI (Divx) :) [ par MOA ]
MERCI DE ME DIRE LES BUGS DU LOGICIELS (V2.1 BETA)URL :http://deltasoftfr.free.fr/URL DOWNLOAD : http://deltasoftfr.free.fr/downloads/convertdvdfile.p
video *.avi sur form [ par {-Yah!-} ]
Comment puis je faire pour mettre ma video *.avi sur ma form directement (pas qu elle se lance sur une autre fentre) ?? Merci d'avance
AVI OU MPG sur form [ par {-Yah!-} ]
Comment puis je faire pour inserer une video sur mon projet? je voudrais que cette video soit lu sur une form speciale et non sur un autre fenetre win
Lire un video .avi [ par Supo ]
Quelle controle y faut prendre pour lire un video AVI?
PLAYER DIVX AVI MPG MP3 WAV MID...+fonction autorun [ par NumZ ]
salutje vous propose mon ptit dernier ici.donc le titre en dis bcp je vous laisse découvrir dans le zip tout est compris vous avez juste a le dl<a hre
detecter codec [ par ticapix ]
bonjourcomment faire pour savoir si un codec video est installé.Je distribue un prgm avec une video compressée avec divx 5.02. comment savoir si l'ord
detecter codec [ par ticapix ]
bonjourcomment faire pour savoir si un codec video est installé.Je distribue un prgm avec une video compressée avec divx 5.02. comment savoir si l'ord
|
Derniers Blogs
 [WF4] PASSAGE D'ARGUMENTS LITERAL, VISUALBASICVALUE OU LAMBDAVALUE?[WF4] PASSAGE D'ARGUMENTS LITERAL, VISUALBASICVALUE OU LAMBDAVALUE? par JeremyJeanson
Avec la sortie de la RC de Visual Studio 2010, Microsoft a mis un peu les points sur leS i en ce qui concernait le passage d'arguments. Mais nous somme un certain nombre à avoir pris ce changement comme un coup dur. Pour résumer la situation : à la sortie...
Cliquez pour lire la suite de l'article par JeremyJeanson [RIA SERVICES] INCLUDE ET DOMAINDATASOURCE[RIA SERVICES] INCLUDE ET DOMAINDATASOURCE par Audrey
Dans un de mes articles précédents , j'avais parlé des DomainDataSource avec RIA Services dans le cas d'une interface Maître - Détail. Dans le même principe, je vais parler d'une autre manière de mettre en forme ce cas d'interface avec RIA Services. Et po...
Cliquez pour lire la suite de l'article par Audrey ZUNE : VERSION ZUNE SOFTWARE V 4.2 ET LA SOCIALISATIONZUNE : VERSION ZUNE SOFTWARE V 4.2 ET LA SOCIALISATION par ROMELARD Fabrice
Une des nouveautés de la version V 3.0 était l'apparition de l'onglet Social qui ne fonctionnait que si le MarketPlace était activé sur son poste. Cela limitait donc son intérêt, car hors du cadre commercial USA-CANADA, peu de monde trouva...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice PRATIQUE DE SILVERLIGHT PAR ERIC AMBROSIPRATIQUE DE SILVERLIGHT PAR ERIC AMBROSI par MPOWARE
Je viens de finir la lecture du dernier livre d'
Eric Ambrosi
éditions PEARSON
Son livre donne une approche pratique de Silverlight qui sera aussi bien comprise par le développeur que par le designeur.
Tous les aspects du développement RIA sont abor...
Cliquez pour lire la suite de l'article par MPOWARE APPRENDRE à DéVELOPPER POUR LES MOBILES AVEC LA NOUVELLE GéNéRATION .NETAPPRENDRE à DéVELOPPER POUR LES MOBILES AVEC LA NOUVELLE GéNéRATION .NET par odewit
2 déclinaisons de Silverlight et 2 déclinaisons de Mono permettent dorénavant (ou permettront prochainement) de développer des applications .NET mobiles pour les principales plates-formes du marché :
Silverlight pour Symbian, basé sur Silverlight 2...
Cliquez pour lire la suite de l'article par odewit
Forum
 EVB ET TRAME NMEAEVB ET TRAME NMEA par aymeric1719
Cliquez pour lire la suite par aymeric1719
Logiciels
 Academy System (10.9.4.0)ACADEMY SYSTEM (10.9.4.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System Xilisoft Convertisseur Vidéo Ultimate (5.1.39.0305)XILISOFT CONVERTISSEUR VIDéO ULTIMATE (5.1.39.0305)Xilisoft Convertisseur Vidéo Ultimate est un outil puissant de conversion vidéo, facile à utilise... Cliquez pour télécharger Xilisoft Convertisseur Vidéo Ultimate Xilisoft DVD Ripper Ultimate (5.0.64.0304)XILISOFT DVD RIPPER ULTIMATE (5.0.64.0304)Xilisoft DVD Ripper Ultimate est un logiciel excellent pour copier et convertir DVD vers presque ... Cliquez pour télécharger Xilisoft DVD Ripper Ultimate Rigs of Rods (63.3)RIGS OF RODS (63.3)c'est un jeu de multi-simulation camions,autobus voitures, avions, bateaux, hélicoptère avec défo... Cliquez pour télécharger Rigs of Rods
|