Please fill out the following fields

"; if (!$date) {echo " Date
";} if (!$email) {echo " E-mail
";} if (!$phone) {echo " Phone
";} if (!$LabPiName) {echo " LabPiName
";} if (!$account) {echo " Account
";} if (!$wheresent) {echo " Means of delivery (e-mail, floppy, CD, FTP)
";} if (!$Temp_ID_[1]) {echo " DNA Template ID
";} if (!$primer_[1]) {echo " Primer Concentration
";} if (!$source_[1]) {echo " DNA Template Source
";} if (!$SizeConc_[1]) {echo " Size and Concentration
";} if (!$Prep) {echo " Preparation of Sample
";} } else { echo "$name
$email
$LabPiName
$dept
$wheresent
$price
Template ID -- Primer Concentration -- Template Source -- Size and Concentration
"; for ($n=1; $n<16; $n++) { if (!$Temp_ID_[$n]) {break;} else { $numsample++; echo "$Temp_ID_[$n] -- $primer_[$n] -- $source_[$n] -- $SizeConc_[$n]
"; } } if (strcmp($Prep,"GSL") ==0) { $price = $numsample*11.00; } else {$price = 6.00*$numsample;} echo "
Preparation done by $Prep
Price: $$price

"; $dfile = "count_seq.txt"; if(file_exists($dfile)) { $inf = fopen($dfile, "r"); $seqcount = fread($inf, 10); $seqcount = (int)$seqcount; $seqcount++; fclose($inf); $outf = fopen($dfile, "w"); fputs($outf, $seqcount); fclose($outf); } else { echo "File, $dfile, not found!"; } if (file_exists ($filename)) { $message = "SEQ-" . $seqcount . "\n" . $price . "\n" . $date . "\n" . $name . "\n" . $email . "\n" . $dept . "\n" . $phone . "\n" . $LabPiName . "\n" . $account . "\n" . $wheresent . "\n\nTemplate IDs:\t\t\tPrimer Combinations:\n\n"; for ($x=0; $x<15; $x++) { $message .= $Temp_ID_[$x] . "\t\t" . $primer_[$x] . "\t\t" . $source_[$i] . "\t\t" . $SizeConc_[$i] . "\n"; } $message .= "How to read an order:\nOrder Number:\nDate:\nName:\nE-mail:\nDepartment:\nLabPIName:\nDelivery Method:\nTemplateIDs:\n\nThe Sample information can be read as a database:\n\nTemplate ID\t -- \tPrimer and Conc\t -- \tSrc and Purif\t -- \tSize and Conc\n"; mail($webweaver,"New Sequencing Order","Order Number: #SEQ-$seqcount\nPreparation: $Prep\nPrice: $price\nDate: $date\nE-mail: $email\nPhone: $phone\nDept: $dept\nLabPiName: $LabPiName\nAccount#: $account\nDelivery Method: $wheresent\n\nTemplate ID: -- Primer Src&Conc -- Template Src -- Size & Conc:\n\n$Temp_ID_[1]\t\t$primer_[1]\t\t$source_[1]\t\t$SizeConc_[1]\n$Temp_ID_[2]\t\t$primer_[2]\t\t$source_[2] \t\t$SizeConc_[2]\n$Temp_ID_[3]\t\t$primer_[3]\t\t$source_[3]\t\t$SizeConc_[3]\n$Temp_ID_[4]\t\t$primer_[4]\t\t$source_[4] \t\t$SizeConc_[4]\n$Temp_ID_[5]\t\t$primer_[5]\t\t$source_[5]\t\t$SizeConc_[5]\n$Temp_ID_[6]\t\t$primer_[6]\t\t$source_[6] \t\t$SizeConc_[6]\n$Temp_ID_[7]\t\t$primer_[7]\t\t$source_[7]\t\t$SizeConc_[7]\n$Temp_ID_[8]\t\t$primer_[8]\t\t$source_[8] \t\t$SizeConc_[8]\n$Temp_ID_[9]\t\t$primer_[9]\t\t$source_[9]\t\t$SizeConc_[9]\n$Temp_ID_[10]\t\t$primer_[10] \t\t$source_[10]\t\t$SizeConc_[10]\n$Temp_ID_[11]\t\t$primer_[11]\t\t$source_[11]\t\t$SizeConc_[11]\n$Temp_ID_[12] \t\t$primer_[12]\t\t$source_[12]\t\t$SizeConc_[12]\n$Temp_ID_[13]\t\t$primer_[13]\t\t$source_[13]\t\t$SizeConc_[13] \n$Temp_ID_[14]\t\t$primer_[14]\t\t$source_[14]\t\t$SizeConc_[14]\n$Temp_ID_[15]\t\t$primer_[15]\t\t$source_[15] \t\t$SizeConc_[15]\n\n","From: $name <$email>"); //Mails the Results to the customer mail($email,"Sequencing Order Conformation","Dear $name,\n\n Thank you for your sequencing order. Please keep this e-mail as receipt of your order #SEQ-$seqcount. Should you have any questions, please contact Lee Zhang .\n\n$wwname\n<$webweaver>", "From: $wwname <$webweaver>"); echo "

Thank you for your order. Your order number is #SEQ-$seqcount . Confirmation has been sent to your e-mail address as a receipt of your order.

"; // record the visitor info // open the file in append mode $handle = fopen ($filename,'a+'); fputs($handle,$message); //close the file fclose($handle); } else { echo "The file $filename does not exist and needs to be created for this to work."; } } ?>