### PB8程序发布及动态配置ODBC及获取系统SYSTEM目录
#### 一、PB8程序发布所需文件
在发布PB8程序时，需要确保一系列关键文件被正确打包以支持程序的顺利运行。以下是对文件需求的详细介绍：
1. **PB运行环境动态连接库**
- **pbvm80.dll**：PowerBuilder虚拟机，负责执行应用程序的核心部分。
- **libjcc.dll**：Java互操作支持库。
- **pbdwe80.dll**：用于数据窗口对象的支持。
**必要的Microsoft接口**（通常位于`%SystemRoot%\system32`目录下）
- **Msvcrt.dll**：Microsoft C运行时库。
- **Msvcrt40.dll**：另一个版本的C运行时库。
- **Olepro32.dll**：OLE自动化支持库。
**可能需要的其他DLL文件**
- **dblgen7.dll**：DBGen工具库。
- **dbcon7.dll**：数据库连接管理库。
- **dbserv7.dll**：数据库服务引擎库。
- **dbctrs7.dll**：数据库控制台工具库。
2. **PB8与数据库客户端的专用接口或ODBC接口**
- **pbodb80.dll**：PB ODBC专用接口，适用于SQL Anywhere等数据库。
- **pbodb80.ini**：配置文件，定义ODBC数据源的参数。
3. **PB应用程序及其依赖**
- **应用程序的EXE和PBD/DLL文件**：应用程序主执行文件及编译后的数据窗口对象文件或动态链接库。
4. **SQL Anywhere7相关文件**
- **dbeng7.exe**：SQL Anywhere数据库引擎。
- **dblib7.dll**：SQL Anywhere数据库库。
- **dbodbc7.dll**：SQL Anywhere ODBC驱动。
- **dbodtr7.dll**：SQL Anywhere跟踪工具库。
- **dbcoen7.hlp**：帮助文件。
**SQL Anywhere7 DB文件**
- **仅包含*.db文件**：包含数据库数据的文件。
- **不包括*.log文件**：避免可能导致的问题。
5. **ODBC相关文件**
- 若目标计算机未安装ODBC，则需提供以下文件：
- **Ds16gt.dll**、**Ds32gt.dll**、**Odbc16gt.dll**、**Odbc32.dll**、**Odbc32gt.dll**：ODBC驱动程序文件。
- **Odbcad32.exe**、**Odbccp32.cpl**、**Odbccp32.dll**、**Odbccr32.dll**、**Odbcinst.cnt**、**Odbcinst.hlp**、**Odbcint.dll**、**Odbctrac.dll**：ODBC配置工具和文档。
#### 二、使用InstallShield完成PB8程序发布
**使用InstallShield完成PB8程序发布的主要步骤如下：**
1. **定制安装界面**：根据应用特性设计友好的用户安装界面。
2. **复制文件**：确保所有必需文件被正确复制到目标计算机的适当位置。
3. **编写更改注册表、程序组等的脚本**：通过脚本自动完成注册表更新、创建程序快捷方式等。
4. **生成setup文件**：生成最终的安装包文件。
#### 三、动态配置ODBC
**在程序中动态配置ODBC的方法：**
1. **原理**：通过修改系统注册表中的ODBC相关键值来配置数据源。
2. **主要注册表键**
- **HKEY_LOCAL_MACHINE\Software\ODBC\ODBCINST.INI\ODBC Drivers**：记录已安装的ODBC驱动程序。
- **HKEY_LOCAL_MACHINE\Software\ODBC\ODBCINST.INI**：记录ODBC驱动程序相关信息。
- **HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\ODBC Data Sources**：记录数据源类型。
- **HKEY_CURRENT_USER\Software\ODBC\ODBC.INI**：记录数据源详细信息。
**实现示例**（PB8，WIN2000）：
为了防止重复配置ODBC，可以设置一个配置文件来记录配置状态，或者检查注册表中是否存在相应的键值。这里采用配置文件的方法。
```powerbuilder
int rc
rc = profileint("C:\\ABC_LOT\\SQL_AnyWhere\\abclot.ini", "start", "first", 1)
if rc = 1 then // 初次运行
int test
test = RegistrySet("HKEY_LOCAL_MACHINE\Software\ODBC\ODBCINST.INI\ODBC Drivers", "Adaptive Server Anywhere8.0", RegString!, "Installed")
if test <> 1 then
messagebox("ERROR", "无法设置ODBC配置，请检查权限。")
end if
end if
```
上述代码片段首先检查配置文件`abclot.ini`中的“first”键是否为1，如果是1，则表示这是第一次运行程序。接着通过`RegistrySet`函数更新注册表中的ODBC驱动器信息，并在失败时显示错误消息。这样，可以在程序首次运行时自动完成ODBC的配置工作，简化用户的使用过程。
VIP享7折，此内容立减4.47元 
