Gentlemen,
I have had good progress in the sense that I am able to connect to the
oracle database via the tool "orac".But the problem I am having is ,
when I use the tool to do some query say like file -> xyz....
it displays the result but when I press the OK button it is not closing
the window.
This is could be related to the fact that I was unble to do the
install steps in the readme of tk but was able to install tk via the
perl package manager.
I am attaching the error when I was trying to run the command
nmake (after successfully running perl Makefile.PL)
Any advise.
Thanks,
Sal.
>From: Andy Duncan <[EMAIL PROTECTED]>
>To: salman ansari <[EMAIL PROTECTED]>, [EMAIL PROTECTED],
>[EMAIL PROTECTED]
>CC: [EMAIL PROTECTED]
>Subject: RE: Having problem with dbd-oracle 1.12 ....kindly help...
>Date: Mon, 7 Jan 2002 01:50:41 -0800 (PST)
>
>Hi Sal,
>
> > The error I am getting is while trying to connect to oracle is
> > DBI connect() failed :DBD (login failed,check your
> > config,e.g.ORACLE_HOME/bin on your PATH etc) at orac_dba.pl line 304
> > Any advise ?
>
>It sounds like ORACLE_HOME is not set in your Win32 environment. However I
>need more information, to help any more. The first thing to do, is make
>sure
>ORACLE_HOME is set in your environment. Having done this, make sure a
>simple
>Perl DBI script can connect to your Oracle database, and print out some
>kind of
>result. (Any kind of "Hello World" script will do, as long as it
>successfully
>connects to Oracle.)
>
>For example, adapt the script below, and then make sure it works:
>
>#!perl -w
>
>use strict;
>use DBI;
>
># Connect to Oracle database.
>
>my $dbh = DBI->connect( 'dbi:Oracle:ORCL.WORLD', 'scott', 'tiger',
> { RaiseError => 1,
> AutoCommit => 0 } );
>
># Create the SQL.
>
>my $sql = qq{ SELECT SYSDATE||' Hello World :-)!' message FROM DUAL };
>
># Prepare the SQL and execute.
>
>my $sth = $dbh->prepare( $sql );
>$sth->execute();
>
># Fetch output row into array.
>
>while ( my($message) = $sth->fetchrow_array) {
>
> # Print out the Hello World message.
>
> print $message, "\n";
>
>}
>$dbh->disconnect();
>
>Having established our small DBI script works, then try Orac again. If it
>fails once more, could you supply us with:
>
>*. The version of Orac.
>*. The version of DBI
>*. The version of DBD::Oracle
>*. How you've compiled/created everything
>
>Make sure before you post again, you do re-read all the DBI and DBD::Oracle
>README files, because the answer's probably in there, deep down, awaiting
>your
>imminent discovery! :-)
>
>You may also want to read:
>
>=> http://dbi.perl.org/doc/faq.html
>=> http://dbi.perl.org/cgi/moduledump?module=DBD::Oracle
>
>HTH a bit! Good luck! 8-)
>
>Rgds,
>AndyD
>
>=====
>Make Someone Happy. Buy a Copy of:
>=> http://www.oreilly.com/catalog/oracleopen/
>-----BEGIN GEEK CODE BLOCK-----
>GO/SS/TW d- s+:+ a C++$ U++$ P++++$ L++$ !E W+ N+ K- W O-
>M+ V-- PS+ PE++ Y+ PGP t+@ 5 X- R* tv- b+++ DI++ D G e++
>h---- r+++ y++++
>------END GEEK CODE BLOCK------
>
>__________________________________________________
>Do You Yahoo!?
>Send FREE video emails in Yahoo! Mail!
>http://promo.yahoo.com/videomail/
_________________________________________________________________
Join the world�s largest e-mail service with MSN Hotmail.
http://www.hotmail.com
link -out:..\..\blib\arch\auto\Tk\X\X.dll -dll -nologo -nodefaultlib
-re
lease -libpath:"C:\perl\lib\CORE" -machine:x86 X.obj
C:\perl\lib\CORE\perl56
..lib oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib
comdlg32.lib a
dvapi32.lib shell32.lib ole32.lib oleaut32.lib netapi32.lib uuid.lib
wsock32.li
b mpr.lib winmm.lib version.lib odbc32.lib odbccp32.lib msvcrt.lib
-def:X.def
Creating library ..\..\blib\arch\auto\Tk\X\X.lib and object
...\..\blib\arch\a
uto\Tk\X\X.exp
X.obj : error LNK2001: unresolved external symbol __imp__PL_na
X.obj : error LNK2001: unresolved external symbol __imp__PL_stack_base
X.obj : error LNK2001: unresolved external symbol __imp__PL_markstack_ptr
X.obj : error LNK2001: unresolved external symbol __imp__PL_stack_sp
X.obj : error LNK2001: unresolved external symbol __imp__PL_sv_yes
X.obj : error LNK2001: unresolved external symbol _perl_get_sv
...\..\blib\arch\auto\Tk\X\X.dll : fatal error LNK1120: 6 unresolved
externals
NMAKE : fatal error U1077: 'link' : return code '0x460'
Stop.
NMAKE : fatal error U1077: 'cd' : return code '0x2'
Stop.
NMAKE : fatal error U1077: 'cd' : return code '0x2'
Stop.
