Oracle不装客户端的办法:
PB9 + Oracle9iR2 不装客户端的安装办法,总文件不超过36M。
1,取己安装并配置好的Oracle客户端文件拷贝本地磁盘
目录: ../Oracle/ora92/network/ADMIN/ 必需文件: tansnames.ora
../Oracle/ora92/network/mesg/ 所有文件
../Oracle/ora92/bin/ 所有的DLL文件,其他可以不要
../Oracle/ora92/ocmmon/nls/ADMIN/DATA/ 所有文件
../Oracle/ora92/ocmmon/nls/mesg/ 所有文件
../Oracle/ora92/oracore/mesg/ 所有文件
../Oracle/ora92/oracore/zoneinfo/ 所有文件
2, 增加注册表 (可以通过PB写到注册表内)
[HKEY_LOCAL_MACHINE/SOFTWARE/ORACLE/HOME0]
"ORACLE_HOME_NAME"="OraHome92"
"ORACLE_HOME"="C://oracle//ora92" //Oracle客户端文件路径
"NLS_LANG"="SIMPLIFIED CHINESE_CHINA.ZHS16GBK" //字符集
3,增加环境变量
// 注册表路径
[HKEY_LOCAL_MACHINE/SYSTEM/CurrentControlSet/Control/Session Manager/Environment]
如:"Path"="%SystemRoot%/system32;%SystemRoot%;%SystemRoot%/System32/Wbem;c:/oracle/ora92/bin"
// 加在最后
建议把Oracle客户端文件放到当前应用目录下,注册表操作通PB的RegistrySet()写入,如:
// Oracle 客户端文件请放在程序目录下边: gs_directory/Oracle/ora92/...
ls_dir = ls_dir + '/Oracle/ora92'
li_rtn = RegistrySet("HKEY_LOCAL_MACHINE/SOFTWARE/ORACLE/HOME0", "ORACLE_HOME_NAME", RegString!, "OraHome92")
li_rtn = RegistrySet("HKEY_LOCAL_MACHINE/SOFTWARE/ORACLE/HOME0", "ORACLE_HOME", RegString!, ls_dir)
li_rtn = RegistrySet("HKEY_LOCAL_MACHINE/SOFTWARE/ORACLE/HOME0", "NLS_LANG", RegString!, "SIMPLIFIED CHINESE_CHINA.ZHS16GBK")
//环境变量Oracle动态库文件路径: gs_directory/Oracle/ora92/bin/
ls_dir = ls_dir + '/bin'
li_rtn = RegistryGet("HKEY_LOCAL_MACHINE/SYSTEM/CurrentControlSet/Control/Session Manager/Environment","Path", RegExpandString!, ls_path)
li_pos = Pos(ls_path,ls_dir,1)
If li_rtn <> 1 Then
Messagebox('错误','注册表读写失败!')
Return
End If
If li_pos <= 0 Then
If Len(ls_path) > 0 Then
ls_path = ls_path + ";"+ls_dir
ElseIf Len(ls_path) <= 0 Then
ls_path = ls_dir
End If
li_rtn = RegistrySet("HKEY_LOCAL_MACHINE/SYSTEM/CurrentControlSet/Control/Session Manager/Environment","Path", RegExpandString!, ls_path)
End If
If li_rtn <> 1 Then
Messagebox('错误','注册表读写失败!')
Return
End If
Messagebox('提示','配置完毕,请重启Windows生效!')