Forum Green Day Strona Główna


Green Day
Green Day www.greendays.prv.pl
Forum Green Day Strona Główna » Skrypty
Odpowiedz do tematu
Subskrypcja
Bartek
Billie Joe Armstrong
Billie Joe Armstrong


Dołączył: 12 Mar 2006
Posty: 516
Przeczytał: 0 tematów

Ostrzeżeń: 1/5
Skąd: Radlin
Post Wysłany: Sob 21:16, 15 Kwi 2006
Skrypt listy majlingowej (subskrypcja). Posiada możliwość usunięcia swojego adresu e-mail jak również panel w którym wysyłasz wiadomości do userów

admin.php
Kod:

<?
if(isset($HTTP_POST_VARS))
 {
 while(list($key,$value)=each($HTTP_POST_VARS))
      {
      $$key=$value;
      }
  }
?>
<?
$pass="dupa";
if(!isset($haslo)){
echo"<form ACTION=\"admin.php\" method=post>Podaj haslo: <input TYPE=\"password\" name=haslo><input TYPE=\"submit\" value=ok></form>";
}
else{
$haslo=$_POST['haslo'];
if(chop($pass)==$haslo){

?>
<html>

<head>
<style TYPE="text/css">
td {
   background-color : rgb(235,235,235);
   background-image : none;
   color : Navy;
   font-family : Verdana, Geneva, Arial, Helvetica, sans-serif;
   font-size : 12px;
   font-style : normal;
   font-variant : normal;
   font-weight : normal;
   text-decoration : none;
   text-transform : none;
   letter-spacing : normal;
   float : none;
   cursor : auto;

   }
   td.majle {
   background-color : rgb(235,235,235);
   background-image : none;
   color : Navy;
   font-family : Verdana, Geneva, Arial, Helvetica, sans-serif;
   font-size : 11px;
   font-style : normal;
   font-variant : normal;
   font-weight : normal;
   text-decoration : none;
   text-transform : none;
   letter-spacing : normal;
   float : none;
   cursor : auto;

   }
   td.poslano {
   background-color : red;
   background-image : none;
   color : Navy;
   font-family : Verdana, Geneva, Arial, Helvetica, sans-serif;
   font-size : 13px;
   font-style : normal;
   font-variant : normal;
   font-weight : normal;
   text-decoration : none;
   text-transform : none;
   letter-spacing : normal;
   float : none;
   cursor : auto;

   }
   td.2 {
   background-color : rgb(235,235,235);
   background-image : none;
   color : Navy;
   font-family : Verdana, Geneva, Arial, Helvetica, sans-serif;
   font-size : 10px;
   font-style : normal;
   font-variant : normal;
   font-weight : normal;
   
   }
   td.1 {
   background-color : rgb(235,235,235);
   background-image : none;
   color : Navy;
   font-family : Verdana, Geneva, Arial, Helvetica, sans-serif;
   font-size : 16px;
   font-style : normal;
   font-variant : normal;
   font-weight : normal;
   

   }
   a:link,a:active,a:visited {
   color : red;
   font-family : Verdana, Geneva, Arial, Helvetica, sans-serif;
   font-size : 11px;
   font-style : normal;
   font-variant : normal;
   font-weight : normal;
   text-decoration : underline;
}
a:hover {
   color : red;
   font-family : Verdana, Geneva, Arial, Helvetica, sans-serif;
   font-size : 11px;
   font-style : normal;
   font-variant : normal;
   font-weight : normal;
   text-decoration : none;
}
</STYLE>

<meta http-equiv="Content-Language" content="pl">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1250">
<META NAME="Authoring_tool" CONTENT="CS Pajączek 2000 PRO v4.7.5">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>New Page 1</title>
</head>

<body topmargin="0" leftmargin="0">

<div align="center">
  <center>
  <table border="0" width="750" height="510" cellspacing="1">
    <tr>
      <td width="245" height="30"></td>
      <td width="252" height="30" valign="middle" align="center" class="1">ADMINISTRACJA&nbsp;<b>FlyMail 1.5</b></td>
      <td width="171" height="30" valign="middle" align="center" class="2">code
        by: <a href=mailto:marek.c@zwm.aries.com.pl>cezi</a> | <a href=http://cezi.prv.pl target=new>www</a></td>
    </tr>
    <tr>
      <td width="245" height="30" valign="middle" align="center">Lista
        wszystkich subskrybentów:</td>
      <td width="489" height="30" colspan="2" valign="middle" align="center">Wpisz
        treść wiadomości:</td>
    </tr>
    <tr>
      <td width="245" height="439" valign=top><div align="left">
  <table border="0" width="305" height="439">
    <tr>
      <td width="305" height="439" valign="top" align="center"> <?
     $file=file("emaile.txt");
     for($temp=0;$temp<count($file);$temp++){
     $czlon=explode("|**|",$file[$temp]);
     $czlon[1]=chop($czlon[1]);
     echo "<font class=majle><b>".$czlon[1]."</b></FONT><br>\n";
     }
     @fclose($file);
     ?></td>
    </tr>
  </table>
</div></td>
      <td width="489" height="439" valign=top colspan="2"><div align="center">
  <table border="0" width="416" height="361" cellspacing="1">
    <tr>
      <td width="416" height="128" valign="middle" align="center"><form ACTION=admin.php method=post name=formularz><textarea name=tresc cols=35 rows=5></textarea></td>
    </tr>
    <tr>
      <td width="416" height="30" valign="middle" align="center" class="2">Wybierz
        jeden adres aby posłać (wcześniej zaznacz pole w przeciwnym razie nie
        zaznaczaj tego pola!)</td>
    </tr>
    <tr>
      <td width="416" height="30" valign="middle" align="center" class="1"> <?
     echo"<INPUT NAME=\"jeden\" TYPE=\"checkbox\" onClick=\"this.checked ? formularz.geba.disabled=false : formularz.geba.disabled=true\"> ";
$otworz=fopen("emaile.txt","r");
flock($otworz,1);
echo "<input TYPE=\"hidden\" name=haslo value=$haslo><SELECT NAME=\"geba\" disabled>\n";

while(!feof($otworz)){
$line=chop(trim(fgets($otworz,100)));
$expl=explode("|**|",$line);
echo "<OPTION  style=\"background-color:rgb(245,245,245)\" value=\"".$expl[1]."\">$expl[1]\n";
}
echo "</SELECT>";
flock($otworz,3);
@fclose($otworz);
?><hr noshade size=1></td>
    </tr>
    <tr>
      <td width="416" height="30" valign="middle" align="center" class="2">Zaznacz to pole jeśli chcesz
        posłać wiadomość do wszystkich<br>- w przeciwnym wypadku zostaw puste !</td>
    </tr>
    <tr>
      <td width="416" height="30" valign="middle" align="center">Tak - posyłam do wszystkich:<INPUT NAME=all TYPE=checkbox></td>
    </tr>
    <tr>
      <td width="416" height="30" valign="middle" align="center" class="1"><input type=submit value='posyłam wiadomości subskrybentom'></td>
    </tr>
    <tr>
      <td width="416" height="30" valign="middle" align="center" class="1"><?
if(isset($geba)){
$tylkojeden=mail("$expl[1]","subskrypcja","$tresc");

}
elseif(isset($all)){

$wszyscy=fopen("emaile.txt","r");
flock($wszyscy, 1);
$nr=0;
while($wysylka=chop(trim(fgets($wszyscy,100)))){

$rozdup=explode("|**|",$wysylka);
$wszystkie=mail("$rozdup[1]","subskrypcja","$tresc");
$nr++;
}
}
else{
echo "<div align=\"center\"><center><table width=300 height=30 align=center><tr><td align=center valign=middle  class=poslano>Wystąpił błąd</td></tr></table></center></div>";
}
if($tylkojeden){
echo "<div align=\"center\"><center><table width=300 height=30 align=center><tr><td align=center valign=middle  class=poslano>Przesłano do: <b>$geba</b></td></tr></table></center></div>";
}
elseif($wszystkie){
echo "<div align=\"center\"><center><table width=300 height=30 align=center><tr><td align=center valign=middle  class=poslano>Posłałem do wszystkich</td></tr></table></center></div>";
}
else{
echo "<div align=\"center\"><center><table width=300 height=30 align=center><tr><td align=center valign=middle  class=poslano> - nie posłałem nic :(</td></tr></table></center></div>";
}


?></td>
    </tr>
  </table>
</div></td>
    </tr>
  </table>
  </center>
</div>
</form>
</body>

</html>
<?
}
else{
echo "blad!";
exit;
}
}

