OXIESEC PANEL
- Current Dir:
/
/
home
/
cubot
/
bin
/
etl_odbc
/
test
Server IP: 139.59.38.164
Upload:
Create Dir:
Name
Size
Modified
Perms
📁
..
-
02/03/2023 07:34:13 AM
rwxr-xr-x
📄
mssql_odbc.pl
528 bytes
02/03/2023 07:34:13 AM
rwxr-xr-x
📄
t3.pl
2.21 KB
02/03/2023 07:34:13 AM
rwxr-xr-x
📄
test.pl
1.45 KB
02/03/2023 07:34:13 AM
rwxr-xr-x
📄
test2.pl
1.95 KB
02/03/2023 07:34:13 AM
rwxr-xr-x
📄
test3.pl
685 bytes
02/03/2023 07:34:13 AM
rw-r--r--
📄
tmpxml.pl
1.49 KB
02/03/2023 07:34:13 AM
rw-r--r--
Editing: test3.pl
Close
use DBI; $DB_name = 'intouch_cms'; $DB_user = 'sa'; $DB_pwd = '12345678'; $dbh = DBI->connect("dbi:ODBC:intouch_cms","$DB_user","$DB_pwd"); #$localconn = DBI->connect("dbi:ODBC:$dsn", "$user", "$pass", {odbc_cursortype => DBI::SQL_CURSOR_DYNAMIC, PrintError => 1, RaiseError => 1}) or return 'ERR'; print "\nConnection error: $DBI::errstr\n\n"; #sth = $dbh->prepare("select * from edash_svcs"); $sth = $dbh->prepare("select cast(eqd_query as char(254)), eqd_seqid from etl_querydetails where eqd_qryid = 8438 order by eqd_seqid"); $sth->execute(); while ( ($id,$name) = $sth->fetchrow_array() ) { print "$id\t\t $name \n"; } $sth->finish(); $dbh->disconnect();