Umfrage-Script gesucht

[Sven]

Hallo Ed!

Vielen Dank! Werde sehen, was ich damit anfangen kann! :-)

Gruß,
Sven

hallo Sven,

uuups, da war noch ein Fehler drin:
ind er write_csv subroutine muss noch das Datum eingefügt werden.

<------------schnipp------------------>

writes the datas into the db(*.csv)-file

sub write_csv {
if(-f $filename.$ext)
  {
  open(CSVFILE, ">>$filename$ext") || die "Fehler beim Oeffnen der Datei";
  print CSVFILE "date;";
  foreach $field (@Fields)
   {
   if ($Form{$field})
    {
    print CSVFILE "$Form{$field};";
    }
   }
  print CSVFILE "\n";
  close(CSVFILE);
  }
else
  {
  &new_file;
  }
}»» <-------schnapp------------------>

Bye Ed X