YOMMCDDB V2 - INTERROGEZ LA CDDB ( CDAUDIO ET ALBUM MP3) VERSION CLASS

Signaler
Messages postés
515
Date d'inscription
dimanche 17 février 2002
Statut
Membre
Dernière intervention
10 mars 2008
-
Mayzz
Messages postés
2811
Date d'inscription
mardi 15 avril 2003
Statut
Membre
Dernière intervention
26 novembre 2013
-
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/24263-yommcddb-v2-interrogez-la-cddb-cdaudio-et-album-mp3-version-class

Mayzz
Messages postés
2811
Date d'inscription
mardi 15 avril 2003
Statut
Membre
Dernière intervention
26 novembre 2013
24
mciSendCommand effectivement ^^
OK pour le MP.
moogliber
Messages postés
40
Date d'inscription
lundi 26 septembre 2005
Statut
Membre
Dernière intervention
5 janvier 2012

Je n'ai pas de mciSendString. Tu veux surement parler de mciSendCommand ? chez moi il retourne un integer (apres migration).
Si ca t'interesse je peux t'envoyer le code migré en MP, peut-être qu'a tout les 2 on y arrivera. Je te contacte en MP.
Mayzz
Messages postés
2811
Date d'inscription
mardi 15 avril 2003
Statut
Membre
Dernière intervention
26 novembre 2013
24
Oui c'est bien ce que je dis, ca bug, même après avoir traduit VB.Net ne supporte pas cette API (je l'ai expérimenté pour d'autres softs).

Juste pour savoir: que retourne ta déclaration mciSendString ? Un Interger ou un long ? Pour rappel les longs de VB6 sont à convertir en Integers en .Net.

Mais bon on ne va pas épiloguer sur le sujet, ce sont ici les commentaires de la source c'est pas l'endroit pour ca, au pire si t'as vraiment besoin d'un coup de main, ouvre un thread sur le forum et file moi le lien en MP.
moogliber
Messages postés
40
Date d'inscription
lundi 26 septembre 2005
Statut
Membre
Dernière intervention
5 janvier 2012

J'ai bien résolu le pb des "Any" mais je rencontre d'autres problème, que je n'arrive pas à resoudre pr l'instant.
notamment la ligne
Scode mciSendCommand(0, MCI_OPEN, MCI_OPEN_TYPE Or MCI_OPEN_ELEMENT, mciOpenParms)
> j'ai l'erreur Erreur"Une valeur de type 'Project1.ModCDAudio.MCI_OPEN_PARMS' ne peut pas être convertie en 'Integer'."...
et plusieurs autres erreurs que je ne comprends pas du tout
En faisant beaucoup de ménage, j'arrive à exécuter le prog, mais j'ai toujours l'erreur 106 "erreur de lecture du CD"

Quand a faire une DLL activeX , je trouve ça effectivement pas tres clean, et risqué avec Windows 7.

Si quelqu'un a reussi la migration, merci de votre aide.
Mayzz
Messages postés
2811
Date d'inscription
mardi 15 avril 2003
Statut
Membre
Dernière intervention
26 novembre 2013
24
En effet il y a un souci d'API, le type "Any" n'existe plus en .Net, il faut jouer avec les IntPtr et Marshal, j'avais tenté mais il y eu un bug donc impossible de traduire la source si mes souvenirs sont exacts. Tu peux quand même tenter grâce à ce tuto => http://www.vbfrance.com/tutoriaux/APPELS-APIS-VB-NET-CONVERSION-CODE-VB6-VERS_335.aspx

D'autre part tu peux créer une DLL activeX en VB6 servant de classe de base pour les APIs et l'intégrer à ton projet .Net, c'est pas très propre car ton projet aura une dépendance COM à inscrire dans le registre mais avec une bonne solution de déploiement ça passe, tout dépend de ce que tu veux en faire.

Voila @+
moogliber
Messages postés
40
Date d'inscription
lundi 26 septembre 2005
Statut
Membre
Dernière intervention
5 janvier 2012

Très bonne source, tout fonctionne à merveille, mais impossible de migrer ce projet en VB.NET. Quelqu'un par hasard aurait la même chose en .NET ?
ghuysmans99
Messages postés
2501
Date d'inscription
jeudi 14 juillet 2005
Statut
Contributeur
Dernière intervention
5 juin 2016
1
Quand j'essaie de l'utiliser, j'ai une erreur :
"Erreur de communication ou adresse du serveur incorrecte"

