| \n";
$KeyWords1 = $KeyWords;
$KeyWords1 =~s/ /+/g;
if( $IdArray == 0 )
{
####################################
# print " Statement 1 : Get strings into temporary table.
$sql ";
if( $ResultNum <= 0 )
{
print "$info[11][$Lan-1] 0 $info[12][$Lan-1]\n";
}
else
{
# Copy data into a temporary table
$sth_copy = $sth;
while (@rows_temp = FetchRow $sth_copy)
{
@fields = (0, 0, 0, "", "");
$fields[0] = $rows_temp[0]; # ID
next if $fields[0] == -9999;
$fields[1] = $rows_temp[6]; # Classification
$fields[2] = $rows_temp[11]; # Language
$fields[4] = $rows_temp[10]; # E-mail
$fields[3] .= $rows_temp[1]; # All string
$fields[3] .= " ";
$fields[3] .= $rows_temp[2];
$fields[3] .= " ";
$fields[3] .= $rows_temp[5];
$fields[3] .= " ";
$fields[3] .= $rows_temp[7];
$fields[3] .= " ";
$fields[3] .= $rows_temp[8];
$fields[3] .= " ";
$fields[3] .= $rows_temp[9];
$fields[3] .= " ";
$fields[3] .= $rows_temp[12];
$fields[3] .= " ";
$fields[3] .= $rows_temp[15];
$sql_temp = "INSERT INTO $table_temp VALUES
($fields[0],$fields[1],$fields[2],\'$fields[3]\',\'$fields[4]\')";
$sth_temp = Query $dbh $sql_temp;
# print " Statement 2 : Copy strings and insert into temporary table.
$sql_temp ";
}
$Statement = $Statement_FullName;
$Statement =~s/FullName/AllString/g;
if( $Match == 1 ) # All word
{
$Statement =~s/OR/AND/g;
}
#### Ken's Classification
if( $ClassArrayNum != 0 )
{
$Statement = $Statement . $ClassString;
}
#### Ken's Classification
# Execute SQL statements to select all fields needed
$sql_temp = "SELECT * FROM $table_temp WHERE $Statement ORDER BY AllString";
# $sql_temp = "SELECT * FROM $table_temp WHERE AllString LIKE \'ssss\' AND AllString LIKE \'SSSS\' OR Classification=3";
$sth_temp = Query $dbh $sql_temp;
$ResultNum = $sth_temp->numrows;
# print " Statement 3 : Search in temporary table.
$sql_temp ";
if( $ResultNum <= 0 )
{
print "$info[11][$Lan-1] 0 $info[12][$Lan-1]\n";
}
else
{
# Get all Ids into a array
$Counter = 0;
$Array = "";
while (@rows = FetchRow $sth_temp)
{
#### Ken's Classification
if( $ClassArrayNum != 0 )
{
for( $i=0; $i<$ClassArrayNum; $i++ )
{
$i=200 if( $ClassArray[$i] == $rows[1] );
}
next if $i<200;
}
#### Ken's Classification
else
{
next if( ($Class!=1) && ($Class!=$rows[1]) );
}
$SaveId[$Counter] = $rows[0];
$Array .= "$rows[0]+";
$Counter++;
}
if( $Counter <=0 )
{
print "" if( $Lan == 1 );
print "$info[11][$Lan-1] 0 $info[12][$Lan-1]\n";
print "" if( $Lan == 1 );
}
else
{
print "" if( $Lan == 1 );
print "$info[11][$Lan-1] $Counter $info[12][$Lan-1] ($info[21][$Lan-1] $KeyWords)
\n";
print "$info[13][$Lan-1]\n";
print "$info_en[0][$Lan-1]\n";
print " " if( $Lan == 1 );
print " \n";
if( $Counter > $Lines )
{
$DispLines = $Lines;
}
else
{
$DispLines = $Counter;
}
for( $i=0; $i<$DispLines; $i++ )
{
$sql = "SELECT * FROM $table WHERE Id=$SaveId[$i]";
$sth = Query $dbh $sql;
# print "Statement 4 : Search in yellowpage table.
$sql ";
@rows = FetchRow $sth;
$IndexNo = $i+1;
print " - $IndexNo.\n";
if( $rows[9] )
{
print "";
}
print "$rows[1]
";
if( $rows[9] )
{
print "\n";
}
print "$rows[2]
\n";
print "" if( $Lan == 1 );
print "$info[15][$Lan-1]
\n";
print "" if( $Lan == 1 );
print "\n";
}
print " \n";
}
}
}
$sql_temp = "DELETE from $table_temp";
$sth_temp = Query $dbh $sql_temp;
# print "Statement 5 : Purge temporary table.
$sql_temp ";
$StartLine=2;
$Pages = $Counter/$Lines;
$Pages++ if $Pages != (int $Pages);
$Pages = int $Pages;
# print " ID Array : $Array
\n";
if( $Counter > $Lines )
{
print "" if( $Lan == 1 );
print "$info[17][$Lan-1]\n";
print " ($info[19][$Lan-1]1/$Pages)
\n";
print "" if( $Lan == 1 );
}
print " \n";
####################################
}
else
{
$Pages = $IdArray/$Lines;
$Pages++ if $Pages != (int $Pages);
$Pages = int $Pages;
print "" if( $Lan == 1 );
print "$info[11][$Lan-1] $IdArray $info[12][$Lan-1] ($info[21][$Lan-1] $KeyWords)
\n";
print "$info[13][$Lan-1]\n";
print "$info_en[0][$Lan-1]\n";
print " " if( $Lan == 1 );
print " \n";
if( ($IdArray - ($StartLine-1)*$Lines) > $Lines )
{
$DispLines = $Lines;
}
else
{
$DispLines = $IdArray - ($StartLine-1)*$Lines;
}
@SaveId = split(/ /, $Array); # Split ids
$PageBegin = ($StartLine-1)*$Lines;
for( $i=$PageBegin; $i<$PageBegin+$DispLines; $i++ )
{
$sql = "SELECT * FROM $table WHERE Id=$SaveId[$i]";
# print "Statement 6 : Search in yellowpage table.
$sql ";
$sth = Query $dbh $sql;
@rows = FetchRow $sth;
$IndexNo = $i+1;
print " - $IndexNo.\n";
if( $rows[9] )
{
print "";
}
print "$rows[1]
";
if( $rows[9] )
{
print "\n";
}
print "$rows[2]
\n";
print "" if( $Lan == 1 );
print "$info[15][$Lan-1]
\n";
print "" if( $Lan == 1 );
print "\n";
}
print " \n";
$Array =~s/ /+/g;
# print "ID Array : $Array
\n";
print "";
if( $StartLine > 1 )
{
$PrevPage = $StartLine-1;
print "" if( $Lan == 1 );
print "$info[18][$Lan-1]\n";
print "" if( $Lan == 1 );
}
if( ($StartLine > 1) && ($StartLine < $Pages) )
{
print " || ";
}
if( $StartLine < $Pages )
{
$NextPage = $StartLine+1;
print "" if( $Lan == 1 );
print "$info[17][$Lan-1]\n";
print "" if( $Lan == 1 );
}
print "" if( $Lan == 1 );
print " ($info[19][$Lan-1]$StartLine/$Pages)
\n";
print "" if( $Lan == 1 );
print "";
print " \n";
}
print " | ![](\"/advertise/joinchiv.gif\")