[.net2] obtenir des infos. sur un dvd

Soyez le premier à donner votre avis sur cette source.

Vue 11 225 fois - Téléchargée 536 fois

Description

Voici une classe fournissant quelques méthodes afin de récupérer certaines infos d'un dvd video.
Pour la documentation je me suis largement inspiré de projet open-source C sur sourceforge.
Et ayant fais cette source rapidement suite à une demande, je n'ai pas commenté le code mis à part les comments xml sur les méthodes.

Méthodes fournis dans cette classe
-CheckIfDvd
-GetMainlyIfo
-GetNumOfChapters
-GetRegion
-CheckMacrovision
-GetAudioStreams
-GetSubtitles
-RemoveMacrovision
-RemoveRegionCode
-VobIsEncrypted

Concernant les 2 méthodes suivantes 'RemoveMacrovision' et 'RemoveRegionCode' je décline toutes responsabilitées sur l'utilisation que vous en ferez.

Source / Exemple :


Exemple d'utilisation

        Dim c As New IfoInfo

        c.Source = "F:\"
        c.GetMainlyIfo()

        Console.WriteLine("Nombre chapitres: " & c.GetNumOfChapters.ToString)

        Dim bencr As Boolean = IfoInfo.VobIsEncrypted("F:\VIDEO_TS\VTS_01_1.VOB")
        Console.WriteLine("Fichiers VOB encryptés: " & bencr.ToString)

        If bencr Then
            Console.WriteLine("Présence macrovision: Vobs encryptés impossible d'accèder à cette information")
        Else
            Console.WriteLine("Présence macrovision: " & IfoInfo.CheckMacrovision("F:\VIDEO_TS\VTS_01_1.VOB"))
        End If

        Console.WriteLine("Région dvd: " & c.GetRegion)

        Dim streams As String() = IfoInfo.GetAudioStreams("F:\VIDEO_TS\VTS_01_0.IFO")
        For i As Integer = 0 To streams.Length - 1
            Console.WriteLine("Flux audio disponible: " & streams(i))
        Next

        Dim subtitles As String() = IfoInfo.GetSubtitles("F:\VIDEO_TS\VTS_01_0.IFO")

        If subtitles.Length > 0 Then
            Dim sb As New Text.StringBuilder()
            For i As Integer = 0 To subtitles.Length - 1
                sb.Append(subtitles(i) & ",")
            Next
            Console.WriteLine("Total de sous-titres: " & subtitles.Length.ToString)
            Console.WriteLine("Liste des language sous-titrés dispo.: " & sb.ToString)
        Else
            Console.WriteLine("Liste des sous-titres: Aucun sous-titrages dispo.")
        End If

Conclusion :


Si vous avez des questions sur certaines lignes de codes, ne pas hésiter me demander.
Remarques, critiques, notes tout est accepté.

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
2215
Date d'inscription
mardi 11 novembre 2003
Statut
Membre
Dernière intervention
16 juillet 2009
1
Ahh ok, j'avais pas percuté qu'il fallait avoir le dvd dans le lecteur ^^ (c'est vrai que ça devient plus logique lol)
Messages postés
2375
Date d'inscription
jeudi 12 juillet 2001
Statut
Modérateur
Dernière intervention
15 décembre 2018
21
Les infos se trouvent dans les fichiers .IFO et dans l'en-tête des fichiers videos .VOB
http://sourceforge.net/search/?words=dvd+info&type_of_search=soft&limit=100
C'est à partir de nombreuses source notamment C, C# que j'ai pondu celle-ci.
Messages postés
2215
Date d'inscription
mardi 11 novembre 2003
Statut
Membre
Dernière intervention
16 juillet 2009
1
Une question : tu récupère les infos d'ou ? (d'un serveur ? ou alors il faut avoir la base de données qui suit, ou autre ??)
(j'ai pas regardé le code, je suis en vb6)

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.