- 论坛徽章:
- 0
|
谢谢,麻烦你看一下。
1. sqlplus可以连接成功。
2. 系统的环境变量:
Microsoft Windows [版本 6.1.7601]
版权所有 (c) 2009 Microsoft Corporation。保留所有权利。
C:\Windows\System32>set
ALLUSERSPROFILE=C:\ProgramData
APPDATA=C:\Users\Administrator\AppData\Roaming
CommonProgramFiles=C:\Program Files\Common Files
CommonProgramFiles(x86)=C:\Program Files (x86)\Common Files
CommonProgramW6432=C:\Program Files\Common Files
COMPUTERNAME=LYJ
ComSpec=C:\Windows\system32\cmd.exe
FP_NO_HOST_CHECK=NO
HOMEDRIVE=C:
HOMEPATH=\Users\Administrator
LOCALAPPDATA=C:\Users\Administrator\AppData\Local
LOGONSERVER=\\LYJ
NLS_LANG=SIMPLIFIED CHINESE_CHINA.ZHS16GBK
NUMBER_OF_PROCESSORS=2
ORACLE_HOME=E:\app\Administrator\product\12.1.0\dbhome_2
OS=Windows_NT
Path=E:\app\Administrator\product\12.1.0\dbhome_2\bin;E:\app\Administrator\produ
ct\12.1.0\dbhome_1\bin;D:\instantclient_12_1\bin;D:\Perl\site\bin;D:\Perl\bin;D:
\Program Files (x86)\ActiveState Perl Dev Kit 9.3\bin\;D:\Program Files\ActiveSt
ate Perl Dev Kit 9.3\bin\;D:\Perl64\site\bin;D:\Perl64\bin;C:\Program Files (x86
)\NVIDIA Corporation\PhysX\Common;C:\Windows\system32;C:\Windows;C:\Windows\Syst
em32\Wbem;C:\Windows\System32\WindowsPowerShell\v1.0\;D:\Program Files\Microsoft
SQL Server\110\DTS\Binn\;D:\Program Files (x86)\Microsoft SQL Server\110\Tools\
Binn\;D:\Program Files\Microsoft SQL Server\110\Tools\Binn\;D:\Program Files (x8
6)\Microsoft SQL Server\110\Tools\Binn\ManagementStudio\;C:\Program Files (x86)\
Microsoft Visual Studio 10.0\Common7\IDE\PrivateAssemblies\;D:\Program Files (x8
6)\Microsoft SQL Server\110\DTS\Binn\;;d:\Dwimperl\perl\bin;d:\Dwimperl\perl\sit
e\bin;d:\Dwimperl\c\bin;
PATHEXT=.COM;.EXE;.BAT;.CMD;.VBS;.VBE;.JS;.JSE;.WSF;.WSH;.MSC
PROCESSOR_ARCHITECTURE=AMD64
PROCESSOR_IDENTIFIER=Intel64 Family 6 Model 15 Stepping 13, GenuineIntel
PROCESSOR_LEVEL=6
PROCESSOR_REVISION=0f0d
ProgramData=C:\ProgramData
ProgramFiles=C:\Program Files
ProgramFiles(x86)=C:\Program Files (x86)
ProgramW6432=C:\Program Files
PROMPT=$P$G
PSModulePath=C:\Windows\system32\WindowsPowerShell\v1.0\Modules\;D:\Program File
s (x86)\Microsoft SQL Server\110\Tools\PowerShell\Modules\
PUBLIC=C:\Users\Public
SESSIONNAME=Console
SystemDrive=C:
SystemRoot=C:\Windows
TEMP=C:\Users\ADMINI~1\AppData\Local\Temp
TMP=C:\Users\ADMINI~1\AppData\Local\Temp
USERDOMAIN=LYJ
USERNAME=Administrator
USERPROFILE=C:\Users\Administrator
windir=C:\Windows
C:\Windows\System32>
3, 代码里输出的环境变量:
USERPROFILE=C:\Users\Administrator
NLS_LANG=SIMPLIFIED CHINESE_CHINA.ZHS16GBK
HOMEDRIVE=C:
ORACLE_HOME=E:\app\Administrator\product\12.1.0\dbhome_2
COMMONPROGRAMFILES=C:\Program Files (x86)\Common Files
APPDATA=C:\Users\Administrator\AppData\Roaming
PROGRAMFILES=C:\Program Files (x86)
OS=Windows_NT
PWD=E:/workspace/COH - Develop
LOCALAPPDATA=C:\Users\Administrator\AppData\Local
PROGRAMW6432=C:\Program Files
PATHEXT=.COM;.EXE;.BAT;.CMD;.VBS;.VBE;.JS;.JSE;.WSF;.WSH;.MSC
PROMPT=$P$G
NUMBER_OF_PROCESSORS=2
FP_NO_HOST_CHECK=NO
HOMEPATH=\Users\Administrator
COMMONPROGRAMFILES(X86)=C:\Program Files (x86)\Common Files
PATH=E:\app\Administrator\product\12.1.0\dbhome_2\bin;E:\app\Administrator\product\12.1.0\dbhome_1\bin;D:\instantclient_12_1\bin;D:\Perl\site\bin;D:\Perl\bin;D:\Program Files (x86)\ActiveState Perl Dev Kit 9.3\bin\;D:\Program Files\ActiveState Perl Dev Kit 9.3\bin\;D:\Perl64\site\bin;D:\Perl64\bin;C:\Program Files (x86)\NVIDIA Corporation\PhysX\Common;C:\Windows\system32;C:\Windows;C:\Windows\System32\Wbem;C:\Windows\System32\WindowsPowerShell\v1.0\;D:\Program Files\Microsoft SQL Server\110\DTS\Binn\;D:\Program Files (x86)\Microsoft SQL Server\110\Tools\Binn\;D:\Program Files\Microsoft SQL Server\110\Tools\Binn\;D:\Program Files (x86)\Microsoft SQL Server\110\Tools\Binn\ManagementStudio\;C:\Program Files (x86)\Microsoft Visual Studio 10.0\Common7\IDE\PrivateAssemblies\;D:\Program Files (x86)\Microsoft SQL Server\110\DTS\Binn\;;d:\Dwimperl\perl\bin;d:\Dwimperl\perl\site\bin;d:\Dwimperl\c\bin;
PROCESSOR_ARCHITEW6432=AMD64
USERDOMAIN=LYJ
PROGRAMDATA=C:\ProgramData
PROCESSOR_ARCHITECTURE=x86
PADRE_VERSION=0.94
PSMODULEPATH=C:\Windows\system32\WindowsPowerShell\v1.0\Modules\;D:\Program Files (x86)\Microsoft SQL Server\110\Tools\PowerShell\Modules\
TEMP=C:\Users\ADMINI~1\AppData\Local\Temp
SYSTEMDRIVE=C:
PROCESSOR_REVISION=0f0d
SYSTEMROOT=C:\Windows
COMMONPROGRAMW6432=C:\Program Files\Common Files
COMSPEC=C:\Windows\system32\cmd.exe
SESSIONNAME=Console
LOGONSERVER=\\LYJ
WINDIR=C:\Windows
PROCESSOR_LEVEL=6
PUBLIC=C:\Users\Public
USERNAME=Administrator
PROCESSOR_IDENTIFIER=Intel64 Family 6 Model 15 Stepping 13, GenuineIntel
PROGRAMFILES(X86)=C:\Program Files (x86)
ALLUSERSPROFILE=C:\ProgramData
COMPUTERNAME=LYJ
TMP=C:\Users\ADMINI~1\AppData\Local\Temp
4, 我对比了下两个环境变量,主要的都一致,但是还是输出同样的错误。连接的代码如下,麻烦你给看一下。
#!/usr/bin/perl
use strict;
use DBI;
use DBD::Oracle;
open FH, ">>", "test.txt";
foreach my $tmp (keys %ENV) {
print FH "$tmp=$ENV{$tmp}\n";
}
my $Server = "LYJ";
my $Database = "orcl";
my $UID = "system";
my $PWD = "hmlijg";
my $dbh = DBI->connect("dbi:Oracle:sid=$Database;host=$Server;port=1522",$UID,$PWD) or die "can't connect to database: DBI-errstr";
回复 6# laputa73
|
|