I have an important question/doubt to resolve, the development of a nice
and interesting project depends on the success or failure of this question.
I have to extract data from an old post-jurasik DIGITAL 4000 with OpenVMS
as O.S, it�s running an Intersystems Open M database version 9 F with TCP
and SQL support, well, i have the win32 ODBC driver which works ok, but
yesterday i did my first try ( IIS 5 + Activestate + DBI-ODBCWin32 ) and I
didn�t make it works ( it can�t connect with the server ), and my main
doubt is, how do i fill the field "database" in the DBI conection string if
here (this kind of database) there are no databases, only directory
locations with dbm files into it ( /act in our case)....
I�d like to thank you for the help, this is my first seeing to realize a
good and "rare" project..
Here are the strings conections i have test:
if (Win32::ODBC::ConfigDSN(
ODBC_ADD_DSN,
"InterSystems Open M Win32",
("DSN=my_dsn",
"DESCRIPTION=DSN for PerlSysAdm",
"SERVER= �? ", <-------- Unix hostname?
"ADDRESS=192.168.0.1",
"DATABASE= �? ", <-------- directory location? ( /act )
"NETWORK=DBMSSOCN",
))){
print "DSN created\n";
}
else {
die "Unable to ceate DSN:" . Win32::ODBC::Error( ) . "\n";
}
$dbh=new Win32::ODBC("DSN=my_dsn;UID=my_user;PWD=my_pass;");
$rc = $dbh->Sql(qq{SELECT x FROM y;});
while ($dbh->FetchRow != undef){
$cod_serv = $dbh->Data("x");
print "<option value\=\"$cod_serv\">$cod_serv";
}
..... and the other option i tried:
$odbc = new Win32::ODBC("DSN=my_dsn;UID=my_user;PWD=my_pass");
$sqlstm = " SELECT x FROM y ";
$odbc->Sql($sqlstm);
while ($odbc->FetchRow != undef){
$id_cons = $odbc->Data("x");
print "<option value\=\"$id_cons\">$id_cons";
}
Again, thanks a lot.
If you recommend some other, or best option, or give me an example (
because anyone had to do the same ) please tell me, i tried to extract the
data from Linux -> VMS but i didn�t find any drivers or easy way to do it,
at least i need apply SQL to the DBM files.
______________________
Juan Jose Baeza Lopez
[EMAIL PROTECTED]
Murcia(Spain)
Programador Perl, RDBMS
Administrador de Sistemas
Network & Systems Admin.
Linux User: 91468
______________________
Habitalia Hispania Inmobiliaria S.L.
Portal Inmobiliario compra-venta
http://www.habitalia.net
Operation Flashpoint website espa�ol
http://www.ofp-spain.com
Iberica de Diagnostico y Cirugia
Servicio de Informatica - Murcia
http://www.idcsa.net
______________________
Juan Jose Baeza Lopez
[EMAIL PROTECTED]
Murcia(Spain)
Programador Perl, RDBMS
Administrador de Sistemas
Network & Systems Admin.
Linux User: 91468
______________________
Habitalia Hispania Inmobiliaria S.L.
Portal Inmobiliario compra-venta
http://www.habitalia.net
Operation Flashpoint website espa�ol
http://www.ofp-spain.com
Iberica de Diagnostico y Cirugia
Servicio de Informatica - Murcia
http://www.idcsa.net
