\n";
print "\n";
# if ($next){ mysql_data_seek($result,$next); }
# while($row=mysql_fetch_array($result)){
for ($i = 0;$i < 20;$i++){
$row=mysql_fetch_array($result);
if ($row){
# $row["kate"] = Exec("echo $row[kate] | nkf -s");
$row["kate"] = mb_convert_encoding($row[kate], "SJIS", "UTF-8");
# $row["jusyo"] = Exec("echo $row[jusyo] | nkf -s");
$row["jusyo"] = mb_convert_encoding($row[jusyo], "SJIS", "UTF-8");
# $row["name"] = Exec("echo $row[name] | nkf -s");
$row["name"] = mb_convert_encoding($row[name], "SJIS", "UTF-8");
# if ($i == 10){ print " \n"; }
if ($i == 0 || $i == 10){ print "病院名 | | 住所 | TEL | 診療科目 | \n"; }
print "";
# print $row["no"];
# print " | ";
print $row["name"];
print " | | ";
print "";
print $row["jusyo"];
print " | ";
print "";
print $row["tel"];
print " | ";
# print substr($row["zi"],0,3);
# print "$keyword";
# print "-";
# print substr($row["zi"],3,4);
$row["kate"] = ereg_replace(胃,胃腸科,$row["kate"]);
$row["kate"] = ereg_replace(消,消化器科,$row["kate"]);
$row["kate"] = ereg_replace(眼,眼科,$row["kate"]);
$row["kate"] = ereg_replace(気,気管食道科,$row["kate"]);
$row["kate"] = ereg_replace('救','救急',$row["kate"]);
$row["kate"] = ereg_replace(肛,肛門科,$row["kate"]);
$row["kate"] = ereg_replace(呼,呼吸器科,$row["kate"]);
$row["kate"] = ereg_replace(呼外,呼吸器外科,$row["kate"]);
$row["kate"] = ereg_replace(人,人間ドック,$row["kate"]);
$row["kate"] = ereg_replace(婦,婦人科,$row["kate"]);
$row["kate"] = ereg_replace(産,産婦人科,$row["kate"]);
$row["kate"] = ereg_replace(歯,歯科,$row["kate"]);
$row["kate"] = ereg_replace(耳,'耳鼻咽喉科',$row["kate"]);
$row["kate"] = ereg_replace(循,循環器科,$row["kate"]);
if (ereg(小外,$row["kate"])){ $row["kate"] = ereg_replace(小外,小児外科,$row["kate"]); }
else {
if (ereg(小,$row["kate"])){ $row["kate"] = ereg_replace(小,小児科,$row["kate"]); }
if (ereg(外,$row["kate"])){ $row["kate"] = ereg_replace(外,外科,$row["kate"]); }
}
$row["kate"] = ereg_replace('形','形成外科',$row["kate"]);
$row["kate"] = ereg_replace(精,精神科,$row["kate"]);
if (ereg(神内,$row["kate"])){ $row["kate"] = ereg_replace(神内,神経内科,$row["kate"]); }
else { $row["kate"] = ereg_replace(神,神経科,$row["kate"]);
if (ereg(心内,$row["kate"])){ $row["kate"] = ereg_replace(心内,心療内科,$row["kate"]); }
elseif (ereg(心,$row["kate"])){ $row["kate"] = ereg_replace(心,心臓血管外科,$row["kate"]); }
elseif (ereg(内,$row["kate"])){ $row["kate"] = ereg_replace(内,内科,$row["kate"]); }
}
if (ereg("内$",$row["kate"])){ $row["kate"] = ereg_replace(内,内科,$row["kate"]); }
$row["kate"] = ereg_replace("内・","内科・",$row["kate"]);
$row["kate"] = ereg_replace(整,'整形外科',$row["kate"]);
$row["kate"] = ereg_replace(性,性病科,$row["kate"]);
$row["kate"] = ereg_replace('脳','脳神経外科',$row["kate"]);
$row["kate"] = ereg_replace(泌,泌尿器科,$row["kate"]);
$row["kate"] = ereg_replace(皮,皮膚科,$row["kate"]);
$row["kate"] = ereg_replace(美,美容外科,$row["kate"]);
$row["kate"] = ereg_replace(放,放射線科,$row["kate"]);
$row["kate"] = ereg_replace(訪,訪問介護,$row["kate"]);
$row["kate"] = ereg_replace(麻,麻酔科,$row["kate"]);
$row["kate"] = ereg_replace(理,理学診療科,$row["kate"]);
$row["kate"] = ereg_replace(老,老人科,$row["kate"]);
$row["kate"] = ereg_replace(科科,科,$row["kate"]);
print "";
print $row["kate"];
print "";
print " | ";
}
}
$next = $next + 20;
}
if (!$result){
print "該当するデータはありません。 条件を変えて検索してみて下さい。 | ";
}
$date = date("Y/m/d H:i:s");
$log = fopen("med.log","a");
flock($log,2);
fwrite($log,"$kate $aria $jusyo $keyword\t$date\n");
flock($log,3);
fclose($log);
} else {
print "診療科目と都道府県は必須です。 | ";
}
print " ";
print " |