possuo um arquivo que irei usar com cron, e ele fará uma tarefa diaria, em que procará se todos os links de meu banco de dados na tabela downline estão linkando com o site que eu quero.. se não estiver likado, colocará o ativo como 0, e se estiver linkando colocará como 1..
conforme a funçao para verificar os sites que nosso amigo Renam postou aqui :http://forum.wmonline.com.br/index.php?showtopic=185002
segue os arquivos:
1dia.php
<?function get_site($url){ // init $ch = curl_init(); // set the URL of the VPC curl_setopt ($ch, CURLOPT_URL, $url); curl_setopt ($ch, CURLOPT_SSL_VERIFYPEER, 0); ob_start(); // Execute curl_exec($ch); // Get response $response = ob_get_contents(); ob_end_clean(); return $response;}include ('conecta.php');// Pega endereço do site$consulta = "SELECT url_site FROM configuracoes WHERE config = '1' LIMIT 1";$resultado = mysql_query($consulta) or die("Falha na execução da consulta");while ($linha = mysql_fetch_assoc($resultado)){$url_site = $linha["url_site"]; }// URL do site está pega, e configurada para enviar a todos os links.// Pegando lista de urls do banco de dados$busca=mysql_query("SELECT url FROM downline");while($ver=mysql_fetch_assoc($busca)){$id = $ver['id']; $url = $ver['url']; // Definindo url do site para buscar por um link de volta ao nosso site$site = get_site('$url/?pagina=upline');// 1 Está Linkandoif (eregi('$url_site', $site)) {// Coloca como ativo = 1$consulta = "UPDATE `$banco`.`downline` SET `ativo` = '1' WHERE `downline`.`id` =$id LIMIT 1";$resultado = mysql_query($consulta);// 2 Não está linkando} else {//Modifica de ativado = 1 para ativo = 0$consulta = "UPDATE `$banco`.`downline` SET `ativo` = '0' WHERE `downline`.`id` =$id LIMIT 1";$resultado = mysql_query($consulta);} // Fim do Não está linkando//Fecha conexao com banco de dados.}?>conecta.php
<? // Proteção extra!! Bloqueando Acesso Direto a esse arquivo!if (stristr(htmlentities($_SERVER['PHP_SELF']), "conecta.php")) { Header("Location: index.php"); die();}// Conectando ao Banco de Dados$host = 'localhost';$user = 'usuario';$senha = 'senha';$banco = 'banco de dados';// Função de conectar$link = mysql_connect("$host", "$user", "$senha") or die("Não foi possível conectar ao banco de dados");mysql_select_db("$banco") or die("Não foi possível selecionar o banco de dados");?>dados do banco de dados:
CREATE TABLE `configuracoes` ( `config` varchar(10) NOT NULL default '1', `online` tinyint(4) NOT NULL default '1', `mensagemoffline` text NOT NULL, `nomesiteprincipal` varchar(255) NOT NULL default '', `url_site` varchar(255) NOT NULL default '', `urlsiteprincipal` varchar(255) NOT NULL default '', `finalpagina` text NOT NULL, `nomesite` varchar(255) NOT NULL default '', `email` varchar(255) NOT NULL default '', `meta_desc` text NOT NULL, `meta_key` text NOT NULL, PRIMARY KEY (`config`)) TYPE=MyISAM;INSERT INTO `configuracoes` VALUES ('1', 1, '<div style="text-align: center;">Desculpe, mas no momentos estamos com o site offline para manutenção..<br><br>Por favor tente novamente mais tarde!!<br></div> ', 'Conheça nosso Site Principal!', 'http://www.ctdo.com.br', 'http://www.ctdo.com.br', 'Site atualizado de acordo quando novos patrocinadores, troca de banners, cliques por dinheiro vao surgindo.\r\n<br>\r\nMelhor Visualizado em 1024x768 No navegador Mozilla Firefox\r\nCopyright © 2007 \r\n<a href="http://www.ctdo.com.br" target="_blank">CTDO - Central de Diversão Online</a> Todos os Direitos Reservados<br> ', 'Publicidade CTDO :: Ganhe $$ Com seu Site e Gere muito mais visitas para seu site!!', 'publicidade@ctdo.com.br', 'teste 1 Faça muito $$ com nosso programa, e ainda gere muito mais tráfego para seu site!', 'teste 2 troca de banner, trocabanner, troca banner, troca de link, trocalink, troca de links, trocadelink, auto surf, autosurf, manual surf, manualsurf, patrocinamos, patrocinador, patrocinadores, bux, clique, dinheiro, clique por dinheiro, clique por $, publicidade, ads');CREATE TABLE `downline` ( `id` tinyint(4) NOT NULL auto_increment, `ativo` tinyint(4) NOT NULL default '0', `email` varchar(255) NOT NULL default '', `nomesite` varchar(255) NOT NULL default '', `url` varchar(255) NOT NULL default '', PRIMARY KEY (`id`), UNIQUE KEY `url` (`url`)) TYPE=MyISAM AUTO_INCREMENT=21 ;INSERT INTO `downline` VALUES (1, 1, 'email@email.com', 'teste', 'http://publicidade.ctdo.com.br');alguem pode me dizer o que está de errado nisso?
ele simplesmente não faz o que devia de fazer.. verificar todos os links, se estiver linkando atualiza para ativo = 1, e se nao está atualiza para ativo = 0..
grato
Edição feita por: dilneiss, 13/09/2007, 08:08.
