GESTION DIVX 2 (COLLECTION DIVX / DVD)

cs_Urgo Messages postés 780 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 16 avril 2009 - 10 juil. 2003 à 20:56
darksheer01 Messages postés 3 Date d'inscription mardi 22 mars 2005 Statut Membre Dernière intervention 23 mars 2005 - 23 mars 2005 à 13:07
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/7853-gestion-divx-2-collection-divx-dvd

darksheer01 Messages postés 3 Date d'inscription mardi 22 mars 2005 Statut Membre Dernière intervention 23 mars 2005
23 mars 2005 à 13:07
je suis egalement en train de mettre au point une gestion de videotheque sous vb; normalement on pourra faire pas mal de chose( fiche complete du film avec resume acteur realisateur compositeur, jaquette du film et si je trouve la solution video du film)
si on pourrais me dire comment faire pour la video se serais simpa et je mettrai le prog en ligne pour test

c un projet de fin d annee en universite
algo69 Messages postés 47 Date d'inscription samedi 13 décembre 2003 Statut Membre Dernière intervention 13 mars 2005
13 mars 2005 à 21:32
merci encore titou250
cs_titou250 Messages postés 10 Date d'inscription mercredi 30 avril 2003 Statut Membre Dernière intervention 13 mars 2005
13 mars 2005 à 19:53
je pense qu'il s'agit de la même erreur que pour les emprunts.
Il faut je pense mettre dans la requête SQL un ORDER BY nom_film dans le sub suivant:
mnu_dvd_Click()
ce qui donne:
'-- Requete SQL pour DVD
requete "SELECT * FROM Film WHERE format_film'Dvd' ORDER BY nom_film"
algo69 Messages postés 47 Date d'inscription samedi 13 décembre 2003 Statut Membre Dernière intervention 13 mars 2005
13 mars 2005 à 18:25
j'ai oublié de te dire aussi, quand je click sur la liste des dvd, "Erreur d'execution 35600, index hors limites

" peux tu m'eclairer cela STP ?
algo69 Messages postés 47 Date d'inscription samedi 13 décembre 2003 Statut Membre Dernière intervention 13 mars 2005
13 mars 2005 à 17:42
salut

Merci pour la rectification titou250. ça marche impecable

Bon prog
quintus38 Messages postés 3 Date d'inscription dimanche 9 janvier 2005 Statut Membre Dernière intervention 3 mai 2005
13 mars 2005 à 14:00
c'est tres bien mais admettons que les films soivent stockés sur CD, le prgm reste le meme, sinon le fonction pour lister tous les films d'un repertoire est intéressante
cs_titou250 Messages postés 10 Date d'inscription mercredi 30 avril 2003 Statut Membre Dernière intervention 13 mars 2005
13 mars 2005 à 13:06
Pour Quintus 38 :
J'ai ajouté une fonction permettant de lister TOUT les films d'un répertoire et de les enregistrer directement dans la base de donnée.
Dans ce cas, le nom du film correspond au nom de fichier.
Liste tout le répertoire choisit ainsi que tous les sous repertoire ;)
j'espere avoir répondu à ta demande !

@ ++ Titou
cs_titou250 Messages postés 10 Date d'inscription mercredi 30 avril 2003 Statut Membre Dernière intervention 13 mars 2005
13 mars 2005 à 11:28
Pour Algo69
Je viens de réinstaller VB (que je n'utilise plus bcp !!) et j'ai regarder la source de plus prêt.
Tu as bcp de bug encore dans mon programme.
pour ton erreur, j'ai ajouter un "ORDER BY nom_film dans la requête SQL du bloc Private Sub mnulistE_Click()

Depuis ca marche (je ne sais pas trop pourquoi ??

Ensuite, il faut aussi ajouter une condition IF dans le block
Private sub List_Click() :
'-- Vérifie qu'il existe une entrée
If Rs.BOF True And Rs.EOF False Then
..............
lbl_annee.Caption = Rs!annee
End If
chk_pret.Visible = True

et
' affich les valeurs
If Rs.BOF True And Rs.EOF False Then
lbl_date = Rs!date_pret
txt_nom = Rs!pret_film
End If

Voila, sinon, il reste d'autres bug que je regarderai quand j'aurai 2 3 minute. LA source qui est en DL sur vbfrance corrige ces 2 bug ;)

Pour Quintus: Oui, c'est clair que c long et très chiant, mais tu n'es pas obligé de remplir toutes les cases.
Le mieux serait peut être de pouvoir lancer une recherche sur un répertoire, de prendre le nom des fichiers AVI et de les ajouter directement dans la base en les considérant comme les noms de film.
Ensuite à chacun de rajouter les info qu'il veux.. A voir donc ;)
quintus38 Messages postés 3 Date d'inscription dimanche 9 janvier 2005 Statut Membre Dernière intervention 3 mai 2005
12 mars 2005 à 13:14
je ne critique pas ton prgm, mais lorsque l'on a plus de 200 divx (attention je ne dis pas que c'est mon cas) à entrer dans la liste et à saisir tous les paramètres (langue, qualité, ...) c'est tres long et tres ch**** à faire
algo69 Messages postés 47 Date d'inscription samedi 13 décembre 2003 Statut Membre Dernière intervention 13 mars 2005
18 févr. 2005 à 19:36
salut
pas mal ton truc. Mais quand je click la liste des emprunts Erreur d'execution 35600, index hors limites

