Intégrer un fichier dans un fichier EXE en VB6

Question

J'essaie de créer un programme d'installation en VB6 qui installera tous les fichiers nécessaires au programme.

J'utilise un fichier CSV pour stocker les données et les lire à l'aide de :

file="C:\users\admin\desktop\table.csv"
Open file For Input As fnum

Cependant, le fichier EXE ne peut pas être exécuté sur un autre ordinateur portable, car j'obtiens l'erreur " file not found ".

Ainsi : comment intégrer ce document CSV dans le fichier .EXE afin que le programme puisse être exécuté sur n'importe quel PC Windows ?

Answer 1

1. Ouvrez le projet, Compléments ouvrir l'option de menu Ajout et double-cliquez sur l'icône Éditeur de ressources VB6 pour le charger, fermer le gestionnaire.

2. Cliquez sur Projet puis Ajouter un nouveau fichier de ressources en bas. Saisissez un nom de fichier et enregistrez-le dans le répertoire où se trouvent vos fichiers de code.

3. A partir de la Explorateur de projet double clic sur l'arbre XXX.RES de la nouvelle Documents connexes nœud.

4. Sélectionner Ajouter une ressource personnalisée dans la barre d'outils de la fenêtre qui s'affiche

5. Naviguez jusqu'à votre fichier .csv et ajoutez-le, vous devriez le voir ajouté en tant que PERSONNALISÉ \101

6. Il sera désormais intégré dans l'exe au moment de la compilation. Si le fichier change, ajoutez-le à nouveau à la ressource, il y a une limite de 64k par entrée.

7. Pour le charger dans le code au moment de l'exécution :

   strCSV = strconv(LoadResData(101, "CUSTOM"), vbunicode)