Pereiti prie turinio

ZTG

Nariai
 Profilis  Nario turinys ir veikla

  • Pranešimai

    191

  • Užsiregistravo

  • Lankėsi

  • Atsiliepimai

    100%

 Turinio tipas 

ZTG Pranešimai

    Web scraping

    Programuotojų kampas

    Atrašyta · Redagavo ZTG

    Ačiū už paaiškinimą, bet esu žalias programavime. Mane tik domina darbo sudėtingumas ir preminali kaina. :)

    Susisiekaiu su Daruz ir parasiau jam skripta kuris tikrina pasta, bet pasirodo, kad hostgator blokuoja prisijungimus prie google mail. Galvoju taip ir su kitais hostingais. Kam rekia stai skriptas:

    index.php

    <?php
session_start(); 

if(isset($_SESSION['user'])) {

	header("Location: admin/index.php");

} else {
	echo "<form action=handler.php method=post>
Vartotojo vardas: <input type=text name=name value=><br>  
Slaptazodis: <input type=password name=password value=><br>  
<input type=submit value=Siusti>  
</form>";
}
?>

    handler.php

    <?php 
include('admin/config.php');
$conf = new config;

$dblocation = $conf->dbloc;  
$dbname = $conf->dbname;  
$dbuser = $conf->dbuser;  
$dbpasswd = $conf->dbpasswd;  

$dbcnx = @mysql_connect($dblocation,$dbuser,$dbpasswd);  
if (!$dbcnx) {  
	echo( "<P>DB serveris nepasiekiamas.</P>" );  
	exit();  
}  
if (! @mysql_select_db($dbname,$dbcnx) ) {  
	echo( "<P>DB nepasiekiama.</P>" );  
	exit();  
}  
$query = "SELECT password FROM users WHERE name='".$_POST['name']."'";  
$nme = mysql_query($query);  
if(!$nme) {  
	echo mysql_error(); 
	echo "Uzklausa neivykdyta";  
	exit();  
}  
if(mysql_num_rows($nme) > 0) {    
	$password = mysql_result($nme, 0);  
	if ($_POST['password'] == $password) { 
		if(session_start()) { 
			$_SESSION['user'] = $_POST['name']; 
			$_SESSION['password'] = $_POST['password']; 
			echo "<HTML><HEAD> 
		         <META HTTP-EQUIV='Refresh' CONTENT='0; URL=index.php'> 
		         </HEAD><body>"; 
		} 
	} else {  
		echo "Identifikavimo klaida: neteisingas slaptazodis";  
		exit();  
	}  
} else {  
	echo "Identifikavimo klaida: vartotojas neregistruotas";  
	exit();  
}  
?>

    logout.php

    <?php
 session_start();
 unset($_SESSION['username']); 
 session_destroy();
 echo "<HTML><HEAD><META HTTP-EQUIV='Refresh' CONTENT='0; URL=index.php'></HEAD><body>"; 
?>

    admin/checker.php

    <?php
require("class-IXR.php");
include('../admin/config.php');
$conf = new config;
$client = new IXR_Client($conf->adresas.'/xmlrpc.php');
$USER = $conf->name;
$PASS = $conf->password;
$mbox = imap_open("{imap.gmail.com:993/imap/ssl}INBOX", $conf->email, $conf->gpassword) or die("can't connect: " . imap_last_error());
$emails = imap_search($mbox,'ALL');

$dblocation = $conf->dbloc;  
$dbname = $conf->dbname;  
$dbuser = $conf->dbuser;  
$dbpasswd = $conf->dbpasswd;     
$dbcnx = @mysql_connect($dblocation,$dbuser,$dbpasswd);  
if (!$dbcnx) {  
	echo( "<P>DB serveris nepasiekiamas.</P>" );  
	exit();  
}  
if (! @mysql_select_db($dbname,$dbcnx) ) {  
	echo( "<P>DB nepasiekiama.</P>" );  
	exit();  
}  	


