Просмотр файла wapsub/rass.php

<?
////////////////////////////////////////////////////////////////////////////
////         Автор скрипта: Трофимов Дмитрий aka dimidrol                 // 
////                E-mail: [email protected]                          //
////            Home pages: http://www.trofimov.com.ru                    //
////////////////////////////////////////////////////////////////////////////

header("Content-type:text/vnd.wap.wml;charset=UTF-8");
print "<?xml version=\"1.0\" encoding=\"UTF-8\"?>
<!DOCTYPE wml PUBLIC \"-//WAPFORUM//DTD WML 1.1//EN\" \"http://www.wapforum.org/DTD/wml_1.1.xml\">
<wml>
<card id=\"tes\" title=\"Rassilka\">";


$xfile = @file("mailbase.txt");
for ($i=0;$i<count($xfile);$i++) {
$udata = explode("::",$xfile[$i]);

@mail("$udata[0]", "$theame", $mess, "From:$bote");

print"Bolhoe Spasibo Rassilka zaverhena, Pismo dostavlemo do podpiscikov...";
}

print "
<br/><a href=\"http://trofimov.com.ru/wap/\">WAPchat ver 0.1</a>
</card>
</wml>";

?>