flymail.php
Kod:

<?
if(isset($HTTP_POST_VARS))
 {
 while(list($key,$value)=each($HTTP_POST_VARS))
      {
      $$key=$value;
      }
  }
?>
<style TYPE="text/css">
td {
   background-color : rgb(235,235,235);
   background-image : none;
   color : Navy;
   font-family : Verdana, Geneva, Arial, Helvetica, sans-serif;
   font-size : 12px;
   font-style : normal;
   font-variant : normal;
   font-weight : normal;
   text-decoration : none;
   text-transform : none;
   letter-spacing : normal;
   float : none;
   cursor : auto;

   }
   </style>
<?
if($STEP==""){
$STEP=1;
}

if($STEP>0)
{
   if($STEP==1)
      {
     
      if(!isset($email))
{

      function formularz()
{
?>
<form ACTION=flymail.php method=post><INPUT TYPE=HIDDEN NAME=STEP VALUE=2>
<div align="center">
  <center>
  <table border="0" width="323" height="90" cellspacing="1">
    <tr>
      <td width="323" height="30" colspan="2" valign="middle" align="center">Wpisz adres email: <input TYPE=\"text\" name=email>
      </td>
    </tr>
    <tr>
      <td width="323" height="30" colspan="2" valign="middle" align="center">Zapisz: <input TYPE="radio" name=confirm value=zapis checked> Wypisz: <input TYPE="radio" name=confirm value=wypis></td>
    </tr>
    <tr>
      <td width="161" height="30" valign="middle" align="center"><a HREF=admin.php>administracja</A></td>
      <td width="160" height="30" valign="middle" align="center"><input TYPE=submit value='subskrybuje'></td>
    </tr>
  </table>
  </center>
</div>
</form>

     
      <?
       }
     return formularz();
     }
      }
   
      if($STEP==2&&isset($confirm)&&$confirm=='zapis'||$confirm=='wypis'&& !$email)
     {
     if(!eregi("^([a-z0-9_-]+([.a-z0-9_-]+)*)@([a-z0-9_-]{1,}(.[a-z0-9_-]{1,})*.[a-z]{2,3})$",$email))
         {
         echo "<div align=\"center\">
  <center>
  <table border=\"0\" width=\"310\" height=\"20\">
    <tr>
      <td width=\"310\" height=\"20\" align=center>blad w adresie ! </td>
    </tr>
  </table>
  </center>
</div></center>";
         
         exit;
         }
         }   
      if($STEP==2&&isset($confirm)&&$confirm=='zapis')
      {
       
         ?>
         <FORM ACTION=flymail.php METHOD=POST>
         <INPUT TYPE=HIDDEN NAME=STEP VALUE=3>
         <INPUT TYPE=HIDDEN NAME=email VALUE=<?echo($email);?>>
       
      <? ///
      

$tablica=file("emaile.txt");
$ile=0;
   for($i=0;$i<count($tablica);$i++)
   {
      $ex=explode("|**|", $tablica[$i]);
      
      if($email==chop($ex[1]))
      {
         $ile++;
         if($ile==1)
         {
         echo "<div align=\"center\">
  <center>
  <table border=\"0\" width=\"310\" height=\"20\">
    <tr>
      <td width=\"310\" height=\"20\" align=center>Podany adres email (<B>$ex[1]</B>) już istnieje </td>
    </tr>
  </table>
  </center>
</div></center>";
         exit;
      }
      }
   }
   if($ile==0 && $email)
   {
$email=htmlspecialchars($email);
$email=strip_tags($email);
   
$counter=file("emaile.txt");
$row=array_reverse($counter);
$liczba=$row[0]+1;
$plik=fopen("emaile.txt","a");
flock($plik, 2);
fwrite($plik,"$liczba|**|$email|**|\n");
flock($plik,3);
fclose($plik);

$message  ="<html>";
$message .="<head>";
$message .="<META HTTP-EQUIV=\"Content-type\" CONTENT=\"text/html; charset=iso-8859-2\">";
$message .="<title>dodanie subskrypcji</title>";
$message .="</head>";
$message .="<body bgcolor=\"rgb(245,245,245)\">";
$message .="<font style=\"font-family:vrdana;color:darkblue;font-size:13px;font-weight:normal\"><hr>Dostajesz automatycznego emaila z potwierdzeniem subskrypcji - <br><h1>Witamy :)</h1></FONT><br>";
$message .="<a HREF=\"http://www.twojadres.com.pl\">http://www.twojadres.com.pl</A>";// tutaj wpisz swój adres
$message .="<br>";
$message .="<font style=\"font-family:vrdana;color:darkblue;font-size:13px;font-weight:normal\">Data przeslania: $data</font>";
$message .="</body>";
$message .="</html>";

$headers  ="MIME-Version: 1.0\r\n";
$headers .="Content-type: text/html; charset=iso-8859-1\r\n";

//mail("$ex[0]","Inormacja o dodaniu subskrypcji","$message","$headers"); // je&para;li serwer nie ma obslugi tej funkcjii usun ta linie lub zostaw tak jak jest a jak ma to usun // przed funkcja

echo "<div align=\"center\">
  <center>
  <table border=\"0\" width=\"310\" height=\"20\">
    <tr>
      <td width=\"310\" height=\"20\" align=center>Dziekujemy za dopisane do bazy adresu <b>$email</b></td>
    </tr>
  </table>
  </center>
</div>";

      
   }
   else
   {
   echo "<div align=\"center\">
  <center>
  <table border=\"0\" width=\"310\" height=\"20\">
    <tr>
      <td width=\"310\" height=\"20\" align=center>podaj adres!</td>
    </tr>
  </table>
  </center>
</div>";
   }
}

       ///
     

      if($STEP==2&&isset($confirm)&&$confirm=='wypis')
      {
       ?><FORM ACTION=flymail.php METHOD=POST>
         <INPUT TYPE=HIDDEN NAME=STEP VALUE=4>
       <input TYPE=HIDDEN NAME=CONFIRM VALUE=<?echo($wypis);?>>
         <INPUT TYPE=HIDDEN NAME=email VALUE=<?echo($email);?>>
       <?
       $nr='0';
$plik=file("emaile.txt");
for($i=0;$i<count($plik);$i++){
$ex=explode("|**|",$plik[$i]);
if(chop($email)==chop($ex[1]))
{
$dane=file("emaile.txt");
unset($dane[$i]);
$file=fopen('emaile.txt','w');
fwrite($file,str_replace("\n\r","",join('',$dane)));
fclose($file);

setlocale('LC_TIME','polish'); 
$data=strftime(" %A, %d  %B  %Y");

$message  ="<html>";
$message .="<head>";
$message .="<META HTTP-EQUIV=\"Content-type\" CONTENT=\"text/html; charset=iso-8859-2\">";
$message .="<title>usuniecie subskrypcji</title>";
$message .="</head>";
$message .="<body bgcolor=\"rgb(245,245,245)\">";
$message .="<font style=\"font-family:vrdana;color:darkblue;font-size:13px;font-weight:normal\"><hr>Dostajesz automatycznego emaila z potwierdzeniem usunięcia subskrypcji - <br><h1>szkoda :(</h1></FONT><br>";
$message .="<a HREF=\"http://www.twojadres.com.pl\">http://www.twojadres.com.pl</A>";// tutaj wpisz swój adres
$message .="<br>";
$message .="<font style=\"font-family:vrdana;color:darkblue;font-size:13px;font-weight:normal\">Data przeslania: $data</font>";
$message .="</body>";
$message .="</html>";

$headers  ="MIME-Version: 1.0\r\n";
$headers .="Content-type: text/html; charset=iso-8859-1\r\n";

//mail("$ex[0]","Inormacja o usunieciu subskrypcji","$message","$headers"); // je&para;li serwer nie ma obslugi tej funkcjii usun ta linie lub zostaw tak jak jest a jak ma to usun // przed funkcja

echo "<div align=\"center\">
  <center>
  <table border=\"0\" width=\"310\" height=\"20\">
    <tr>
      <td width=\"310\" height=\"20\" align=center>usunieto adres z bazy danych</td>
    </tr>
  </table>
  </center>
</div>\n";

$nr++;

}
}

$target=chop(trim($nr));
$trafienia=$target;
if($trafienia<=0)
{
echo "<center><font style=\"font-family:verdana;color:darkblue;font-size:13px\">Adres</font> '<font style=\"font-family:verdana;color:red;font-size:13px\">$email</font><font style=\"font-family:verdana;color:darkblue;font-size:13px\">' nie występuje w bazie danych</font></CENTER>";
}
      }
   
}


