- Visual Basic / VB.NET : Dual language vb6 developpez en français compilez en anglais(pas de v
- Visual Basic / VB.NET : Patcher le compilateur vb6 pour qu'il compile des exes autonomes(sans vb6fr.
- Ajouter des fonctions a vb6 (etude, assembleur x86, compilation)
- Développement d'un compilateur C vers ByteCode pour machine virtuelle
- Formatage, nombre type francais, en type anglais.
Que faut-il faire exactement? Ca fonctionne car vous partez du principe que MSVBVM60.DLL existe toujours sur les machines recevant votre exe. Est-ce vraiment toujours le cas ?
Merci pour les info.
tout dépend où tu as le droit d'aller, sur les téléchargements MSDN^^
Perso pour evite la dependance j'utilise un code beaucoup plus simple et jusqu'a aujourd'hui je n'ai eu aucun bug.
Private Sub setFileAnalyser(ByVal strFileName As String)
' DECLARATION DES VARIABLES.
Dim lngI As Long
Dim lngJ As Long
Dim lngFile As Long
Dim lngCanal As Long
Dim strTemps As String
Dim strResult As String
' CHARGEMENT DU FICHIER SOURCE EXECUTABLE.
If FileExist(strFilePath & strFileName) Then
lngCanal = FreeFile
Open strFilePath & strFileName For Binary Shared As #lngCanal
strResult = Space(LOF(lngCanal))
Get #lngCanal, , strResult
Close #lngCanal
If Mid$(strResult, 1, 2) = "MZ" Then
lngFile = Len(strResult)
lngJ = InStr(1, strResult, "VB6FR.DLL" & Chr(&H0) & Chr(&H0) & Chr(&H0))
Do Until lngJ = 0
lngI = lngI + 1
Call setProgressBar(0, lngJ, lngFile)
Mid(strResult, lngJ, 12) = "MSVBVM60.DLL"
lngJ = InStr(lngJ + 1, strResult, "VB6FR.DLL" & Chr(&H0) & Chr(&H0) & Chr(&H0))
Loop
End If
End If
End Sub
cordialement
GallyHC