Moi qui suis justement un utilisateur de VB5, tu pourrai aussi par exemple, corriger les Classes en cherchant leur emplacement en lisant le fichier *.vbp
sur mon PC je recevais justement l'erreur 52 a partir du code que tu propose parceque le shell passait le nom de fichier à mon prog avec des doubles-quotes, donc je les supprimais dans le code d'origine, mais apparamment ça fait pas ça partout.
Pareil pour la BDR j'avais pas de pb, mais mon PC est peut-etre bizzare ;p
Bon ben voilà, en corrigeant comme suit, cela passe :
1) dans InscriptInWinReg(), ajouter un "" dans la clé passée à RegEcrire, on a donc :
Call RegEcrire(0, "HKEY_CLASSES_ROOT\VisualBasic.Project\shell\VB62VB5", "Convertir pour VB5.0")
Call RegEcrire(0, "HKEY_CLASSES_ROOT\VisualBasic.Project\shell\VB62VB5\command", CheminApplication)
>>> l'inscription dans la BDR est maintenant correcte
2) dans TraitVB6File(), remplacer :
Sourc = Left(Right(txtVB6, (Len(txtVB6) - 1)), (Len(txtVB6) - 2))
par
Sourc = command()
7 nov. 2006 à 21:05
26 avril 2006 à 16:22
Les exe sont automatiquement supprimés des ZIP lors de l'upload !!!
Ceci afin d'éviter la propagation de virus !
26 avril 2006 à 15:39
26 avril 2006 à 14:26
Pareil pour la BDR j'avais pas de pb, mais mon PC est peut-etre bizzare ;p
Je vais qd meme corriger les erreur, merci
>>>A bon les exe st supprimés des zips :o
24 avril 2006 à 10:27
1) dans InscriptInWinReg(), ajouter un "" dans la clé passée à RegEcrire, on a donc :
Call RegEcrire(0, "HKEY_CLASSES_ROOT\VisualBasic.Project\shell\VB62VB5", "Convertir pour VB5.0")
Call RegEcrire(0, "HKEY_CLASSES_ROOT\VisualBasic.Project\shell\VB62VB5\command", CheminApplication)
>>> l'inscription dans la BDR est maintenant correcte
2) dans TraitVB6File(), remplacer :
Sourc = Left(Right(txtVB6, (Len(txtVB6) - 1)), (Len(txtVB6) - 2))
par
Sourc = command()
et
Cibl = Right(Left(txtVB6, Len(txtVB6) - 4), (Len(txtVB6) - 5)) & "Bis.vbp"
par
Cibl = Sourc & ".bis.vbp"
>> plus d'erreur '52'
@+,
Derick
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.