Hello thanks to Jeff and Thunder for their quick responses!
Firstly, I upgraded DBD::ODBC to version 1.01 -- but that didn't help.
Ah well.
Next I tried Thunder's suggestion and ran the script on the command like
and added a DBI->trace(9, 'trace.log'); to the script. In the output I
noticed a unable to establish connection' message -- so something is
hosed.
Here's the output produced (I'm really sorry for the size of this
message -- also, IP and UID have been X'ed out):
--- COMMAND LINE OUTPUT ---
C:\Inetpub\scripts\brian\lbc>perl mx.pl id=123
DBI connect('driver={SQL
Server};Server=XXX.XXX.XXX.XXX,1433;database=LBC_research_
test;uid=NALD_Admin;pwd=XXXXXXXXXX;','',...) failed: [Microsoft][ODBC
SQL Server
Driver]Client unable to establish connection (SQL-08001)
[Microsoft][ODBC SQL Server Driver][Named Pipes]ConnectionOpen
(CreateFile()). (
SQL-01000)(DBD: db_login/SQLConnect err=-1) at mx.pl line 25
[Microsoft][ODBC SQL Server Driver]Client unable to establish connection
(SQL-08
001)
[Microsoft][ODBC SQL Server Driver][Named Pipes]ConnectionOpen
(CreateFile()). (
SQL-01000)(DBD: db_login/SQLConnect err=-1) at mx.pl line 25.
--- DBI TRACE ---
DBI 1.32-ithread dispatch trace level set to 9
-> DBI->connect(dbi:ODBC:driver={SQL
Server};Server=XXX.XXX.XXX.XXX,1433;database=LBC_research_test;uid=NALD_
Admin;pwd=XXXXXXXXXX;, , ****)
-> DBI->install_driver(ODBC) for MSWin32 perl=5.006001 pid=3768
ruid=0 euid=0
install_driver: DBD::ODBC version 1.01 loaded from
C:/Perl/site/lib/DBD/ODBC.pm
New DBI::dr (for DBD::ODBC::dr, parent=, id=)
dbih_setup_handle(DBI::dr=HASH(0x1c9f2d0)=>DBI::dr=HASH(0x1e482ac),
DBD::ODBC::dr, 0, Null!)
dbih_make_com(Null!, DBD::ODBC::dr, 92) thr#01A7F33C
dbih_setup_attrib(DBI::dr=HASH(0x1e482ac), Err, Null!)
SCALAR(0x1e6bb60) (already defined)
dbih_setup_attrib(DBI::dr=HASH(0x1e482ac), State, Null!)
SCALAR(0x1e6bba8) (already defined)
dbih_setup_attrib(DBI::dr=HASH(0x1e482ac), Errstr, Null!)
SCALAR(0x1e6bb6c) (already defined)
dbih_setup_attrib(DBI::dr=HASH(0x1e482ac), Debug, Null!) 0 (already
defined)
dbih_setup_attrib(DBI::dr=HASH(0x1e482ac), FetchHashKeyName, Null!)
'NAME' (already defined)
<- install_driver= DBI::dr=HASH(0x1c9f2d0)
>> default_user DISPATCH (DBI::dr=HASH(0x1c9f2d0) rc1/3 @4 g1 ima1
pid#3768) at C:/Perl/site/lib/DBI.pm line 510 via mx.pl line 25
-> default_user in DBD::_::dr for DBD::ODBC::dr
(DBI::dr=HASH(0x1c9f2d0)~0x1e482ac undef undef HASH(0x1cca768))
thr#01A7F33C
<- default_user= ( undef undef ) [2 items] at
C:/Perl/site/lib/DBI.pm line 510 via mx.pl line 25
>> connect DISPATCH (DBI::dr=HASH(0x1c9f2d0) rc1/3 @5 g0 ima1
pid#3768) at C:/Perl/site/lib/DBI.pm line 513 via mx.pl line 25
-> connect for DBD::ODBC::dr (DBI::dr=HASH(0x1c9f2d0)~0x1e482ac
'driver={SQL
Server};Server=XXX.XXX.XXX.XXX,1433;database=LBC_research_test;uid=NALD_
Admin;pwd=XXXXXXXXXX;' undef **** HASH(0x1cca768)) thr#01A7F33C
New DBI::db (for DBD::ODBC::db, parent=DBI::dr=HASH(0x1e482ac), id=)
dbih_setup_handle(DBI::db=HASH(0x1e48264)=>DBI::db=HASH(0x1e48258),
DBD::ODBC::db, 1ca2e8c, Null!)
dbih_make_com(DBI::dr=HASH(0x1e482ac), DBD::ODBC::db, 220)
thr#01A7F33C
dbih_setup_attrib(DBI::db=HASH(0x1e48258), Err,
DBI::dr=HASH(0x1e482ac)) SCALAR(0x1e6bb60) (already defined)
dbih_setup_attrib(DBI::db=HASH(0x1e48258), State,
DBI::dr=HASH(0x1e482ac)) SCALAR(0x1e6bba8) (already defined)
dbih_setup_attrib(DBI::db=HASH(0x1e48258), Errstr,
DBI::dr=HASH(0x1e482ac)) SCALAR(0x1e6bb6c) (already defined)
dbih_setup_attrib(DBI::db=HASH(0x1e48258), Debug,
DBI::dr=HASH(0x1e482ac)) 0 (already defined)
dbih_setup_attrib(DBI::db=HASH(0x1e48258), FetchHashKeyName,
DBI::dr=HASH(0x1e482ac)) 'NAME' (already defined)
dbih_setup_attrib(DBI::db=HASH(0x1e48258), HandleError,
DBI::dr=HASH(0x1e482ac)) undef (not defined)
!! ERROR: -1 '[Microsoft][ODBC SQL Server Driver]Client unable to
establish connection (SQL-08001)
[Microsoft][ODBC SQL Server Driver][Named Pipes]ConnectionOpen
(CreateFile()). (SQL-01000)(DBD: db_login/SQLConnect err=-1)'
<- connect= undef at C:/Perl/site/lib/DBI.pm line 513 via mx.pl line
25
>> errstr DISPATCH (DBI::dr=HASH(0x1c9f2d0) rc1/3 @1 g0 ima4
pid#3768) at C:/Perl/site/lib/DBI.pm line 515 via mx.pl line 25
-> errstr in DBD::_::common for DBD::ODBC::dr
(DBI::dr=HASH(0x1c9f2d0)~0x1e482ac) thr#01A7F33C
<- errstr= '[Microsoft][ODBC SQL Server Driver]Client unable to
establish connection (SQL-08001)
[Microsoft][ODBC SQL Server Driver][Named Pipes]ConnectionOpen
(CreateFile()). (SQL-01000)(DBD: db_login/SQLConnect err=-1)' at
C:/Perl/site/lib/DBI.pm line 515 via mx.pl line 25
DBI connect('driver={SQL
Server};Server=XXX.XXX.XXX.XXX,1433;database=LBC_research_test;uid=NALD_
Admin;pwd=XXXXXXXXXX;','',...) failed: [Microsoft][ODBC SQL Server
Driver]Client unable to establish connection (SQL-08001)
[Microsoft][ODBC SQL Server Driver][Named Pipes]ConnectionOpen
(CreateFile()). (SQL-01000)(DBD: db_login/SQLConnect err=-1)
-> $DBI::errstr (&) FETCH from lasth=HASH
>> DBD::ODBC::dr::errstr
<- $DBI::errstr= '[Microsoft][ODBC SQL Server Driver]Client unable
to establish connection (SQL-08001)
[Microsoft][ODBC SQL Server Driver][Named Pipes]ConnectionOpen
(CreateFile()). (SQL-01000)(DBD: db_login/SQLConnect err=-1)'
-> $DBI::errstr (&) FETCH from lasth=HASH
>> DBD::ODBC::dr::errstr
<- $DBI::errstr= '[Microsoft][ODBC SQL Server Driver]Client unable
to establish connection (SQL-08001)
[Microsoft][ODBC SQL Server Driver][Named Pipes]ConnectionOpen
(CreateFile()). (SQL-01000)(DBD: db_login/SQLConnect err=-1)'
>> DESTROY DISPATCH (DBI::db=HASH(0x1e48264) rc1/1 @1 g0 ima0
pid#3768)
<> DESTROY ignored for outer handle DBI::db=HASH(0x1e48264) (inner
DBI::db=HASH(0x1e48258))
>> DESTROY DISPATCH (DBI::db=HASH(0x1e48258) rc1/1 @1 g0 ima0
pid#3768)
-> DESTROY for DBD::ODBC::db (DBI::db=HASH(0x1e48258)~INNER)
thr#01A7F33C
DESTROY for DBI::db=HASH(0x1e48258) ignored - handle not
initialised
<- DESTROY= undef
DESTROY (dbih_clearcom) (dbh 0x1e48264 0x1e47b54, com 0x1e479d4, imp
DBD::ODBC::db):
FLAGS 0x11: COMSET Warn
PARENT DBI::dr=HASH(0x1e482ac)
KIDS 0 (0 Active)
IMP_DATA undef
dbih_clearcom 0x1e48264 (com 0x1e479d4, type 2) done.
-- DBI::END
>> disconnect_all DISPATCH (DBI::dr=HASH(0x1c9f2d0) rc1/3 @1 g0 ima1
pid#3768) at C:/Perl/site/lib/DBI.pm line 575 via mx.pl line 0
-> disconnect_all for DBD::ODBC::dr
(DBI::dr=HASH(0x1c9f2d0)~0x1e482ac) thr#01A7F33C
<- disconnect_all= '' at C:/Perl/site/lib/DBI.pm line 575 via mx.pl
line 0
>> DESTROY DISPATCH (DBI::dr=HASH(0x1e482ac) rc1/1 @1 g0 ima0
pid#3768) during global destruction
DESTROY (dbih_clearcom) (drh 0x1c9f2d0 0x1e78b30, com 0x1e78c64, imp
DBD::ODBC::dr):
FLAGS 0x215: COMSET Active Warn AutoCommit
PARENT undef
KIDS 0 (0 Active)
IMP_DATA undef
dbih_clearcom 0x1c9f2d0 (com 0x1e78c64, type 1) done.
>> DESTROY DISPATCH (DBI::dr=HASH(0x1c9f2d0) rc1/1 @1 g0 ima0
pid#3768) during global destruction
<> DESTROY for DBI::dr=HASH(0x1c9f2d0) ignored (inner handle gone)
--- END ---
Can anyone decipher those messages? =)
Thanks again for your help!
-Brian
> -----Original Message-----
> From: PARLEY,THUNDER (HP-MountainView,ex1) [mailto:[EMAIL PROTECTED]]
> Sent: Monday, January 13, 2003 5:05 PM
> To: '[EMAIL PROTECTED]'
> Subject: RE: Odd Connection problem with DBD::ODBC, MS SQL 2000 and
IIS on
> Win2k
>
> Hi Brian,
>
> I recommend you turn on the tracing in the DBI (see the docs) and try
> running from the command line on the production box.
>
> --Thunder
http://www.gordano.com - Messaging for educators.