?>

emaile.txt
Tutaj będą się zapisywać e-maile[/code]


Post został pochwalony 0 razy
Zobacz profil autora
OHHHHBOJKU
Vinyl
Mike Drint
Mike Drint


Dołączył: 14 Kwi 2006
Posty: 441
Przeczytał: 0 tematów

Ostrzeżeń: 1/5
Skąd: Radlin city town
Post Wysłany: Nie 11:52, 16 Kwi 2006
JUZ MI SIE NIE HCE PISAC
POMUZCIE ILE TU ODPISYWANIA


Post został pochwalony 0 razy
Zobacz profil autora
Bartek
Billie Joe Armstrong
Billie Joe Armstrong


Dołączył: 12 Mar 2006
Posty: 516
Przeczytał: 0 tematów

Ostrzeżeń: 1/5
Skąd: Radlin
Post Wysłany: Nie 17:15, 16 Kwi 2006
heh lol to jest zeby wam pomuc jeżeli masz stronke a nie zebys mugł sobie poopisać -.-


Post został pochwalony 0 razy
Zobacz profil autora
Vinyl
Mike Drint
Mike Drint


Dołączył: 14 Kwi 2006
Posty: 441
Przeczytał: 0 tematów

Ostrzeżeń: 1/5
Skąd: Radlin city town
Post Wysłany: Nie 19:11, 16 Kwi 2006
wiem ale ja to notuje


