资源描述：
《PowerBuilder中生成应用程序》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。
1、第16章课前准备内容//使用代码配置ODBC数据源（以AdaptiveServerAnywhere9.0为例）/*了解注册表相关信息HKEY_LOCAL_MACHINESOFTWAREODBCODBCINST.INIODBCDRIVERS存放已经注册的ODBC数据源驱动程序HKEY_LOCAL_MACHINESoftwareODBCODBCINST.INI下可对已经注册的ODBC数据源驱动程序进行设置HKEY_LOCAL_MACHINESoftwareODBCODBC.INIODBCDataSources
2、下存放数据源名称及其驱动程序类型HKEY_LOCAL_MACHINESoftwareodbcodbc.ini下存放已经注册的ODBC数据源的具体细节KYEY_LOCAL_MACHINESoftwareMicrosoftwindowsCurrentVersionAppPaths下存放应用程序安装到用户计算机上后在注册表中注册的应用程序名HKEY_LOCAL_MACHINESoftwareMicrosoftwindowsNTCurrentVersion下存放当前计算机中windows安装的相应信息（包括安装
3、路径等）*/问题：如何找到相应的数据库驱动程序这些文件可以在注册表的HKEY_LOCAL_MACHINESoftwareODBCODBCINST.INI下相应键中找到。如asa9.0为dbeng9.EXE、dbodbc9.dll。必备函数：RegistryGet（Key，Valuename，Valuetype，Value）功能：在PowerBuilder程序中读取注册表中的信息。RegistrySet（Key，Valuename，Valuetype，Value）功能：在PowerBuilder程序中设置注册表中的信息。K
4、ey表示主键；Valuename表示键值名；Valuetype表示键值类型；Value表示键值。//一、设置程序所需要的变量Ulongul_numIntanswer,answer1,answer2,answer3,answer4,answer5,ansappStringls_driver,ls_start,ls_location,app_path,db_path,odbcstr第6页共6页第16章课前准备内容//二、判断windows安装路径下是否有AdaptiveServerAnywhere9.0的驱动程序//步骤1：//取
5、windowsxp或windows2000安装目录,并保存到ls_location变量answer=ReGIStryGet("HKEY_LOCAL_MACHINESoftwareMicrosoftwindowsNTCurrentVersion","SystemRoot",RegString!,ls_location)IFanswer=-1THENMessagebox('错误','应用程序无法获取windows的安装目录，系统将终止运行！',Stopsign!)RETURNENDIF//步骤2：//判断AdaptiveS
6、erverAnywhere9.0的驱动程序是否正确安装ls_driver=ls_location+'dbodbc9.dll'ls_start=ls_location+'dbeng9.EXE'IFNOT(FileExists(ls_driver)ANDFileExists(ls_start))THENMessagebox('错误','系统中没有安装AdaptiveServerAnywhere9.0的驱动程序，系统将终止运行！',StopSign!)RETURNelsemessagebox("信息","AdaptiveServ
7、erAnywhere9.0驱动程序已经安装!")ENDIF//三、在ODBC中注册AdaptiveServerAnywhere9.0驱动程序//步骤1：//设置ODBCODBCINST.INIODBCDRIVERSanswer=ReGIStrySet('HKEY_LOCAL_MACHINESOFTWAREODBCODBCINST.INIODBCDRIVERS','AdaptiveServerAnywhere9.0',RegString!,'Installed')IFanswer=-1THENMessagebox('
8、错误','应用程序无法设置ODBCDRIVERS，系统将终止运行！',StopSign!)RETURNENDIF第6页共6页第16章课前准备内容//步骤2：//设置ODBCODBCINST.INIanswer1=ReGIStrySet('HKEY_LOCAL_MACHIN
