$MP = "/usr/lib/sendmail -t"; $mail = "jan@birthspirit.org, toddwolf@aliveandhealthy.com"; $fd = popen ($MP, "w"); fputs ($fd, "To: $mail\n"); fputs ($fd, "From: $name<$email>\n"); fputs ($fd, "Subject: WI Guild Survey\n"); fputs ($fd, "\n"); fputs ($fd, "Name: $name\n"); fputs ($fd, "Address: $adr1\n"); fputs ($fd, "$adr2\n"); fputs ($fd, "City: $city , $state , $zip"); fputs ($fd, "$phone\n"); fputs ($fd, "\n"); fputs ($fd, "$email\n"); fputs ($fd, "\n"); fputs ($fd, "SURVEY\n"); fputs ($fd, "How many births have you attended as midwife: $many \n"); fputs ($fd, "As Assistant: $assist \n"); fputs ($fd, "As Doula: $doula \n"); fputs ($fd, "Credentials: $cred \n"); fputs ($fd, "Interested in becoming CPM?: $cpm \n"); fputs ($fd, "Interested in Apprenticeship?: $app \n"); fputs ($fd, "What classes, skills would you like?: $classes \n"); fputs ($fd, "Notify by email??: $notify \n"); fputs ($fd, "Preferred method of contact: $contact \n"); pclose ($fd); ?>
Thank You!