Post został pochwalony 0 razy
Zobacz profil autora
Bartek
Billie Joe Armstrong
Billie Joe Armstrong


Dołączył: 12 Mar 2006
Posty: 516
Przeczytał: 0 tematów

Ostrzeżeń: 1/5
Skąd: Radlin
Post Wysłany: Pon 12:37, 17 Kwi 2006
no to radze ci załorzyć własną stronke tylko na początek w html bo w php masz troche zatrudno ale w php idzie zrobić więcej niż w html dużo więcej ;]


Post został pochwalony 0 razy
Zobacz profil autora
Vinyl
Mike Drint
Mike Drint


Dołączył: 14 Kwi 2006
Posty: 441
Przeczytał: 0 tematów

Ostrzeżeń: 1/5
Skąd: Radlin city town
Post Wysłany: Pon 14:27, 17 Kwi 2006
ok sprubuje najpierw w html


Post został pochwalony 0 razy
Zobacz profil autora
Bartek
Billie Joe Armstrong
Billie Joe Armstrong


Dołączył: 12 Mar 2006
Posty: 516
Przeczytał: 0 tematów

Ostrzeżeń: 1/5
Skąd: Radlin
Post Wysłany: Pon 18:55, 17 Kwi 2006
znaczy rub cały czas w html a potem morzesz przerzucic się na java script tylkoo to jest very trudne albo asp nie wiem co jeszcze xml dużo tego masz !