if($emails) {
	rsort($emails);

	foreach($emails as $email_number) {
		$output1 = '';
		$output2 = '';
		$output3 = '';

		$overview = imap_fetch_overview($mbox,$email_number,0);
		$message = imap_fetchbody($mbox,$email_number,2);
		$pos1 = strpos($message, $conf->pos1);
		$pos2 = strpos($message, $conf->pos2);

		$output1.= $overview[0]->subject;
		$output2.= $overview[0]->from;
		$output3.= $overview[0]->date.'<br>';

		$mes = substr($message, $pos1, $pos2);
		if($mes) {
			$mess = quoted_printable_decode($mes);

			if (strpos($output2, $conf->emx) !== false)
			{
				$query = "SELECT subject FROM system_mail_list WHERE date='".$overview[0]->date."'";
				$nme = mysql_query($query);  
				if(!$nme) {  
					echo mysql_error(); 
					echo "Uzklausa neivykdyta";  
					exit();  
				}  
				if(mysql_num_rows($nme) > 0) {    
					$subject = mysql_result($nme, 0);  
					if ($overview[0]->subject !== $subject) {
						$query2 = "INSERT INTO system_mail_list VALUES (NULL, '".$overview[0]->subject."', '".$overview[0]->from."', '".$overview[0]->date."');";
						$nme2 = mysql_query($query2);  
						if(!$nme2) {  
							echo mysql_error(); 
							echo "Uzklausa neivykdyta";  
							exit();  
						}

						$output3.= str_replace('</div><br>','',$mess);    
						$content['title'] = $output1;
						$content['categories'] = array($conf->cat);
						$content['description'] = utf8_encode($output3);
						$content['custom_fields'] = array( array('key' => 'my_custom_fied','value'=>'yes') );
						$content['mt_keywords'] = array($conf->tag);

						if (!$client->query('metaWeblog.newPost','', $USER,$PASS, $content, true)) 
						{
							die( 'Ivyko publikavimo klaida' . $client->getErrorCode() ." : ". $client->getErrorMessage());  
						}
						$ID =  $client->getResponse();
						if($ID){
							header("Location: ../admin/index.php");				
						}  					
					}
				} else {
					$query2 = "INSERT INTO system_mail_list VALUES (NULL, '".$overview[0]->subject."', '".$overview[0]->from."', '".$overview[0]->date."');";
					$nme2 = mysql_query($query2);  
					if(!$nme2) {  
						echo mysql_error(); 
						echo "Uzklausa neivykdyta";  
						exit();  
					}
					$output3.= str_replace('</div><br>','',$mess);     
					$content['title'] = $output1;
					$content['categories'] = array($conf->cat);
					$content['description'] = utf8_encode($output3);
					$content['custom_fields'] = array( array('key' => 'my_custom_fied','value'=>'yes') );
					$content['mt_keywords'] = array($conf->tag);

					if (!$client->query('metaWeblog.newPost','', $USER,$PASS, $content, true)) 
					{
						die( 'Ivyko publikavimo klaida' . $client->getErrorCode() ." : ". $client->getErrorMessage());  
					}
					$ID =  $client->getResponse();
					if($ID){
						header("Location: ../admin/index.php");				
					}
				}			
			}
		}
	}
}

imap_close($mbox);
?>

    admin/class-IXR.php (is wordpress imamas)

    admin/config.php

    <?php
class config
{
  var $adresas = 'http://.lt';
  var $name = 'admin';
  var $password = '';
  var $email = '@gmail.com';
  var $gpassword = '';
  var $emx = '@mail.com';
  var $pos1 = '<div marginwidth=3D"0" marginheight=3D"0">';
  var $pos2 = '</div><br>';
  var $cat = 'NewCategory';
  var $tag = 'from e-mail';
  /*MySQL db duomenys*/
  var $dbloc = 'localhost';
  var $dbname = 'db';
  var $dbuser = 'user';
  var $dbpasswd = '';
}
?>

    admin/handler.php

    <?php 
