vb6 - 在VB6中将文件嵌入到EXE文件中

Question

我正在尝试在 VB6 中制作一个安装程序，它将安装该程序所需的所有文件。

我使用 CSV 文件来存储数据并使用以下方法读取它：

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

但是，当我收到错误“”时，无法在另一台笔记本电脑上执行 EXE 文件file not found。

那么：如何将此 CSV 文档嵌入到 .EXE 文件中，以便程序可以在任何 Windows PC 上运行？

Answer 1

1. 打开项目，加载项菜单项，打开加载项管理器并双击VB6 资源编辑器加载它，关闭管理器。

2. 单击项目菜单项，然后单击底部的添加新资源文件。为其输入文件名并将其保存在包含代码文件的目录中。

3. 在Project Explorer树中，双击新的相关文档节点中的XXX.RES 。

4. 在弹出的窗口的工具栏中选择添加自定义资源

5. 浏览到您的 .csv 并添加它，您应该会看到它添加为CUSTOM\101

6. 它现在将在编译时嵌入到 exe 中。如果文件更改，请将其重新添加到资源中，每个条目有 64k 限制。

7. 在运行时将其加载到代码中：

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