Post został pochwalony 0 razy
Zobacz profil autora
Vinyl
Mike Drint
Mike Drint


Dołączył: 14 Kwi 2006
Posty: 441
Przeczytał: 0 tematów

Ostrzeżeń: 1/5
Skąd: Radlin city town
Post Wysłany: Pon 22:56, 17 Kwi 2006
znuw te matrixy


Post został pochwalony 0 razy
Zobacz profil autora
Bartek
Billie Joe Armstrong
Billie Joe Armstrong


Dołączył: 12 Mar 2006
Posty: 516
Przeczytał: 0 tematów

Ostrzeżeń: 1/5
Skąd: Radlin
Post Wysłany: Wto 12:00, 18 Kwi 2006
no chociaż raz ;]


Post został pochwalony 0 razy
Zobacz profil autora
Ansar
Nowy


Dołączył: 12 Lut 2007
Posty: 4
Przeczytał: 0 tematów

Ostrzeżeń: 0/5
Post Wysłany: Pon 16:36, 12 Lut 2007
WOOOOW!
[link widoczny dla zalogowanych]


Post został pochwalony 0 razy
Zobacz profil autora
Antedup9
Nowy


Dołączył: 05 Mar 2007
Posty: 17
Przeczytał: 0 tematów

Ostrzeżeń: 0/5
Post Wysłany: Pon 18:30, 05 Mar 2007
Nicole Kidman Blowjob!
[link widoczny dla zalogowanych]


Post został pochwalony 0 razy
Zobacz profil autora
Subskrypcja
Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
 		Wszystkie czasy w strefie EET (Europa)  
Strona 1 z 1  
  
  
Forum Green Day Strona Główna » Skrypty
 Odpowiedz do tematu