Pourquoi ?
Mayzz
Messages postés
2811
Date d'inscription
mardi 15 avril 2003
Statut
Membre
Dernière intervention
26 novembre 2013
24
Au fait il maque "DirExplorer.ocx" à ta source !
Mayzz
Messages postés
2811
Date d'inscription
mardi 15 avril 2003
Statut
Membre
Dernière intervention
26 novembre 2013
24
Salut !

Petit bug de rien du tt = >>

remplacer:
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive & ""
End Sub
Par:
Private Sub Drive1_Change()
Dir1.Path = Left(Drive1.Drive, 2) & ""
End Sub
Pour ceux qui ont un nom de volume !

Mais sinon ca marche très bien ché moi

Très bonne source bien commenté je met un 9/10
yomm
Messages postés
515
Date d'inscription
dimanche 17 février 2002
Statut
Membre
Dernière intervention
10 mars 2008
2
pour les pdf normal , mon site passé sous linux à rencontré kelkes souci ;-)

sinon voilà les liens directs :

http://yomm.no-ip.com/dl/YommCDDB.pdf
et
http://yomm.no-ip.com/dl/YommMp3Tag.pdf

voilà...

PS : c'est l'unique documentation existante

désolé ...mais si tu as des questions n'hésite pas...
nikoms
Messages postés
2
Date d'inscription
mercredi 4 août 2004
Statut
Membre
Dernière intervention
6 avril 2005

En fait ton lien vers le PDF ne marche pas :) Idem pour le TAG ID3... J'arrive pas a utilisé tes classes qui sont protected.. Je vois pas trop comment faire :\
nikoms
Messages postés
2
Date d'inscription
mercredi 4 août 2004
Statut
Membre
Dernière intervention
6 avril 2005

Salut yomm!

Tout d'abord félicitation pour ce que tu fais pour les tag MP3, c'est nickel ce dont j'avais besoin :)

As-tu par hasard fait une doc ou quelque chose dans ce gout la? Je commence juste a utiliser ton OCX, donc je dois avouer que je n'ai pas encore vraiment chercher.

Je voudrais trouver différente proposition (ou la meilleure) en fonction d'un mp3 choisi...

Voila,

Encore bravo!

@+
yomm
Messages postés
515
Date d'inscription
dimanche 17 février 2002
Statut
Membre
Dernière intervention
10 mars 2008
2
en fait cela peut venir de l'encodeur utilisé pour tes mp3...il se peut qu'un seul de tes mp3 possède une erreur pour ke l'album ne puisse etre reconnue...pour info si tu regardes mon source YommMp3Tool V2 tu pourras voir k'un utilisateur avait ce problème à cause d'un mauvais encodage bien k'il utilisait Lame...Enfin voilà, j'espère ke ton problème se corrigera...

Je te proporse un test ki peut etre révélatoire...essai de réencoder un de tes album qui ne marche pas avec un logiciel utilisant une version récente de lame...essai évidemment de tester avec un album ki te semble correcte...cela peut éventuellement corriger ton problème

@+ et bon courage
astuceur
Messages postés
38
Date d'inscription
lundi 10 février 2003
Statut
Membre
Dernière intervention
21 septembre 2008

apres ton commentaire j'ai reteter encore quelques albums et après un 15e çà a marcher.

donc il fo que je revoi les tag de mes mp3
merci
yomm
Messages postés
515
Date d'inscription
dimanche 17 février 2002
Statut
Membre
Dernière intervention
10 mars 2008
2
>>astuceur

je suis surpris que cela ne fonctionne pas chez toi... cela ne fonctionne avec aucun de tes albums???

test mon source sur les TagID3 afin de vérifier si au moins les tags sont bien lu!!!

@+
astuceur
Messages postés
38
Date d'inscription
lundi 10 février 2003
Statut
Membre
Dernière intervention
21 septembre 2008

pas mal , mais çà marche pas avec les mp3 chez moi !
yomm
Messages postés
515
Date d'inscription
dimanche 17 février 2002
Statut
Membre
Dernière intervention
10 mars 2008
2
et bien ça en fera au moins 1 ;-)
cs_CrAzYb
Messages postés
9
Date d'inscription
samedi 10 avril 2004
Statut
Membre
Dernière intervention
30 juillet 2006

ehe :=)
je telecharge et apres je commenterais :=)

bon courrage.
yomm
Messages postés
515
Date d'inscription
dimanche 17 février 2002
Statut
Membre
Dernière intervention
10 mars 2008
2
vous avez le droit de mettre des commentaires ;-)
yomm
Messages postés
515
Date d'inscription
dimanche 17 février 2002
Statut
Membre
Dernière intervention
10 mars 2008
2
vous avez le droit de mettre des commentaire ;-)