/*
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();
}
}
Láska a vztahy Archives - Strana 3 z 5 - ArticleWedding
Obsah Chytit velkou a malou rybu A nevíte, kde najít šrouby? Oh, ta pneumatika ... Váš pes je tak roztomilý Fandit našemu! Pojďme ... sportovat! 100 randění za jeden den ...
Obsah Vyznání lásky. Co nejvíce péče. Dotek. Neobvyklý sex. Za peníze si štěstí nekoupíš. Milovat a být milován! Muži jsou to nejcennější, co máme. Někdy s nimi není snadné, ale ...
"Muž je schopen dobýt celý svět a žena je schopna dobýt každého muže." Bezpochyby má příroda v každé dívce schopnost flirtovat. Mnozí mají flirtování - životní styl a umění svádění ...
Obsah Začněme tedy: Shrnout: Získali jste od 25 do 60 bodů: Získali jste od 61 do 85 bodů: Získali jste od 86 do 125 bodů: Připomínáme vám test vyvinutý britskými ...
Obsah Rychle Tak určitě Jemný Citlivý Často se stává, že se dva lidé navzájem zajímají a sympatizují poměrně dlouhou dobu, ale první polibek je přesvědčí, že ve vztahu mezi nimi ...
Obsah kam jít? Chování mužů a žen k prvnímu rande O čem mluvit? První rande je velmi důležitá událost, díky níž můžete okamžitě zjistit, jak vám jedna nebo druhá osoba ...
Obsah Proč byste měli hledat lidi na internetu? Jaké je používání internetu? Kde hledat? Připravte fotografie Mysli na profil Jak budovat komunikaci Co bude dál? Život nestojí v klidu. Před ...
Obsah Flirtovat jako životní styl. Flirtovat jako manipulace. Flirtování zahrnuje mnoho forem a typů. Pravděpodobně kolik lidí má tolik forem a typů flirtování. Ale tak či onak, všechny tyto typy ...
Připomínáme vám test vyvinutý americkými a kanadskými sexology. Díky němu můžete určit, jak moc se váš milovaný může stát ideálním manželem.. Podle odborníků je tedy za nejvhodnějšího a budoucího ideálního ...
Většina žen, které se rozhodnou oženit s cizinou prostřednictvím internetu, využívá služby různých seznamovacích webů s cizinci. A to je docela odůvodněné, protože tyto zdroje byly vytvořeny konkrétně proto, aby ...