CSVに書き込む私のコードは次のとおりです。私の問題は、csv ファイルの一番上の行を上書きしていることです。これを別の方法で行う方法はありますか?既存のものを上書きせずに、csv の先頭に新しいデータを追加したいと考えています。
// Send Routine
$filename="contact.csv";
$datfile=fopen($filename, 'r+');
spamcheck($EReply);
$ESubject=$Subject;
// $EMessage = $MsgHeader;
$EMessage = "Form Submission:\r\n";
for(reset($FormField); $key=key($FormField); next($FormField)) {
spamcheck($FormField[$key]);
$EMessage .= $key.": ".$FormField[$key];
// $EMessage .= "<br><br>\r\n";
$EMessage .= "\r\n";
$datachunk="\"".$FormField[$key]."\",";
fputs($datfile, $datachunk);
}
fputs($datfile, "\r\n");
fclose($datfile);