test.php~

开源MARC数据处理

<?

Class Test

{
	
function main()
{
include('/home/dondon/public_html/dev/pml/polerio/adodb/adodb.inc.php');          # load code common to ADOdb
$conn = &ADONewConnection('sqlite');    # create a connection
$conn->PConnect('/home/dondon/public_html/dev/pmlutility/pml.db');   # connect to MS-Access, northwind DSN
$recordSet = &$conn->Execute("select id, mattype, data from marc where id IN ( select distinct id from index100 where keyword='RIZAL' ) AND mattype=1");
if (!$recordSet) 
        print $conn->ErrorMsg();
else
	while (!$recordSet->EOF) 
		{
		print $recordSet->fields[0].' '.$recordSet->fields[1].'<BR>';
		$recordSet->MoveNext();
		}
$recordSet->Close(); # optional
$conn->Close(); # optional

}

}

$a = new Test;

$a->main();

?>