pb oracle utf8,用pb连接不同字符集的oracle方法如下

用pb连接不同字符集的oracle方法如下

用PB 连接不同字符集的ORACLE 方法如下： 1. 方法一： 版本：PB5,PB6,PB8,PB9,PB11 说明：通过程序动态修改 WINDOW 平台中注册表中的 NLS_LANG。 //修改客户端字符集为 ZHS16GBK string ls_nls_lang ls_nls_lang = “SIMPLIFIED CHINESE_CHINA. ZHS16GBK“ RegistrySet( “HKEY_LOCAL_MACHINE\Software\ORACLE“,“NLS_LANG“,regstring!,ls_nls_lang) //进行数据库连接 Connect using sqlca; //重新修改客户端字符集为 US7ASCII ls_nls_lang = “AMERICAN_AMERICA.US7ASCII“ RegistrySet( “HKEY_LOCAL_MACHINE\Software\ORACLE“,“NLS_LANG“,regstring!,ls_nls_lang) 缺点：不太稳定 2. 方法二 版本：PB5,PB6,PB8,PB9,PB11 说明：通过程序动态修改 WINDOW 平台中的环境变量的 NLS_LANG。 //在 global external function 中增加以下外部 API 函数 FUNCTION ulong SetEnvironmentVariable(ref string lpName,ref string lpValue) LIBRARY “.dll“ ALIAS FOR “SetEnvironmentVariableA“ //修改 WINDOW 平台中环境变量 NLS_LANG 为 ZHS16GBK SetEnvironmentVariableA (“NLS_LANG“, “SIMPLIFIED CHINESE_CHINA. ZHS16GBK“) //进行数据库连接Connect using sqlca; //修改回 WINDOW 平台中环境变量 NLS_LANG 为 US7ASCII SetEnvironmentVariableA (“NLS_LANG“, “AMERICAN_AMERICA.US7ASCII“) 缺点：不太稳定 3. 方法三 版本：PB9 说明：通过 JDBC 连接数据库时默认是采用 ZHS16GBK 的字符集。 1. 复制 C:\Program Files\Sybase\Shared\PowerBuilder\jdk14 目录到程序的运行目录下。 2. 复制 pbjdc90.dll 到程序运行目录下(pb 调用 JDBC 的 DLL ，通常在 PB 安装目录下在的 SHARE 目录下) 3. 复制 ojdbc14.jar 到程序运行目录下(ORACLE 的 JDBC 驱动, 通常在 ORACLE 安装目录的 JDBC 目录下) 4. 增加客户机的系统环境变量 classpath=c:\xxxxx\pbjdc90.dll;c:\xxxx\ojdbc14.jar //通过 JDBC 连接数据库 SQLCA.DBMS = “JDBC“ SQLCA.LogPass = SQLCA.LogId = “zyclinic“ SQLCA.AutoCommit = False SQLCA.DBParm = “Driver= oracle.jdbc.driver.OracleDriver ,URL= jdbc:oracle:thin:@192.168.17.86:1521:oracle “ CONNECT USING SQLCA; 4. 方法四 版本：PB11 说明：连接时，通过设置 DBParm 参数中的字符集参数进行连接。 //连接 US7ASCII SQLCA.DBMS = “O10 Oracle10g (10.1.0)“ SQLCA.ServerName = “database“SQLCA.LogId = “zyclinic“ SQLCA.LogPass = “123456” SQLCA.AutoCommit = False //使用本地的 NLS_LANG 中的字符集进行连接。如本地的 NLS_LANG= AMERICAN_AMERICA.US7ASCII，则使用该字符集连接。 SQLCA.DBParm = “NLS_Charset= Local “ Connect using SQLCA; //连接 ZHS16GBK ，如本地的 NLS_LANG= AMERICAN_AMERICA.US7ASCII，该 连接方式仍然采用 ZHS16GBK 进行数据库连接。 SQLCA.DBMS = “O10 Oracle10g (10.1.0)“ SQLCA.ServerName = “database“ SQLCA.LogId = “zyclinic“ SQLCA.LogPass = “123456 SQLCA.AutoCommit = False SQLCA.DBParm = ““ Connect using SQLCA;