รพ.สต.หนองคู ตำบลจาน: รับส่งรายงาน

สมัครสมาชิก

ระบบจัดการสมาชิกรับข่าวสาร สสอ.เมืองศรีสะเกษ Could not open configuration file."); // Sets the variables from the config file. $user = trim($config[0]); $pass = trim($config[1]); $list_name = trim($config[2]); $list_file = trim($config[3]); $owner_email = trim($config[4]); $send_confirm = trim($config[5]); $confirm_subject = trim($config[6]); $send_welcome = trim($config[7]); $welcome_subject = trim($config[8]); $send_goodbye = trim($config[9]); $goodbye_subject = trim($config[10]); $default_per_page = trim($config[11]); $confirm_msg = get_data($config, "confirm"); $welcome_msg = get_data($config, "welcome"); $goodbye_msg = get_data($config, "goodbye"); $sig = get_data($config, "sig"); $banned_addresses = get_data($config, "banned"); // If statements to determine the action. $conf = $HTTP_GET_VARS['conf']; $action = $_REQUEST['action']; $email = $_REQUEST['email']; $username = $HTTP_POST_VARS['username']; $password = $HTTP_POST_VARS['password']; $q = $HTTP_POST_VARS['q']; $s = $HTTP_POST_VARS['s']; $x = $HTTP_POST_VARS['x']; $y = $HTTP_POST_VARS['y']; $page = $HTTP_POST_VARS['page']; $per_page = $HTTP_POST_VARS['per_page']; $admin_add_email_opt = $HTTP_POST_VARS['admin_add_email_opt']; $use_sig = $HTTP_POST_VARS['use_sig']; $subject = $HTTP_POST_VARS['subject']; $message = $HTTP_POST_VARS['message']; $newusername = $HTTP_POST_VARS['newusername']; $newpassword = $HTTP_POST_VARS['newpassword']; $newlist_name = $HTTP_POST_VARS['newlist_name']; $newlist_file = $HTTP_POST_VARS['newlist_file']; $newowner_email = $HTTP_POST_VARS['newowner_email']; $newdefault_per_page = $HTTP_POST_VARS['newdefault_per_page']; $newbanned_addresses = $HTTP_POST_VARS['newbanned_addresses']; $newsig = $HTTP_POST_VARS['newsig']; $newsend_confirm = $HTTP_POST_VARS['newsend_confirm']; $newconfirm_subject = $HTTP_POST_VARS['newconfirm_subject']; $newconfirm_msg = $HTTP_POST_VARS['newconfirm_msg']; $newsend_welcome = $HTTP_POST_VARS['newsend_welcome']; $newwelcome_subject = $HTTP_POST_VARS['newwelcome_subject']; $newwelcome_msg = $HTTP_POST_VARS['newwelcome_msg']; $newsend_goodbye = $HTTP_POST_VARS['newsend_goodbye']; $newgoodbye_subject = $HTTP_POST_VARS['newgoodbye_subject']; $newgoodbye_msg = $HTTP_POST_VARS['newgoodbye_msg']; if ($action == $admin_keyword) admin(); elseif ($action == "sub") subscribe($email, $send_confirm, $send_welcome); elseif ($action == "confirm") confirm($email, $conf); elseif ($action == "unsub") unsubscribe(trim($email)); else print_subscribe_form(); print_footer(); function admin() { // Controls the administration options. global $q, $username, $password, $user, $pass; if (($user == $username) && ($pass == $password)) { if ($q == "send_msg") admin_send_msg(); elseif ($q == "send_msg_confirm") admin_send_msg_confirm(); elseif ($q == "write_msg") admin_write_msg(); elseif ($q == "view_subs") admin_view_subs(); elseif ($q == "config") admin_config(); elseif ($q == "add_remove") admin_add_remove(); admin_print_options(); } else { if (($username == "") && ($password == "")) admin_print_logon(""); else admin_print_logon("Invalid username and/or password."); } } function subscribe($email, $send_confirm, $send_welcome) { // Subscribes address to list. global $list_name; if ($email == "") { print_subscribe_form(); } else { if (!banned($email)) { if (!on_list($email)) { if (valid_email($email)) { if ($send_confirm == "on") { send_confirm($email); echo "

