Execute($query)) { //If we were succesful deleting the saved_control entry, //then delete the rest $query = "DELETE FROM {$surveytable} WHERE id={$srid}"; $result = $connect->Execute($query) or die("Couldn't delete"); } else { $savedsurveyoutput .= "Couldn't delete
$query
".$connect->ErrorMsg(); } } $savedsurveyoutput .= "\n" ."\n"; $savedsurveyoutput .= "\t\n"; $savedsurveyoutput .= savedmenubar(); $savedsurveyoutput .= "

" . $clang->gT("Browse Saved Responses").": ".$thissurvey['name']."

\n"; $savedsurveyoutput .= "\n" ."\n"; $savedsurveyoutput .= "

"; switch ($subaction) { case "all": case "delete": $savedsurveyoutput .= "".$setfont.$clang->gT("Saved Responses:") . " ". getSavedCount($surveyid).""; showSavedList($surveyid); break; default: $savedsurveyoutput .= "".$setfont.$clang->gT("Saved Responses:") . " ". getSavedCount($surveyid).""; } $savedsurveyoutput .= "

 \n"; function showSavedList($surveyid) { global $dbprefix, $connect, $clang, $savedsurveyoutput, $scriptname, $surveytable; $query = "SELECT scid, srid, identifier, ip, saved_date, email, access_code\n" ."FROM {$dbprefix}saved_control\n" ."WHERE sid=$surveyid\n" ."ORDER BY saved_date desc"; $result = db_execute_assoc($query) or safe_die ("Couldn't summarise saved entries
$query
".$connect->ErrorMsg()); if ($result->RecordCount() > 0) { $savedsurveyoutput .= "\n"; $savedsurveyoutput .= "" ."\n"; while($row=$result->FetchRow()) { $savedsurveyoutput .= "\n"; } // while $savedsurveyoutput .= "

SCID	" .$clang->gT("Identifier")."	" .$clang->gT("IP Address")."	" .$clang->gT("Date Saved")."	" .$clang->gT("Email Address")."	" .$clang->gT("Action")."
".$row['scid']."	".$row['identifier']."	".$row['ip']."	".$row['saved_date']."	".$row['email']."	[".$clang->gT("Delete")."] [".$clang->gT("Edit")."]

 \n"; } } // [".$clang->gT("Remind")."] // c_schmitz: Since its without function at the moment i removed it from the above lines function savedmenubar() { global $surveyid, $scriptname, $imagefiles, $clang; //BROWSE MENU BAR if (!isset($surveyoptions)) {$surveyoptions="";} $surveyoptions .= "\t\n" . "\t\t\n" . "\t\t\tgT("Return to Survey Administration", "js")."')\" >" . "\n" . "\t\t\t\n" . "\t\t\t\n" . "\t\t\tgT("Show summary information", "js")."')\">" . "\n" . "\t\t\tgT("Display Responses", "js")."')\">" . "\n" //. "\t\t\t\n" . "\t\t\t\n" . "\t\t\n" . "\t\n"; return $surveyoptions; } ?>