コメント |
@DIV
<?
header( "Expires: Wed, 31 May 2000 14:59:58 GMT" );
# **********************************************************
# 外部ファイル
# **********************************************************
$conf_client_charset = "shift_jis";
$conf_db_type = 5;
require_once( "http://lightbox.in.coocan.jp/gen/db.txt" );
# **********************************************************
# 接続
# **********************************************************
$SQL = new DB( "DSN", "" , "lightbox", "lightbox" );
$Query = "select * from 社員マスタ";
$Column = $SQL->QueryEx( $Query );
$handle = fopen("ora.csv", 'w');
while( $Column ) {
$Line = "";
for( $i = 0; $i < $SQL->nField; $i++ ) {
if ( $Line != "" ) {
$Line .= ",";
}
$Line .= $Column[$i];
}
fwrite($handle, $Line . "\n" );
$Column = $SQL->QueryEx( );
}
fclose($handle);
# **********************************************************
# 接続解除
# **********************************************************
$SQL->Close();
?>
OK
@END
|