Thank you for subscribing to \"$list_name\".

An email will be sent to \"$email\" asking you to confirm your subscription.
Please follow those instructions to complete the process."; } else { if (add_to_list($email)) { echo ""; if ($send_welcome == "on") { send_welcome($email); echo "
"; } } } } else echo "

อีเมล์ \"$email\" นั้นกรอกผิดรูปแบบ โปรดกรอกใหม่อีกที

"; } else echo "

อีเมล์ \"$email\" ได้เป็นสมาชิกรับข่าวสารอยู่แล้ว

"; } else echo "

อีเมล์ \"$email\" ได้ถูกแบนจาก \"$list_name\" อยู่

"; } } function unsubscribe($email) { // Removes email from list if it exists. global $list_file, $list_name, $send_goodbye; if ($email == "") { print_subscribe_form(); } else { if (remove_from_list($email)) { echo ""; if ($send_goodbye == "on") { send_goodbye($email); echo "
A email confirming this will be sent to \"$email\"."; } echo ""; } else echo "อีเมล์ \"$email\" ไม่ได้เป็นสมาชิกรับข่าวสารอยู่แล้ว"; } } function confirm($email, $conf) { $check_code = substr(strrev(md5($email).strtolower(soundex(email))),0,5); if ($conf == $check_code) { subscribe($email, "off", $GLOBALS['send_welcome']); } else { echo "

Your confirmation was not approved, an invalid code was specifed.

"; } } function remove_from_list($email) { // Removes the address from the file. global $list_file; $file = @file($list_file); $success = false; $fd = @fopen($list_file, "w") or die("The list data file could not be opened for writing."); if ($file) { foreach($file as $address) { $address = trim($address); if ($address != $email) fputs($fd, "$address\n"); else $success = true; } fclose($fd); } return $success; } function add_to_list($email) { // Adds the email address to the data file. global $list_file; $fd = @fopen($list_file, "a") or die("The list data file could not be opened.
Check the path and permissions."); fputs($fd, strtolower($email)."\n"); fclose($fd); return true; } function get_data($array, $keyword) { // Reads the message from the text file inbetween <$keyword> & foreach ($array as $i => $line) { if (trim($line) == "<$keyword>") { $i++; break; } } $array[$i] = trim($array[$i]); while ($array[$i] != "") { $tmp = stripslashes($array[$i]); $msg .= "\n$tmp"; $i++; $array[$i] = trim($array[$i]); } return $msg; } function valid_email($email) { // Returns true if email address has a valid form. $pattern = "^[-_.[:alnum:]]+@((([[:alnum:]]|[[:alnum:]][[:alnum:]-]*[[:alnum:]])\.)+(ad|ae|aero|af|ag|ai|al|am|an|ao|aq|ar|arpa|as|at|au|aw|az|ba|bb|bd|be|bf|bg|bh|bi|biz|bj|bm|bn|bo|br|bs|bt|bv|bw|by|bz|ca|cc|cd|cf|cg|ch|ci|ck|cl|cm|cn|co|com|coop|cr|cs|cu|cv|cx|cy|cz|de|dj|dk|dm|do|dz|ec|edu|ee|eg|eh|er|es|et|eu|fi|fj|fk|fm|fo|fr|ga|gb|gd|ge|gf|gh|gi|gl|gm|gn|gov|gp|gq|gr|gs|gt|gu|gw|gy|hk|hm|hn|hr|ht|hu|id|ie|il|in|info|int|io|iq|ir|is|it|jm|jo|jp|ke|kg|kh|ki|km|kn|kp|kr|kw|ky|kz|la|lb|lc|li|lk|lr|ls|lt|lu|lv|ly|ma|mc|md|mg|mh|mil|mk|ml|mm|mn|mo|mp|mq|mr|ms|mt|mu|museum|mv|mw|mx|my|mz|na|name|nc|ne|net|nf|ng|ni|nl|no|np|nr|nt|nu|nz|om|org|pa|pe|pf|pg|ph|pk|pl|pm|pn|pr|pro|ps|pt|pw|py|qa|re|ro|ru|rw|sa|sb|sc|sd|se|sg|sh|si|sj|sk|sl|sm|sn|so|sr|st|su|sv|sy|sz|tc|td|tf|tg|th|tj|tk|tm|tn|to|tp|tr|tt|tv|tw|tz|ua|ug|uk|um|us|uy|uz|va|vc|ve|vg|vi|vn|vu|wf|ws|ye|yt|yu|za|zm|zw)|(([0-9][0-9]?|[0-1][0-9][0-9]|[2][0-4][0-9]|[2][5][0-5])\.){3}([0-9][0-9]?|[0-1][0-9][0-9]|[2][0-4][0-9]|[2][5][0-5]))$"; if(eregi($pattern, $email)) return true; else return false; } function on_list($email) { // Returns true if email address is on list. global $list_file; $found = false; $file = @file($list_file); if ($file) { foreach ($file as $address) { if (trim($address) == trim($email)) { $found = true; } } } return $found; } function banned($email) { // Returns true if email is banned from subscribing. global $banned_addresses; $banned = false; $addresses = explode("\n", $banned_addresses); foreach ($addresses as $add) { if ($email == $add) { $banned = true; break; } } return $banned; } function send_welcome($email) { // Send confirmation letter to new subscriber. global $welcome_msg, $welcome_subject, $list_name, $owner_email, $sig, $version; $welcome_subject = "=?tis-620?B?".base64_encode(replace_shortcuts($welcome_subject, $email))."?="; $headers = "From: \"$list_name\" <$owner_email>\r\nReply-To: $owner_email\r\nX-Mailer: PHPMailList V$version http://php.warpedweb.net/\r\n"; $headers.="Content-Type: text/html; charset=TIS-620"; $welcome_msg .= "\n\n$sig"; $welcome_msg = replace_shortcuts($welcome_msg, $email); ini_set("sendmail_from", $owner_email); mail($email, $welcome_subject, $welcome_msg, $headers); } function send_confirm($email) { // Send message asking for confirmation. global $confirm_msg, $confirm_subject, $list_name, $owner_email, $version; $confirm_subject = "=?tis-620?B?".base64_encode(replace_shortcuts($confirm_subject, $email))."?="; $headers = "From: \"$list_name\" <$owner_email>\r\nReply-To: $owner_email\r\nX-Mailer: PHPMailList V$version http://php.warpedweb.net/\r\n"; $headers.="Content-Type: text/html; charset=TIS-620"; $confirm_msg = replace_shortcuts($confirm_msg, $email).$GLOBALS[sig]; mail($email, $confirm_subject, $confirm_msg, $headers); } function send_goodbye($email) { // Send goodbye message to unsubscriber. global $goodbye_msg, $goodbye_subject, $list_name, $owner_email, $version; $goodbye_subject = "=?tis-620?B?".base64_encode(replace_shortcuts($goodbye_subject, $email))."?="; $headers = "From: \"$list_name\" <$owner_email>\r\nReply-To: $owner_email\r\nX-Mailer: PHPMailList V$version http://php.warpedweb.net/\r\n"; $headers.="Content-Type: text/html; charset=TIS-620"; $goodbye_msg = replace_shortcuts($goodbye_msg, $email).$GLOBALS[sig]; mail($email, $goodbye_subject, $goodbye_msg, $headers); } function replace_shortcuts($msg, $email) { // Replaces the shortcuts used in when sending emails. global $list_name,$maillisturl; $conf_code = substr(strrev(md5($email).strtolower(soundex(email))),0,5); $msg = str_replace("%list_name%", $list_name, $msg); $msg = str_replace("%email%", $email, $msg); $msg = str_replace("%confirm_url%", "$maillisturl?action=confirm&email=$email&conf=$conf_code", $msg); $msg = str_replace("%subscribe_url%", "$maillisturl?action=sub&email=$email", $msg); $msg = str_replace("%unsubscribe_url%", "$maillisturl?action=unsub&email=$email", $msg); return $msg; } function admin_write_msg() { // Prints the form to send a message. global $username, $password, $owner_email, $list_name, $admin_keyword; echo " "; } function admin_send_msg_confirm() { // Confirms the message before sending. global $username, $password, $subject, $message, $owner_email, $list_name, $list_file, $admin_keyword, $use_sig; $subject = stripslashes($subject); $message = stripslashes($message); echo " "; } function admin_send_msg() { // Sends the message to all subscribers on the list. global $list_name, $list_file, $owner_email; set_time_limit(0); $subject = "=?tis-620?B?".base64_encode(stripslashes($GLOBALS[subject]))."?="; $message = stripslashes($GLOBALS[message]); $subject = str_replace("%%", "\"", $subject); $message = str_replace("%%", "\"", $message); $headers = "From: \"$list_name\" <$owner_email>\r\nReply-To: $owner_email\r\nX-Sender: $owner_email\r\nX-UnsubscribeURL: http://$GLOBALS[HTTP_HOST]$GLOBALS[SCRIPT_NAME]\r\nX-Mailer: PHPMailList V$GLOBALS[version] http://php.warpedweb.net/\r\nX-AntiSpam: PHPMailList did not send you this email, review below for sender info.\r\nX-AntiSpam: Sent by $GLOBALS[REMOTE_ADDR]\r\n"; $headers.="Content-Type: text/html; charset=TIS-620"; if ($GLOBALS[SERVER_ADMIN]) $headers .= "X-AntiSpam: Server Administrator $GLOBALS[SERVER_ADMIN]\r\n"; if ($GLOBALS['use_sig'] == "on") $message .= $GLOBALS['sig']; $sucess_count = 0; $fail_count = 0; $addresses = @file($list_file) or die("The list data file could not be opened.
Check the path and permissions."); $addresses[] = $owner_email; set_time_limit(0); foreach ($addresses as $email) { $email = trim($email); if (mail($email, $subject, $message, $headers)) $sucess_count++; else $fail_count++; } echo "

อีเมล์ถูกส่งสำเร็จ $sucess_count ฉบับ

อีเมล์ถูกส่งไม่สำเร็จ $fail_count ฉบับ

"; } function admin_view_subs() { // Displays the subscribers of the list. global $per_page, $page; if (!$per_page) $per_page = $GLOBALS[default_per_page]; if (!$page) $page = 1; $address_arr = @file($GLOBALS[list_file]) or die("ไม่พบอีเมล์สมาชิกรับข่าวสารในฐานข้อมูล
คุณยังไม่มีสมาชิกรับข่าวสาร หรือ ระบบทำงานผิดพลาด"); sort($address_arr); $count = count($address_arr); $total_page = floor($count/$per_page) + 1; $start_num = (($page * $per_page) - $per_page) + 1; if (($page+1) > $total_page) $end_num = $count; else $end_num = $page * $per_page; echo "

ดูอีเมล์ของสมาชิกทั้งหมด

มีสมาชิกขอรับข่าวสารทั้งสิ้น $count คน

Subscribers $start_num - $end_num

"; $start1 = $start_num -1; $end_num--; $j = $start_num; for($i = $start1; $i <= $end_num; $i++) { echo "\n"; $j++; } echo "

#	อีเมล์สมาชิก
$j	$address_arr[$i]

"; ?> "; } function admin_add_remove() { // Adding/Removing subscribers through admin. global $username, $password, $remove_address_arr, $list_file, $x, $y, $admin_keyword, $email, $admin_add_email_opt, $list_name; if ($x == "remove") { $file = @file($list_file) or die("ไม่พบอีเมล์สมาชิกรับข่าวสารในฐานข้อมูล
คุณยังไม่มีสมาชิกรับข่าวสาร หรือ ระบบทำงานผิดพลาด"); sort($file); echo " \n"; } elseif ($x == "remove_submit") { $sucess_count = 0; foreach ($_POST['remove_address_arr'] as $rm_add) { if (remove_from_list($rm_add)) { $sucess_count++; } } echo "จำนวน $sucess_count อีเมล์ ได้ถูกลบไปจากฐานข้อมูลแล้ว
"; } elseif ($x == "remove_all") { echo " โปรดอ่านที่นี่ก่อน

หลังจากคุณกดปุ่มด้านล่างอีเมล์ของสมาชิกทั้งหมดจะถูกลบออกหมดจากฐานข้อมูล

คุณต้องการลบอีเมล์สมาชิกรับข่าวสารทั้งหมดไหม ?
"; } elseif ($x == "remove_all_submit") { $fd = fopen($list_file, "w") or die("List Data file could not be opened."); fclose($fd); echo "อีเมล์สมาชิกรับข่าวสารทั้งหมดถูกลบไปแล้ว"; } elseif ($x == "add") { $email = trim($email); $welcome = "off"; $confirm = "off"; if ($admin_add_email_opt == "confirm") $confirm = "on"; elseif ($admin_add_email_opt == "welcome") $welcome = "on"; if ($y == "single") subscribe($email, $confirm, $welcome); elseif ($y == "many") { $email_arr = explode("\n", $email); foreach ($email_arr as $email) subscribe(trim($email), $confirm, $welcome); } else admin_print_add(); } admin_print_addremove_options(); } function admin_print_add() { global $username, $password, $admin_keyword; echo "

"; } function admin_print_addremove_options() { global $username, $password, $admin_keyword; echo " "; } function admin_print_options() { // Prints the administration options. global $username, $password, $admin_keyword; echo " "; } function admin_config() { // Changes the configuration/options of the script. global $s, $config_file, $newsig, $newusername, $newbanned_addresses, $newpassword, $newlist_name, $newlist_file, $newowner_email, $newsend_welcome, $newwelcome_subject, $newwelcome_msg, $newsend_goodbye, $newgoodbye_subject, $newgoodbye_msg, $newsend_confirm, $newconfirm_subject, $newconfirm_msg, $newdefault_per_page; if ($s == "submit") { echo "

"; $back_button = "

Your changes have not been saved.

"; if (!valid_email($newowner_email)) echo "Owner's Email address is invalid.".$back_button; elseif ($newusername == "") echo "You did not enter a username.".$back_button; elseif ($newpassword == "") echo "You did not enter a password.".$back_button; elseif ($newlist_name == "") echo "You did not enter a name for the list.".$back_button; elseif ($newlist_file == "") echo "You did not enter a path to the list data file.".$back_button; elseif ($newlist_file == "") echo "You did not enter a path to the list data file.".$back_button; elseif ($newconfirm_subject == "") echo "You did not enter subject for confirmation emails.".$back_button; elseif ($newconfirm_msg == "") echo "You did not enter confirmation email message.".$back_button; elseif ($newwelcome_subject == "") echo "You did not enter subject for welcome emails.".$back_button; elseif ($newwelcome_msg == "") echo "You did not enter welcome email message.".$back_button; elseif ($newgoodbye_subject == "") echo "You did not enter subject for goodbye emails.".$back_button; elseif ($newgoodbye_msg == "") echo "You did not enter goodbye email message.".$back_button; elseif ($newdefault_per_page == "") echo "You did not enter a number of default subscribers per page.".$back_button; elseif (!is_numeric($newdefault_per_page)) echo "The default number of subscribers per page must be an integer.".$back_button; else { $fd = @fopen($config_file, "w") or die("Could not open configuration file for writing."); $new_config = "$newusername\n$newpassword\n$newlist_name\n$newlist_file\n$newowner_email\n$newsend_confirm\n$newconfirm_subject\n$newsend_welcome\n$newwelcome_subject\n$newsend_goodbye\n$newgoodbye_subject\n$newdefault_per_page\n"; fputs($fd, $new_config); fputs($fd, "\n$newconfirm_msg\n\n"); fputs($fd, "\n$newwelcome_msg\n\n"); fputs($fd, "\n$newsig\n\n"); fputs($fd, "\n$newgoodbye_msg\n\n"); fputs($fd, "\n$newbanned_addresses\n"); fclose($fd); echo "การแก้ไขข้อมูลเสร็จเรียบร้อย

ถ้าคุณได้ทำการเปลี่ยน USERNAME หรือ PASSWORD โปรด LOGIN ใหม่อีกที

"; } echo ""; } else admin_print_config_form(); } function admin_print_config_form() { // Prints the configuration options. $list_file = stripslashes($list_file); echo "

แก้ไขข้อมูลระบบสมาชิกรับข่าวสาร
*เมื่อพิมพ์ : (สามารถใช้คำสั่ง HTML ในการจัดรูปแบบ เช่น ขึ้นบรรทัดได้ด้วย)* \"%list_name%\" จะแสดงชื่อที่กรอกในช่อง List Name \"%email%\" จะแสดงอีเมล์ของคุณ \"%confirm_url%\" จะแสดง LINK ที่ไว้ยืนยันการสมัครรับข่าวสาร \"%subscribe_url%\" จะแสดง LINK ที่ไว้ให้คลิ๊กเพื่อกลับไปสมัครสมาชิกอีกที \"%unsubscribe_url%\" จะแสดง LINK ที่ไว้ยกเลิกการรับข่าวสาร
ตั้งค่าการใช้งานทั่วไป
Username :
Password :
List Name :
List File :
อีเมล์ของคุณ :
จำนวนสมาชิกที่ต้องการให้แสดงต่อหน้า :
อีเมล์ที่จะแบนไม่ให้มาสมัครรับข่าวสารได้
อีเมล์ที่จะแบน : (พิมพ์เสร็จ 1 อีเมล์ให้ขึ้นบรรทัดใหม่)	$GLOBALS[banned_addresses]
ข้อความท้ายอีเมล์
พิมพ์ข้อความท้ายอีเมล์ :	$GLOBALS[sig]
ยืนยันการ สมัคร/ยกเลิก รับข่าวสาร
ให้ส่งอีเมล์ไปยืนยันก่อนไหม ?
หัวข้ออีเมล์ยืนยัน :
ข้อความอีเมล์ยืนยัน :	$GLOBALS[confirm_msg]
ข้อความต้อนรับสมาชิกรับข่าวสาร
เมื่อสมัครรับข่าวสาร ต้องการให้ส่งไปอีเมล์ต้อนรับไหม ?
หัวข้ออีเมล์ต้อนรับ :
ข้อความอีเมล์ต้อนรับ :	$GLOBALS[welcome_msg]
ข้อความบอกยกเลิกรับสมาชิกรับข่าวสาร
เมื่อยกเลิกรับข่าวสาร ต้องการให้ส่งอีเมล์ไปแจ้งยกเลิกไหม ?
หัวข้ออีเมล์ยกเลิกรับข่าวสาร :
ข้อความอีเมล์ยกเลิกรับข่าวสาร :	$GLOBALS[goodbye_msg]

"; } function admin_print_logon($msg) { // Prints the logon screen. echo " "; } function print_subscribe_form() { // Prints the subscription form. global $list_name; echo " "; } function print_footer() { // Prints the footer. global $version; echo "
"; } ?>

ส่งข่าวสารให้สมาชิกทั้งหมด คุณจะต้องใช้คำสั่ง HTML มาใช้ในการจัดรูปแบบข้อความด้วย (เช่น ขึ้นบรรทัดใหม่ใช้ <br>)
จาก:	\"$list_name\" <$owner_email>
หัวข้อ:
ข้อความ:
	ลงข้อความท้ายอีเมล์ด้วย

โปรดยืนยันข้อความที่ท่านต้องการส่งด้านล่างนี้ :
จาก :	\"$list_name\" <$owner_email>
หัวข้อ :	$subject
ข้อความ :	$message

เพิ่ม/ลบ สมาชิกรับข่าวสาร
	ลบสมาชิกรับข่าวสารทีละคน
	ลบสมาชิกรับข่าวสารทั้งหมด
	เพิ่มสมาชิกรับข่าวสาร

เลือกหัวข้อที่ท่านต้องการ
	ส่งข่าวสารให้สมาชิกทั้งหมด
	ดูอีเมล์ของสมาชิกทั้งหมด
	เพิ่ม/ลบ สมาชิกรับข่าวสาร
	แก้ไขข้อมูลระบบสมาชิกรับข่าวสาร

ระบบจัดการสมาชิกรับข่าวสารและยกเลิกรับข่าวสาร โปรดกรอก USERNAME และ PASSWORD เพื่อเข้าสู่ระบบ
USERNAME :
PASSWORD :

	Subscribe
Unsubscribe