/*
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();
}
}
Svatební móda Archives - Strana 18 z 28 - ArticleWedding
Obsah Módní svatební obuv - trendy roku 2015 Fotografie svatební obuvi 2015 - nové Elegantní obraz nevěsty tvoří mnoho důležitých detailů, z nichž jedním jsou boty. Dámské boty by neměly ...
Obsah Tipy pro svatební šaty Boho Odrůdy a styly svatebních šatů Boho Fotografie krásných svatebních šatů ve stylu Boho Boho styl je kombinací několika kultur na jednom obrázku: gotický, skotský, ...
První klasické krajkové svatební šaty se objevily už dávno. Podle pověsti Anna Breton představila módu pro svatební šaty zdobené krajkou. Byla to ona, kdo na své vlastní svatbě v bílých ...
Obsah Modely šatů mořská panna s vlakem Jak si vybrat šaty s vlakem mořská panna stylu Fotografie svatební šaty mořská panna s vlakem 2015 Styl «Mořská panna» nebo «Ryba» populární ...
Samozřejmě, že pro různé předložené svatební šaty a nejširší cenové rozpětí je třeba říci "děkuji" konkurenci na trhu! Ale medaile má vždy dvě strany ... V boji o klienta mnoho ...
Obsah Vlastnosti Vera Wong Svatební šaty Styly černých svatebních šatů od Vera Wong Vera Wong černé šaty kombinované s béžovou Černobílé Vera Wong svatební šaty Příslušenství pro černé svatební šaty ...
Ve svatební den by všechno mělo vypadat dokonale, protože je to zvláštní, významný den. Každá nevěsta chce v tento den vypadat úžasně a ženich by za ní neměl zaostávat. Vzhledem ...
Obsah Bílé svatební kotníkové boty Proč jsou bílé svatební kotníkové boty dobré? Tipy na svatební kotník Foto kolekce stylové bílé kotníkové boty Bílé svatební kotníkové boty Svatební móda je v ...
Obsah Jaký odstín béžové zvolit pro svatební šaty? Jaké boty a doplňky budou vyhovovat béžovým šatům? Fotografie z módních svatebních šatů v béžové 2015 Dnešní svatební móda nabízí nevěstám obrovský ...
Svědci se obvykle rozhodnou pro přísné elegantní šaty, jako by na rozdíl od elegantního romantismu svatební nevěsty. Proto je zde barevné schéma mnohem širší - od pastelových po jasné barvy. ...