et si je click sur debogage, le code correspondant est :

CodeFilm = List.ListItems(List.SelectedItem.Index).ListSubItems(3).Text

peux tu m'expliquer why, Merci (car suis debutant)
ewans61 Messages postés 5 Date d'inscription mardi 22 janvier 2002 Statut Membre Dernière intervention 6 février 2007
16 janv. 2005 à 10:14
superbe source. seul petit bemole, on ne peux affichier une jaquette. Note: 9/10, bravo!!!! continue.
"Bugzzy"
pouda Messages postés 264 Date d'inscription mercredi 18 décembre 2002 Statut Membre Dernière intervention 27 octobre 2014
13 avril 2004 à 20:44
ton interface est assez jolie et encor j'en suis sur que tu pourrai mieu faire bref ton code a l'iar assez complet par contre pense au débogage , a chaque clique g ne erreur ca ce resoud mia bon ca soule

Bonne continuation j te met 7/10
bib39 Messages postés 1 Date d'inscription vendredi 23 janvier 2004 Statut Membre Dernière intervention 31 janvier 2004
31 janv. 2004 à 17:32
Moi je trouve que ton programme est super sympa ;-)

Ca fait longtemps que je cherche un programme de gestion de Divx et je n'étais jamais satisfait de l'interface...

Je te mets 10/10

Merci et continues comme ça :-)
cs_titou250 Messages postés 10 Date d'inscription mercredi 30 avril 2003 Statut Membre Dernière intervention 13 mars 2005
11 juil. 2003 à 16:26
J'ai corriger la faute d'orthographe, et je veux bien 1 ou 2 exemples de "design" sous vb !
Pour la fonction de prêt, je ne me suis pas inspiré de celle de xtag, mais elle doit être semblable.
C juste un chps texte qui s'active ou non, et un bouton "enregistrer" pour mettre la base à jour.
Elle est toute simple.
cs_Urgo Messages postés 780 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 16 avril 2009 1
11 juil. 2003 à 13:52
Et aussi : dans ta source en bas (en italique) y'a une faut d'orthographe, "générale" ça prend un "s" lol meme si on s'en fou
++
cs_Urgo Messages postés 780 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 16 avril 2009 1
11 juil. 2003 à 13:50
En plus t'as mis une capture et ça c excellent, donc bonne prog pour la quite et si tu veux des exemples de jolies design, répond moi et je te file 1 ou 2 de mes sources ;)
cs_Urgo Messages postés 780 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 16 avril 2009 1
11 juil. 2003 à 13:48
Oui, mais le gris ça commence à bien faire, bon c ta première source donc je vais rester indulgent et te mettre un 8/10
dsl de t'avoir vexer
Saros Messages postés 921 Date d'inscription vendredi 20 décembre 2002 Statut Membre Dernière intervention 23 septembre 2010
11 juil. 2003 à 13:38
C'est vrai que là, Urgo, deux fois dans la même journée, c'est un peu fort...
Une question, tu ne te serais pas inspiré de Xtag pour la fonction de prêt ?
cs_titou250 Messages postés 10 Date d'inscription mercredi 30 avril 2003 Statut Membre Dernière intervention 13 mars 2005
11 juil. 2003 à 00:18
Bien Urgo ! On voit les messages constuctifs ! C mon premier programme en VB, je l'ai mis en niveau 1 et c pas pour rien ....
Je ne me considere pas comme un pro, si tu cherche du design regarde autre chose au lieu de critiquer comme ça !
cs_Urgo Messages postés 780 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 16 avril 2009 1
10 juil. 2003 à 20:56
Moche
Fait un design, j'attens pour la note
Rejoignez-nous