session_start();
if ($_SESSION['user'] == 'admin') {
	updateConfig('$adresas', $_POST['adresas']);
	updateConfig('$name', $_POST['name']);
	updateConfig('$password', $_POST['password']);
	updateConfig('$email', $_POST['email']);
	updateConfig('$gpassword', $_POST['gpassword']);
	updateConfig('$emx', $_POST['emx']);
	updateConfig('$pos1', stripslashes($_POST['pos1']));
	updateConfig('$pos2', stripslashes($_POST['pos2']));
	updateConfig('$cat', $_POST['cat']);
	updateConfig('$tag', $_POST['tag']);
	updateConfig('$dbloc', $_POST['dbloc']);
	updateConfig('$dbname', $_POST['dbname']);
	updateConfig('$dbuser', $_POST['dbuser']);
	updateConfig('$dbpasswd', $_POST['dbpasswd']);
	echo "<HTML><HEAD><META HTTP-EQUIV='Refresh' CONTENT='0; URL=index.php'></HEAD><body>"; 
} else {
	echo "<HTML><HEAD><META HTTP-EQUIV='Refresh' CONTENT='0; URL=index.php'></HEAD><body>";
	}		
function updateConfig($parameter, $value)
{	
	$file = file_get_contents('config.php');
	$fileLines = explode("\n", $file);
	for($i=0;$i<count($fileLines);$i++)
	{
		if(strstr($fileLines[$i], $parameter))
		{
			$fileLines[$i] = "   var " . $parameter . " = '" . $value . "';";
		}
	}
	$file = implode("\n", $fileLines);
	file_put_contents('config.php', $file);
}
?>

    admin/index.php

    <?php
