| <HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; CHARSET=Shift_JIS">
</HEAD>
<BODY>
<FORM name=frm>
<?
$Query = str_replace("\\","",$Query);
?>
<TEXTAREA name=Query cols=80 rows=10><?= $Query ?></TEXTAREA>
<INPUT type=submit name=submit value="送信">
</FORM>
<?
if ( $Query != "" ) {
$MdbPath = "C:\\Program Files\\WinOfSql\\Tool\\parts\\販売管理.mdb";
$Lbox = new COM( "Lbox.BatchHelper" );
$Database = new COM( "Lbox.Database" );
$Result = $Database->Connect( 1, $MdbPath );
if ( $Result == "" ) {
$Value = $Database->LoadSqlData( $Query );
if ( !($Lbox->IsError( $Value )) ) {
$Value = $Lbox->HtmlConvert( $Value, TRUE );
}
$Database->DisConnect();
}
}
?>
<?= $Value ?>
</BODY>
</HTML>
| |