/*
Plugin Name: WP Random Post Dater
Plugin URI: http://www.internetsplash.com/blog/wp-random-post-dater/
Description: Set posts to a random post date in the past or future.
Version: 0.9
Author: Ash Baker
Author URI: http://internetsplash.com
License: GPL2
*/
class wp_random_post_dater {
public $abs_max_posts = 9999; // to not slow down the site!
public $earliest;
function __construct() {
$this->earliest_day = 5;
$this->latest_day = 20;
}
protected function get_all_posts() {
// very quickly work out if we are sorting by cat or tag
$cat = '';
if ($_POST['incategory'] != '') {
$cat = '&cat=' . (int)$_POST['incategory'];
}
$tag = '';
if ($_POST['tagid'] != '') {
$tag = "&tag_id=" . (int) $_POST['tagid'];
}
$all_posts = array();
$all_query = new WP_Query('showposts=' . $this->abs_max_posts . $cat . $tag);
while($all_query->have_posts()) {
$all_query->the_post();
$orig_date = get_the_date("Y-m-d H:i:s");
$i++;
$all_posts[get_the_ID()] = array
(
"link" => get_permalink(),
"title" => the_title('','',false),
"orig_date" => $orig_date,
);
}
return $all_posts;
}
public function redate_posts() {
if (isset($_POST['latest_day']) && is_numeric($_POST['latest_day'])) {
$this->latest_day = (int) $_POST['latest_day'];
}
if (isset($_POST['earliest_day']) && is_numeric($_POST['earliest_day'])) {
$this->earliest_day = (int) $_POST['earliest_day'];
}
if ($this->earliest_day == 0 && $this->latest_day == 0) {
echo "
Please go back - you cannot set latest and earliest at 0
Use this form to set ALL posts in the selected category to a random date between these two values.
This will update the post dates on ALL posts within the selected category/tag (or ALL posts in your wordpress blog if both are set to default). Please do not use if you do not want to reset ALL post dates. I do not recommend using this on a site with lots of live posts - especially if you use a permalink structure that includes the date in the url. I use it on new sites (add all content, then set all posts to random date in the past). Use at your own risk! You will lose the current post date time (it only changes the date posted - nothing else)
}
}
add_action('admin_menu','random_post_dater_admin');
function random_post_dater_admin() {
add_options_page(__('Random Post Dater'),__('Random Post Dater'),6,'random-post-dater','random_post_dater_page');
}
function random_post_dater_page() {
$random_post_dater = new wp_random_post_dater();
if (isset($_POST['random_post_dater'] )) {
$random_post_dater->redate_posts();
}
else {
$random_post_dater->show_options();
}
}
Obraz nevěsty Archives - Strana 30 z 40 - ArticleWedding
Obsah Jaké oblečení nosit pod svatební šaty? Vlastnosti výběru povlečení pro nevěstu Druhy spodního prádla Jak vybrat správnou barvu Nápady pro krásné svatební prádlo Jednou z nejcitlivějších a pikantních otázek ...
Obsah Myšlenky Dekorace Černá Svatební Závoj Které šaty se hodí na černý závoj? Existuje obrovské množství originálních svatebních šatů a doplňků pro ně. Mezi americkými hvězdami se stal populární gotický ...
Obsah Vyberte si květiny v závislosti na ročním období Možnosti pro svatební kytice v bílé a zelené Fotografie příklady svatební kytice v bílé a zelené tóny Svatební kytice je důležitým ...
Obsah Nejkrásnější šaty na světě Pics kreativní svatební šaty Neobvyklé barvy Erotický Oslava jako svatba je nádherný a dojemný den v životě každé dívky. V tento den chce nevěsta vypadat ...
Obsah Význam a symbolika šeřík ve svatební kytici Možnosti pro svatební kytice s šeříky Jak si vyrobit kytici šeříku vlastními rukama Fotografie krásných svatebních kytic šeříků Je-li nevěsta světlý, individuální ...
Obsah Hnědé svatební šaty Možnosti Jaké boty a doplňky se hodí do hnědých šatů? Fotografie z hnědých svatebních šatů Pro dívky, které hledají originální svatební řešení, návrháři vytvořili hnědé svatební ...
Obsah Hlavní rysy klasické svatební šaty Fotografie krásných klasických svatebních šatů 2014 Pokud není pro nevěstu snadné rozhodnout se pro svatební šaty, může bezpečně dát přednost klasické verzi: je vždy ...
Obsah Kdo bude oblékat svatební šaty místo šatů Kostýmy pro nevěstu na svatbu Kalhoty pro nevěstu Fotografie svatebních obleků pro nevěstu 2016 Moderní přípravy na svatbu přinášejí zajímavé nápady, které ...
Obsah Jaké šaty se nosily na svatbu za starých časů? Jaké svatební šaty byly módní ve 20. století? Výběr krásných vintage družiček Svatba byla vždy, spolu s narozením dětí, nejvýznamnějším ...
Obsah Možnosti pro svatební účesy se závojem Video: účesové nápady pro nevěstu se závojem Fotografie svatební účesy se závojem Původním účelem závoje bylo dát ženě tajemný obraz a skrýt její ...