session_start();
if ($_SESSION['user'] == 'admin') {

	include('../admin/config.php');

	if(isset($_SESSION['user'])) echo "Sveiki, <a href='../admin/index.php'>".$_SESSION['user']."</a>! | <a href='../admin/checker.php'>tikrinti pasta dabar</a> | <a href='../admin/list.php'>rodyti visus atsiustus laiskus</a> | <a href='../logout.php'>atsijungti</a>";

	$conf = new config;


	echo '<form action=handler.php method=post><TABLE BORDER=0 CELLSPACING=2 CELLPADDING=0>
	<TR>
	<TD ALIGN="left" width="200">Wordpress svetaines adresas:</TD>
	<TD ALIGN="left" width="200"><input type=text name=adresas value="'.$conf->adresas.'"></TD>
	<TD ALIGN="left" width="200">*pvz, http://svetaine.net</TD>
	</TR>
	<TR>
	<TD ALIGN="left" width="200">Wordpress vartotojo vardas:</TD>
	<TD ALIGN="left" width="200"><input type=text name=name value="'.$conf->name.'"></TD>
	<TD ALIGN="left" width="200">*pvz, admin</TD>
	</TR>
	<TR>
	<TD ALIGN="left" width="200">Wordpress vartotojo slaptazodis:</TD>
	<TD ALIGN="left" width="200"><input type=password name=password value="'.$conf->password.'"></TD>
	<TD ALIGN="left" width="200">*pvz, 123qwe</TD>
	</TR>
	<TR>
	<TD ALIGN="left" width="200">GMAIL pasto adresas:</TD>
	<TD ALIGN="left" width="200"><input type=text name=email value="'.$conf->email.'"></TD>
	<TD ALIGN="left" width="200">*pvz, [email protected]</TD>
	</TR>
	<TR>
	<TD ALIGN="left" width="200">GMAIL pasto slaptazodis:</TD>
	<TD ALIGN="left" width="200"><input type=password name=gpassword value="'.$conf->gpassword.'"></TD>
	<TD ALIGN="left" width="200">*pvz, 1234qwer</TD>
	</TR>
	<TR>
	<TD ALIGN="left" width="200">Siuntejo pasto adresas:</TD>
	<TD ALIGN="left" width="200"><input type=text name=emx value="'.$conf->emx.'"></TD>
	<TD ALIGN="left" width="200">*pvz, [email protected]</TD>
	</TR>
	<TR>
	<TD ALIGN="left" width="200">Laisko pradzia:</TD>
	<TD ALIGN="left" width="200"><input type=text name=pos1 value="'.htmlspecialchars($conf->pos1).'"></TD>
	<TD ALIGN="left" width="200">*pvz, '.htmlspecialchars('<div><div>').'</TD>
	</TR>
	<TR>
	<TD ALIGN="left" width="200">Laisko pabaiga:</TD>
	<TD ALIGN="left" width="200"><input type=text name=pos2 value="'.htmlspecialchars($conf->pos2).'"></TD>
	<TD ALIGN="left" width="200">*pvz, '.htmlspecialchars('</div></div>').'</TD>
	</TR>
	<TR>
	<TD ALIGN="left" width="200">Wordpress kategorija:</TD>
	<TD ALIGN="left" width="200"><input type=text name=cat value="'.$conf->cat.'"> </TD>
	<TD ALIGN="left" width="200">*pvz, NewCategory</TD>
	</TR>
	<TR>
	<TD ALIGN="left" width="200">Wordpress iraso TAG:</TD>
	<TD ALIGN="left" width="200"><input type=text name=tag value="'.$conf->tag.'"></TD>
	<TD ALIGN="left" width="200">*pvz, from email</TD>
	</TR>
	<TR>
	<TD ALIGN="left" width="200">MySQL DB adresas:</TD>
	<TD ALIGN="left" width="200"><input type=text name=dbloc value="'.$conf->dbloc.'"></TD>
	<TD ALIGN="left" width="200">*pvz, localhost</TD>
	</TR>
	<TR>
	<TD ALIGN="left" width="200">MySQL DB pavadinimas:</TD>
	<TD ALIGN="left" width="200"><input type=text name=dbname value="'.$conf->dbname.'"></TD>
	<TD ALIGN="left" width="200">*pvz, db1</TD>
	</TR>
	<TR>
	<TD ALIGN="left" width="200">MySQL DB vartotojas:</TD>
	<TD ALIGN="left" width="200"><input type=text name=dbuser value="'.$conf->dbuser.'"></TD>
	<TD ALIGN="left" width="200">*pvz, root</TD>
	</TR>
	<TR>
	<TD ALIGN="left" width="200">MySQL DB slaptazodis:</TD>
	<TD ALIGN="left" width="200"><input type=text name=dbpasswd value="'.$conf->dbpasswd.'"></TD>
	<TD ALIGN="left" width="200">*pvz, 123qwe</TD>
	</TR>
	<TR>
	<TD ALIGN="left" width="200"><input type=submit value=Siusti></TD>
	<TD ALIGN="left" width="200"></TD>
	<TD ALIGN="left" width="200"></TD>
	</TR>
	</TABLE></form>';
} else {
	echo "Tu neprisijungtas matyti sita puslapi!";
	}
?>

    admin/list.php

    <?php
session_start();
if ($_SESSION['user'] == 'admin') {
	if(isset($_SESSION['user'])) echo "Sveiki, <a href='../admin/index.php'>".$_SESSION['user']."</a>! | <a href='../admin/checker.php'>tikrinti pasta dabar</a> | <a href='../admin/list.php'>rodyti visus atsiustus laiskus</a> | <a href='../logout.php'>atsijungti</a>";
	include('../admin/config.php');
	$conf = new config;

	$dblocation = $conf->dbloc;  
	$dbname = $conf->dbname;  
	$dbuser = $conf->dbuser;  
	$dbpasswd = $conf->dbpasswd;  

	$dbcnx = @mysql_connect($dblocation,$dbuser,$dbpasswd);  
	if (!$dbcnx) {  
		echo( "<P>DB serveris nepasiekiamas.</P>" );  
		exit();  
	}  
	if (! @mysql_select_db($dbname,$dbcnx) ) {  
		echo( "<P>DB nepasiekiama.</P>" );  
		exit();  
	}  
	$query = "SELECT subject, email_from, date FROM system_mail_list";  
	$nme = mysql_query($query);  
	if(!$nme) {  
		echo mysql_error(); 
		echo "Uzklausa neivykdyta";  
		exit();  
	}
	$x = 0;
	print "<br> Gauti laiskai:";
	print "<table>\n";
	print "<tr>\n<td>Subject</td><td>From</td><td>Date</td>\n</tr>\n";
	while ($x < mysql_numrows($nme)) {   
		$res1 = mysql_result($nme, $x,'subject');
		$res2 = mysql_result($nme, $x,'email_from');
		$res3 = mysql_result($nme, $x,'date');
		print "<tr>\n";
		print "<td>$res1</td>\n<td>$res2</td>\n<td>$res3</td>\n";
		print "</tr>\n";
		$x++;
	}
	print "</table>";
	mysql_close();
} else {
	echo "<HTML><HEAD><META HTTP-EQUIV='Refresh' CONTENT='0; URL=index.php'></HEAD><body>";
	}
