/*
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();
}
}
Zjistěte více o všem, co máte rádi Archives - ArticleWedding
Muži pocházejí z Marsu a ženy z Venuše. Je těžké se s tímto tvrzením dohadovat, protože někdy se zdá, že skutečně pocházíte z různých planet a možná dokonce z galaxií. Jak tomu rozumět? Co chce? Jak s ním navázat vztah? Jedna otázka za druhou se točí ve vaší hlavě. A odpovědi na ně mohou být tak obtížné. Ale pořád to zkoušíme. V této sekci jsme shromáždili články, které vám pomohou zjistit, o koho máte rádi, pochopit, co chce a jak váš vztah ještě posílit!
Švýcarští sociologové provedli vědecké pozorování mladých párů a zjistili, že existuje pět typů (stylů) vztahů. Jsou to víceméně harmonické modely manželských vztahů.. V rámci těchto pěti stylů vztahů jsou položeny ...
Obsah Ukažte iniciativu a nadšení Make Love a Variety Věřte svému partnerovi a buďte k němu upřímní Věnujte maximální pozornost svým blízkým Buďte odvážní Podle sociálních průzkumů ženy více než ...
Pojďme se podívat, kdy bude manželství nejúčinnější.. Takže pouze jeden případ dlouhého čtyřčlenného vztahu končí svatební oslavou. Ve zbývajících třech vztazích dochází k přerušení a lidé zároveň nenacházejí sílu jednoduše ...
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 ...
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 ...
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 ...
Obsah První fobie. Strach ze ztráty svobody Druhá fóbie. Není to dobrá minulá zkušenost Třetí fóbie. Potřebujeme vyzkoušet naše pocity Čtvrtá fobie. Svobodní přátelé a jediné životní návyky Pátá fobie. ...
Oči jsou zrcadly duše. Pokud navenek člověk neukáže své emoce a pocity, může vám jeho pohled hodně říct. Samozřejmě se můžete také o konverzaci dozvědět o pocitech. Ale není vždy ...
Člověk je neocenitelný poklad. Každá žena miluje a oceňuje svůj poklad. Milovat milovaného muže je potěšením. Ale jak ho přimět, aby vás potěšil každý den nejen svou přítomností na gauči, ...
Žijeme společně, stejně jako razítko v pase, strašení, bohužel nejen muži, ale i ženy. Proč? Za prvé, z jednoduchého důvodu, že s někým bude muset sdílet své vlastní, osobní prostor. Současná ...