?>

     

    MySQL kodas

    CREATE TABLE IF NOT EXISTS `system_mail_list` (
 `id_position` int(11) NOT NULL AUTO_INCREMENT,
 `subject` text COLLATE utf8_bin NOT NULL,
 `email_from` text COLLATE utf8_bin NOT NULL,
 `date` text COLLATE utf8_bin NOT NULL,
 PRIMARY KEY (`id_position`)
) ENGINE=MyISAM  DEFAULT CHARSET=utf8 COLLATE=utf8_bin AUTO_INCREMENT=0 ;

CREATE TABLE IF NOT EXISTS `users` (
 `id` int(11) NOT NULL AUTO_INCREMENT,
 `name` text NOT NULL,
 `password` text NOT NULL,
 PRIMARY KEY (`id`)
) ENGINE=MyISAM  DEFAULT CHARSET=latin1 AUTO_INCREMENT=2 ;


INSERT INTO `users` (`id`, `name`, `password`) VALUES
(1, 'admin', 'admin');

     

    ka daro skriptas???

    skriptas per XMLRPC raso irasus i wordpress, irasai imami is email per IMAP. konfiguracija parasyta kaip wordpress.

     

    ka tik patikrinau, veikia ir su Rambler

    Dirbtinis intelektas versle

    Verslo kūrimas ir vystymas

    Atrašyta · Redagavo ZTG

    Sveiki,

     

    Ar nieikad nepaglvojote apie dibrtinio intelekto integracija i savo versla?

    atlikti fukcijas kurios tikrai nereikalauja tavo didelio intelekto ir supratimo.

     

    Kai programa galetu vertinti, surasti, priimti sprendima. Planuociau isleisti nemazus pinigus

    dirbtinio intelekto integracijai i viena is mano verslu - turiu aiskia uzduoti tam, jei surasiu programuotojus

    ir pavyks sukordinuot viska.

     

    Tadas

    ne, nes pries dvejus metus skaiciau straipsni apie dirbtini intelekta pasaulyje webplanet.ru ir ten kiekvienam projektui(research) buvo skiriama (mano manymu) nuo 100 tkst. USD. Versle tokie sprendimai, galvoju, tikrai daug kainuotu.

     

    Facebook jau integravo ukrainos mokslininku "sprendima" dirbtinio intelekto srityje.

    quoted printable fukcija PHP

    Programuotojų kampas

    Atrašyta

    O kam tau šitos funkcijos jeigu nori tik pašalinti laišką? Pabandyk nusiųsti:

     

    'UID STORE ' . $uid . ' +FLAGS (\\Deleted)'

    ne taip! nuo tos specifikacijos liko neskaitomas tekstas su simboliais. noriu pasalinti simbolius. dabar galvoju kad tai HTML tag levas. tai aiskinu jau diena. :unsure:

    Prekiu katalogas ant PHP

    Programuotojų kampas

    Atrašyta

    Jeigu jau imsi framework'ą patarčiau iškarto pradėti nuo rimtesnio (jeigu turi loginį mąstymą apie MVC). Išmoksi dirbti su šiuo frameworku atsivers platesnės galimybės.

    Čia tik patarimas tau į ateitį.

    tai tas softtime, tik su web elementais dirbti ir tiek, jei daugiau tai visu tu framework funkciju paciam rasyti, pvz, API proektavimas, Templates, Cashing ir pn.

    Prekiu katalogas ant PHP

    Programuotojų kampas

    Sukurta

    Sveiki, pradejau rasyti sau ant PHP katalogo su prekiais administravimo posisteme. Tam sukuriau administratorius autorizavima (kad niekas negaletu ilisti) ir sukuriau dvi duomenu lenteles su kategorijais ir pozicijomis ir viena vartotojams. Po to nukopijavau softtime framework su utils katalogu is CD disko. Po to parasiau bylos su kodu, skirti paciam administravimui.

    Administravimas susideda is kategoriju administravimo ir poziciju administravimo. Gali buti bet kiek subkategoriju ir poziciju. Po atliktu veiksmu liko dadaryti atvaizdavima pagrindiniame puslapyje, ir su siek tiek redagavimu galima daryti straipsniu katalogus ir nuorodu katalogus ir pn.

    Kai parasysiu daugiau, ikelsiu koda ir daugiau paveiksleliu.

    post-40557-0-82704500-1318605486_thumb.png

    Mandriva 2011 installation is VirtualBox

    Kompiuteriai ir programinė įranga

    Sukurta

    Sveiki, gal kam prireiks trumpa apzvalga su paveiksleliais apie Mandriva 2011 64 bit OS instaliavima is VirtialBox. Pirma paleidziam VirtualBox, nustatome kompiuterio parametrus ir HDD skyriam bent 10 GB. Noriu pasakyti kad ir kiek skirtumem RAM, OS siek tiek stabdys. Kai viska nustatet ir paleidziate su prisegtu ISO VirtualBox sesija, matysit tokius vaizdelius(apacioje). Mandriva mano manymu skirta daugiau bedravimui.

    post-40557-0-62557200-1317812625_thumb.png

    post-40557-0-71073200-1317812633_thumb.png

    post-40557-0-38453300-1317812642_thumb.png

    post-40557-0-68554300-1317812647_thumb.png

    post-40557-0-51823600-1317812652_thumb.png

    post-40557-0-94472500-1317812658_thumb.png

    post-40557-0-90467800-1317812664_thumb.png

    post-40557-0-14561500-1317812671_thumb.png

    post-40557-0-13168800-1317812676_thumb.png

    post-40557-0-13742100-1317812681_thumb.png

    post-40557-0-23128600-1317812686_thumb.png

    post-40557-0-92909800-1317812691_thumb.png

    post-40557-0-96523300-1317812698_thumb.png

    post-40557-0-81944200-1317812705_thumb.png

    post-40557-0-28584900-1317812711_thumb.png

    post-40557-0-05733200-1317812718_thumb.png

    post-40557-0-90971000-1317812723_thumb.png

    post-40557-0-80554800-1317812729_thumb.png

    post-40557-0-10953900-1317812738_thumb.png

    post-40557-0-23075000-1317812745_thumb.png

    post-40557-0-05110200-1317812752_thumb.png

    post-40557-0-31234100-1317812759_thumb.png

    post-40557-0-93805600-1317812766_thumb.png

    post-40557-0-80833400-1317812777_thumb.png

    post-40557-0-88865000-1317812789_thumb.png

    post-40557-0-12637600-1317812800_thumb.png

    Pilnas domenu sarasas su .LT galune

    Tinklalapių kūrimas

    Atrašyta · Redagavo ZTG

    Googlas pagal vieną paieškos raktą max 1000 rezultatų tegrąžinai, tad tokiu būdu jam tektų ir žodyną pasiimti :lol:

    nematau nieko juokingo kaip surinkti informacija, tiesiai ar atvirksciai... eik i mandriva ir tenai pagal dainu zodzius tikrink ar yra laisvu DOMENU? nuo whois dar niekas nenukentejo.

×
×
  • Pasirinkite naujai kuriamo turinio tipą...