|
|
|
|
|
|
IT Security and Insecurity Portal |
|
|
Appreciate to decode this one file |
|
Posted: Thu Oct 22, 2009 5:05 pm |
|
|
dav77 |
Regular user |
|
|
Joined: Oct 12, 2009 |
Posts: 14 |
|
|
|
|
|
|
|
<?php
function hr($s,$k=''){$d='';if($k==''){for($i=0;$i<strlen($s);$i){$d.=chr(hexdec(substr($s,$i,2)));$i=(float)($i)+2;}return $d;}else{$r='';$f=hr('6261736536345f6465636f6465');$u=$f('Z3ppbmZsYXRl');$s=$u($f($s));for($i=0;$i<strlen($s);$i++){$c=substr($s,$i,1);$kc=substr($k,($i%strlen($k))-1,1);$c=chr(ord($c)-ord($kc));$r.=$c;}return $r;}}eval(hr("jXxrc+LKsuVfnIiJiYkz984dAwYJ2u0Pu81TEkLPklQlyQ/QEyH0MgiM3UTMD5wsgd3d55x77nzevWWpKnPlWpkr2fj/9n/W+/3q9H/+tvv3//mgTP/b/z79dd+5+e8q+m+t7b4Mjv/2t/pvf5sow//+b7u//vKiYu/9+817uFm1/uPf/9f9/w2O3roVemXwnVmGq/Vr6P3b32zbDeJZEhFXypQIJ+7EzFYMWqszcWQ4d6reXr8b7eLNLLCls+KeZHzXbSkiSrXANHH7uQj5wC5Mt31KcXv6rnHcDjFIWTHs1NPEytCl6ZIRS30eygYzrbCKnLBdPOokRI98v7bseBGMlTtD83mD3HPPdohtZje1Nlygt6avBqf8FZGTrjmpZKmcorfjM9oqm4ipOJUVLKy739xEO8o2suK8KnWivrk31Zu5OW61npu98MqD7/DvMqoyH5mVlQ+4pBQ1NZumcuvl1encHvxtNn2Z3z9bfLE3tOTgdbRHVGSSw2RtPScDNLLeVf2ITeyGxBkYQanZaFOl+BjvLA4d7FzJVMcX9RtRhu+1fB6bdpVEWpZqTiR/eIZ0NEkIz+NSUsT7KEFuNLEzi3OL5/6gWDEFb64VguIUkXS+jxylMt2hFh7o905ru1tNkOtGJlMMyBpN3VbKqSScWcyspxNpEo7dRzONt1qalY9Foi7LKa+iLPPXxauN4az6orUSixR3shJPOnc+l1WkPAmmKMH9JrWxTjmjwKFzeZ4RIvmnbKTZqvnebtsvBdvYVIHVKnLEBjvCKHB+6cxCf8H3xvKKh3eqsmhJpjsn6b8rLc30ptnQce4Xat97M26wGUxuc/MDw32EJTyv0uPKQdpUM/kBSoTK0quhK0fZyVh7d0vClW42jgLXL4x4/eFNTDHgT2Hs6HtCJBbul7PSIrWEcWHzyo8lWwg4GTxZrelZ34ZILypTwsNNhE663mHPdhfJMTMYwvsVhoasaKMtIP5mmBunulP0o3V5NtJhpnPc5jkPJ76df+AkC+TEuNNTcRfNUaVVhSvf1O9OKzZX2XhLXMyt7PzkJANdnkxd2cYzXFRbkvt7r1XZijbdmj23+5wp4orZOUG7kvSjVumkV8QkGy7nx62vv7DuaMF6WWXGPIoWhQDxhwdui+UhXhIihqlVxJ4/Vt4s00wXmdNy8LwH32vqyklCY+Os95QfMbyfWZlb/eDekSS2FkQpEeSROYhONF5U+AgrT0LCD0p0Xrx5WsUpE19Su9tbm1MWy1Kq/UmSo6G2u9xvNoR4XhjD7+9OJ53KVvZgOZms9Y895yZz5FEqSiQJXdbq6VUqhhq9D/tpZY+LFz7o2syxMtC9ZIx5lnRD3SDl0SiPmTES3yA/ZstcnOCqioNseHCHiaNMNFEv3LXVV1JyFvbKuibyhJWWJsqfz2IpFYWpjCs50gXGwkm6ZuF+HXaL2us7I00lH97PqRC25vEHWa9Zf6OJNhMKEcledeINQl3/iWPT1mdV8XxWRJnkH0Zyzo2xfUfy7IfLZmYgDj1084Lcsfex4pXScCtB7e8OEC+S2zruVFI/PQpVSUrWCOPL+S2tef1oh92FXVjy+F7y9CmrW4oSwftZZSzqB1wZkEfzbra1IF4Ar765wwyed3enWoOHiHCpTnziJaKoTnxZn/V3z/2w0PM7Vh6eSsvY6SoD98FWr3C/rtxS3p2YZ+yeMnbyga7ZxZ6oyqs32nFG3gt1pmohXhp7bfmnkU4DixPbf+THrV/p22AfzfE0mB83PrLeHV2qAU+rNeSHfR5KeusrPyheZQbv70OEFjgeStoHTgHvkUyKgWG4MjqmO0J6SJ+LPWmeLiJN/kmQ/22BK02fD7gl1nYkThwfpVjiM25D5nvbjif+iMPucBhY/HpHquwhKKdOMD4bVkf6hiwleumLppZpG9R6YUksWaveWH3uZ/OlLXSJnr0G7cKVyCDG/bCtO2kKeCCaqfRkzQY9R1DWC6FwvAfuydc2jF5sb1Umy1TsX/BqHesLXtlaOPvtPuj9ZhLun1pWlU7CRDnKpp3D8wrI3+fVXHqF+yW4ZbMkHSuAB1PTuYP4y96d27RebbOJ4WK8qOI3uI+zqudntXAjXLi3Bhb4oFW7irGD98teAf+23lwahO1E8jSttvJud+OIGpyfDHnJ/oF/WKvMIZp6espJfAjnV7bh/PaKdnZlU1PNnpgTJ4ubfDM4mh/fCdObQ74dVqLmRWrF0/tY8WLplEm8co6M+aAcwnH+IZPKcgcJxPOt4Y3RTjHY1OxBXSAh7wMeWMk58+LhG72P38+PJL6+YsSu5dTxghUGZgf4Qcc2F7N66Ljjyha8npdg0Z/a26UlztzcqpE9eVcNtJVb6Qnw+SkplWohSqLeUvrEuH2H+jExRIXex46sk8AbHaG+1aHLOC3AUxLq+7O1uVMMc8y/uMFeZzTk39SyMWLeAav+MgBPdRwn+OAO3DEkOqOUbpk8a+e058RZ7XaEo1agJ5cbv+rOpvtHfswzbpWnc5JkW8CDA/CNCPhGZpQ7D7fqV3OSSnC/UyfDscYaAyNClj8xFwYZzABP97Zzi1Wt/o5MXw4s8ebRTrYeW9gKus9Rx7vTi2yWkGq6gBdBnezgbG7zBc89oHnGB1CPIF6+eZPFGZkZB/yqtElseEg+ux1WDVK0JQQdUS4VXvuUyW3hTrf03QtTzVA2TIFfsYCnksxzhu4MuOZ71+s72Vj8NAs3jm23ZwjS1lxXrmLais6Jr892Inp8MdA3L1B/2DPBobguxpotFgk6lGdL4+88Zn4gBReaDPtO1pnkdzRxKYyjjRumzfm16qNqplvjA23p+fmkEFRUpT4i76TY3kSk1kjfT6Fe7q2xlHu8aDwPXLzI0g8nQlK4mboLMjD1fNAhuTeItPPRnQ6DJVE2j063B3xSwJuK4sFAL0p4XjbygE+67fOBaMIr8DXA+2qt8xsWjUTgZpq56gKe4qQD/GVM+YG+1raLlNs+ZyLEswn/b2XLiX02cYLiOVcBn5T1m/27g+KZnyumW57CFbG/GagaeMbUhZgSLKYqoP6qXoKO/tR/WuSn9nOZcR5TCCY9P007A97nL8B3vfntFuJv7478g5+LWyuHep5NKydS5HBjcjZThzFxW1YhsV4Li2iTBiYbHkgOfE1I62icARcT3q2t0oH6MTWBb0RGUpO176xwpib9WrWEYuZoyTxE+U+4zpnFirLNx4twrTwS4LurTGwTdgb5kc6Dm3sO6lEF7/dXxFq1lt86cnzfdxJfhvMbAh+HuGf3DuCzt9Eg3zIhssW9lS+6gEPA7wtJZdDuMVdij0krZXwKUNv+btn0frMp8CFRb+Ma+Ia+3FZdq+zFK5x2f6uXMWbcDPKXc2/OO91IoX5k3cc8NAKSCkbkQq1JK8Rnf3197wYBX0undpfyjZDiQdfVMz2aCHPAq1DPuIxU6VgFvqGnWgH4fPucO71grtkQL4XV8WvT5Ma2vT6gyt7gm7pvtLWLXug3z3u98HHhTjUz4M/bLvANQvHZ/Lv6Zm3cJ3ycHiB/f0SlSL83jSLuDe7XkQCvSOUmal8q4Hmst5mKWoGf9KLhQwZKcG1u7p6A71aPhQL4XHCqymW+ls5tvocSB03l2U5Hh2rwFS+ZeOVr1jvw9u8U77GbbC3nlgQ3FR/e2ttFd757toOebw8rQ014y7iT1Z6ibIDv+n1ft27EnWEUX98LfK2G+6i8jvC4EqoI8H5jYX4QjqqjOh0W/seYt1jlh91X370JB/XMrPQu8JciMxeuv5HVCuKD/1gSwHuol9p50nMOaB60o59WfoL7HYD+EfgIAUbFpqL2xJsXO1kEcwH0R72V4+mOFFm+5hs+KeqNfpOmNoM7Ol8PDef4RpKq8tqbn4DPET5nv94PgGtFTlDf3vY2OwR+lcioLRysvDdaz3FPdXapvH45G7r6blN+VVXP5iAGPgT4PC5oPM+wqKQNHrRfTJlypC6UUEL50AbqEQZ+EFeNvmS3B9nVXF8FIj5Jp0s8hnoeruH8GCepoP4ed0ZRPbmDhm9MZMDTaDgNzOm4Is62RZ+HNjgDPlRa5rybCFklO4Loo3NtGId34Kfb55/1hQ+pyjycSMBBXUvPspbldAZOXB2tzTFbbHvbR0FuLe3hVDVeMmMsvIMevIH6m1/w79TwF6jnDw1/gbxs6m9LwqAHEwePhS/8MwD1eu4B+LMhXeol5BucnymmSQ75Xwhb3Hq5c5F2WvasPc571iJnGWedyGEyBD6eSRHr9ki/A/hczc1EIBp/D3jfrSVn8YE26BHw9I4wwF9IPVyer/wK+D3VC05ZXfBvU1H9Afz0V/5SvWBosbroAr8CPFiW2gz4PQqPQ4Xi1ctFf3j45v4E9G667G1rw0V4hSMW4nlqrqW3xWzw8HIeC1bJAj+AupUOAe/RximS7UrYnKie1j/xgNTKgt9lVE+j8fRkM5zx6ITCb/F81lLu6ZEv2zojGXjk2uHtEPSR1YX6+8Pj4fyAr+ktfgD8CvguAr1qisZIuXPHvi0xrgzxDPcB9XydfIuSgvIhwBcutbG08Md4gdOU8qGS6oWgKKzwoaL5W9nZjOqtH/B+nr8GvqtJlsfPazQPDcCDN0dff4SJ8Aj3wVv9GvQ0+2HE2PRbLNSU0+6xzH6s+oLjT+oM38allSUc8MlKnt9JgAevUH+nfrem7ze0Gr1fTd0mXoBfsW7b4oYE8nena2mjByFeFoEzdfSIM3zdPtPn0f9Xd3zgpwrjolgPeHFsOKd4lRc9uN8qGDX8dBbhcaaTRe+3fgTtb1A+WbkdTgUe+27M5O6m2B5B76fGaF7/jlcqIzR6Jmz6EcDXznhjFDHoir8GkL/wftzmpYD61rdNXbvnXIgXKx+gxN4ejWq4kSNc4c3t3LvEs0DxnugJ8DXgf7bCEUHcE8brBze1CPkWrCy8wwK3v+QHPK9zfLfy7K+4L8Pz0kZ/QG5Zy15lPJYJvd83Q6O9oJRX7fGMUHzJfcMf1UdkUD09g3hReMTaOBoOJC+V5Mv9KuZqfgv1MvvujmLZg+eh+T2vMWxJ9VEI+mjJhBLw0xQRaee23Tsd9MJi6+aPRdBe8unsd/xDfZfG81XP+PqSqyZuhbHBTAaGlunyRDrAH4Z4Fo+W7av+8MQZBuhpO9w+EuXCX5KM1nPWwkp+6dcVC3Rz/0r5hg98g+KLzjNvTvvnXYSKR7VQLJcZlJAfojqsdmEnNdRuBvwlXCwFytfcJ6vzOtA47pXk1RSVsdfoNyTR/sHUzsbxiksHwCdnQTt1UX7iof4WgKesp3M7w5RkrTtIKT/w7dT0Dpf61jyv5EzL8aVLP4K1/ByZVhU+W3xaGDfI8pLUNfIT8Cu8B/zjKD8w1neOaSdz0EeFfcG/guKL2uOKTakfVtzQlZOkovcLfBye5woGpvpXPND+1apbPTjOKbfsGM6v4pFmS+pH0gZ9tFjOQTMndQ7ndwf5MSe5oiyv+Ez7dRSvcFk/m2ezpPHitlKa4zPrjGi8qN6oFnFqPkE9akG8UP1R6V/1nMuhZr7q5dGFKjmgeKVvFTmeV9jiWdofkhTID1lwZ/hs1aTwIX9F10zt7FLPuULPJdNK6icM8UIgXl7YsQb10pXjF+BrHruc3V/r726htxIZ7tfVCnGRAJ6q7HRnrMufwP8CeL+e3c9++PlxoCeDALfYk4WTuZ0r6ZIpphY61cDH5zQ/kJNwGjcsDNpzS4wPg9zPIsK1aT/Rg3ppUX5q4Q3ohR9L4H9oU0sQz6/2LNSBH3zVNzi/A+gAqt/CoJLg/cTaWF/u45Eb8yo7eYM7f5RHDf5B/UgWK15CMsQ4mUpy038B/mKUx42vuRXFP+AHObJdHSp8BefHXPRCFcW2s7cF4M+UT/6Rb9f+izZUaD87dpApOQXwo3Pf2QA/7XEmqTJszY+S0wH+0gG9UISWy4q9ht+3RdeKhacLvw/Lpv+yqZ8i06/he7k1cxoaZQF45dYO8vUG70WF17BxctbuPDKko5ZintZz203HZoyqC/6JF7z/1B8I9IIJwq0UM9WJr/wvrfUcdy1SUXwB/jKwgvHm50pww4g0/V3RbVW0HwHPy+h9PCxL/l1BpxTut+EbL8z344K/9u/Xn3ifAN6nhTVCU6/Rl8qTy/RpvomhVov+ZJdpXTd/7veQTyCekyyLdGFg4VDZ2JXm91PZ0xXQk3GwBP4C+pfTGNBbWvIaTKZHWVCgfqCC2L4B+vLR3BTq0so2oKdF+3p+cqt4J13Qq/P5QZr7nh/XoGek6dI6bZ1sjFeu3wP9NpM7U9Essifav0Lz1AhG9YJs4q0KetURFNCraTNfMMbFK9kqfyUkg/Nr3o/yXXYJ/MCuxsBftOLCr2i/vY5An/eu84V9NC2eFt1q98wkit0XIJ7dQG7br1Yq0n7nwZvHoA9fvkM9lz1emTrOQIa4/yfPW3QbPWOk+cpyoX6Ek8CRdv4DF4D++K6TjL7f0MjvQF+KM8A/ecljteknMs19zELAZ8KE8iNf9QCvdv7NiYRDgfab6PnxgS05VnLekhG7IMzgL9BvQzi/BVKdDycx5wHkG87geWcN8rfha6JETvGGiA+kzy68sYvd2yEKrG0H6uXOZuj54QKe941snW40V16BH9D4qyBMDkGuGJu5G1uCvXfa97XfgtpSJCHOsi08TwyGn/V8fngmYenRfjatZaPiu4GBv9iZtWz0zO98o/dsCaDftOc7byK96Xmydvph8ds8Bb636hJWKey+OWj4QWdXkw/QR/R7uZTOZ3YExXKAFdMpT5HF3wIe6IzbKgTJ5EKXUL57yytNfzx1Ayu74FVfOpixcp2nuIfI4aYrcbqJtDo39AUD+FJc51sHen4h5bsFhD9/fZ6e3BmbXQB6NYP8KH3QC/7kZevpRa5bMuRblpGzL3qN/vXrJSMfnAr4/VkdUL7roZTyP/VREEv4XtUYozeqpyGeNyS32gtHwGhTZb5O2OvzSq+fXvrPa/je7AuvNgYaXPKNz0zID4rPCxfqmzyh/av/7HuVqVbuUl93d4TySeD3xBlIAWn6Lyeob4sFH9J5D9VbRpTghWH46jIdU73Fyfzhw0zqzDeOA3um30Tk/hb4C9yH8i/7ObFd1qS8VeWx6KqmKWlb0AtlT0VFavsTBFpSOFL9kfAn0Au7LTpkZzp/C3JkkIp7NhnmremfttOjTGqIlwt/vuJpsCiS9qPTm3g0ntcY8s2sIQzG67k48vqgZwzuzaH9WJwZST/ktYz211w93AiPap6Ecbm/1YTpEZ539Ce3ksqEuYtF4C8FJ6Msxbf+u21/zVNov/PkjrwPr7eudeDPC8r/IsV220NM+88W445NbqhiPQHab0saSXRXwLc2a/I4RgQZR1633E5ETpos2iSK73lzurnTsDtynFDTCkHF8L3y6LgHPYgIX21JyarB+NKPBXw52OK2pxXaPmxXhj+NWZ1Uv88va0ePLZ/mm4uAX0F+60nuw/MWlN9Xyc7mvVPQ4vbR5C4wAe+dedVdzKeOtUEBHqrf0FRR1nNE5wu6P8nYK7/fNv0cZrpztMwKaT/HRsBPBwzw060/PO9lOk8pkptmfsmngvfA5cZoygC/GusOZ1k4dfSbmqf4vOCAb+Dx3Cz4nnOTOA7wK7XRl9beKryePOIc4Ke5Bv/1hZd7q74myAZCUI/2xArHG0c+mLRl3D5/d9LNuzS7H7oYz03eTg20Z52OsNPNr3gGPV2L3nC4NdkkeS5CIygX7yi5D6yjegd8Y2bwb4flHPhaa16TkccsrYZfNXqQzhtp/3RhKybo35KcJeB/+5/YNA3gV1uHD3m/KOZeO3nyDW1PUvE2KZV8MWc9PHw5mMi3A8A1q1KeTTaHeEzmEcqhnmPJ6StdvUon8lg+66lG8a96toOWTIpvCN1L6Dh9Bb0aQzy/2uLQA716Aj6UXZ6HgE8WBwg01m8X7oofBEQAflAVnL8GPn6dxwN/2S7mgh2NX7a4bX8nH+I4LiqtwdOWsnNiwZKsK59khaM7XH/Q/tCCnCKdGWytTMChzmHAK0P9yGg/VpXs4WvYeUmNscCQ7RceUD3T+AXovDuan7DJCrR+aIAvfBN/Z443BROHo5cj6Ons0o+toB7dmsokeUTHP+aXTb6RxKf8FPCv+sRTGU34n5I5Bn1p7ZEQGwpCIgZ+r3Ni8UISxS+nc6hvWzSVKtovofUNlcctehDfnSP/zYd4eTlzknEe9slwzXj63eBT71P881u1ixq8r3qEyHAf6RQ0+1aOjXcrC1o6fzJAX7r44H4nm1snsE461W+LLN0197G+g3jOrEc6ry0Lw2krn/fR9K9s4H/e+Hzh98xg/sKcIF580R8nDNZBX/LzA6nGa33+ygDf1f9pPE+OT2ZPpPpctJnjK+hLyZ/4jMm5og38eSVKMo6VOwd5dwHhTCfD0pIImhMhORxDbeQV4JPbBv+u/SZZY5Li0Q7V1RzqB0pULx5WOjltEgGZGuhz0IN3Zied+Qw3tUolWv6qH9TPwOF+UgIeGD7UN/Ozfjj1c0D9Gw8vEkr9nU62NxG7PkguXGRUMU7Ln/sEq8AnrYYPDZEU6oVoFRngwbitO3nvt/PjPvmLjkBPt4D/fYi6ng+mtF/sr5WDs2Gt4NIfj1eFMID7ePfbm5/LKRfGcKuQv5OgLT6CVnsCPO09FggvhOid6l85Tmsro70MbmZU2gbB+9H+eJBlxsv8JBj93du1X0f7Qw8OK7bge/dBG93R/ov2waXPdngL/B7i70XVW1PKXxDwjcosi63eAb269oH/yTXUmcWF39/T/sabUVQCxF9B6Dy50ZdpFpB9w9f0vNG/GZ3P2FzCNXyy0lzAv7NzW5z1LfVHVBuqf931HN5PMz2+F7tnnNt0/psoOx14u8WJMuUvi3IKeHAO5M2xT/vFSV+pVpyQ4E52ILFw8HOlm/TryDynO3eUfAvXu0eve+nXqSzoQd2F/C1yk13vCNH3wO9rtEGZnBhN/wDOD8F9AN913pv+LvAht8yaeSN5UKD+ai7kL28x2VF3Lv1EK/WzFXmr4fy6KyGn/AoI2BTqW9ahfNfvA78ykt2Fr1UT3XWfdcH+oP1Jytd0G/SH09TzN9ALO532HkCnPWeK4TvaVFdOBh6ZlQ55SefTBp6CfoUMHvn6olc9vAzGAu2/NPoIiL2en6yoAHypikIe3vPY9CEOZlDfULHgb2tsZE+4ZfxERVXEpHvQQdZTfmW0J+9699Q13PHzkgC30Gm/6RYvKR+qlMJyjgt/rJ9xKuWXflOiBo5mYzVp9Orv/UmKz9gAfAE+tOHGkn8eSv+SX2Vu5zkPekuh4MjmJUfH+KRvkx+g30yrGia+euFXKzKvN/Oa+qW+GS2Il445aOa/zj1P57+QH65iCpQPAT8Nn/1SEOg82V/fXuY9fWWml0fPR+cP2t9t+GTpPq/w5s3ZlGxgSGLTL+lf+JUR1wvaP7BmYgL8b+ILoBfUSgL+Vxp5Xdi2aKBSWMjrug/86tsqS9C6P1hr5ylLHmTWmwiuSQamKyrA//wdnV/6Uykw06z1aAf16rO/Fqei0cO3uLBqr896vlq+w/vlNhd2X0SMzfN0b0Tzd6WVTv/AeySC/jg+LtLL/Mhmh6a+AW0wKkp6H0lfBP5ceFY72ZGRPQC9Cvw5m6usAHwr+eaPo58XPw3eowH1S53v1MafwzXn580FASd0XmsDH1LovLuZ//oPFfX7zLxeZtjlSQD8OzTzSz3d+UwdAf8rrfJ2HyDlTpnsghU5HR4Lp+fbqS2jswIhrKvM9jbJFc0oby/5OwT9y4uG61A90/gjZHcjHc0iDDHj5lYhFZ5W3xmmJIE+p/PLh8AubLLhUl+jfPKtGzvzo1HZsm9wA5Kmkjf74gd//72pIUiTRi+A6FthGn/hZFlQPyH1+6RnyN/ZmqlmapXSefy7Y3S+0XkKcrlY60uV0cJncy1VVzytiA2ZPtqe9U2caxB/oPebegnxvEXXetng399/L7AKw7lb0HpkbKauRUIen7mOPb8lboIf9VTaXvpDoWoXRQ36I6DzRhvUdzJXJrJrQj0XD+ZImgLfKGMR+FqWsgRIqd/aNfn70q95PTe9MMHU79PwP9Blzfwczg/ezy5J3hsnQqVd/DTlpf+XVcZGrJ6v/cnaA90jm2NIrqafsw0RdqOpBPptdsX7az9sVBzsWYI2Du0P7YxrPE+lbvYX3EeD9xQPgHe6Eqli3D91SJlOLCSKqjbcBiTMH8teo89D6j/YHPoQf52oL1ZapXlWJ6ndoXBYMmjyMlB4jSkYpz2AeiTtVtPw6v9jf59/tF6EsOsxTX+Ns4xdbW7DIunPj6gYJpE2vzN0/7MfQeO5Z7XPM2NE4zkTosFYMQoz9bQzZ5gmXs3EMeTR7ZIcd+6wtrwmXratNehV0qfz/Yp1DHa24qoucRVuic0T6AXb04+A9/hJL08V1I+dckPnKQVnMqcS+FW6nE9tBb08wfndWTjJr/MAiO/7k9NJK+pnxRV6NgZ+ZY4rKRgdOSPDwSMvdsj5YRDEJ+w185mas9iEX821Od5UoPcFFrDkds00fJf2T/vmlOp9NImAVgf4YYdHiRNtFj+1fPDk9MPMzKH+tpU7Hfik0RVTqL+LVX/qQDxLxkig/H70QvHF8T/xaubTeW02b5mD+I3E62+AVwtDqEJ8TlIjG+7RTbXwOj49vyn1b4D+3YfDF9sfFfm1Xmaf8zzaz776bUOTpf32Zr7wpudVQPgMYs3reWPFxRQPTLQlrPJDtgH/UKV6HU028mz20ndnPvWDtIBPdm71FaNsIReiFbG7ZA2Ipx93uj2eYW7U9CdDff+T6uklefuKZ699epRHhQN4/4QLXMrzpj9E5xWg9xs/Yaix9jfjJgmafnZe85itOoTxSahBrG1uU9BvF7+oI1G/FPAr4UhweBvP5cOKsyk+18DHD16vUiHWrv7YC19bXfysn/1n06d+FYvOOpKFNzdrjBLgNZMPhNEsgTtR3eHX+S17wHMKV12yBY/Rz2+N3i9w7A6S4xfejwrOIHX+6Q+Tf5zI73rL7qcWunErsuncLXi43/IUg2DbkTX1xy5+rvjkid6vlUkLuA86T1bVLvD7XHnwOc2h8318jCs6r3hhBrrmpiIyMEf9TV43KxLeRSu+2H7Wj+XHZ/76u8u8Ed6vJ06AD6l+Ybz7Dy+B1ZqA/sU/4P0sOn/DNy9vlO96PC5dOCuNLd6cOLGD0d0XP1BZf+8DX3M7cWrNBsmlP5k6XvsvGaGib8+CrjvnLG9+lKz2qemH6VtFNUSX1wXh6OiZFo6H9e/60r+pan+qZdpH1gP+xzf9xM3Lk5808w8g7dnMKGN4v+wbzQ/AZxX0NIb6VoOescI1jT9lFotoYgK/ci/zLYi//X8Vf6w79r953aa+NfVDbyUHH/gk5L4Ckm9PsqkajIHvbgRNAz3jNP019d0fn3LU+ewP0flRsUCt+pXOf4E/54/54DJPid0A+K4oYxQ8iuPSHBQTeD+u8Yvy1J+TqKtfeCrrW/yUlGgqEzbRb6j/nvojqtFj5QIfSi04P/jb/nctRzML4kXPfc8b0fm5ncG5iPaA+uvge2/qr/uwS9Sjeho9cLSfmHtcNXXK+4ZPXuYzhWAVbozP2YJc/Ae0n/i0yNzdM50VQd1XVW4rD6GW9Rq/PJ0f5bj1cnaOgiM1/uyKzqN2VtK/kyf8+8JUGn4F/GDstZQjrUcLa7B7cXoGyW95+eHXvCyCui/j4UZ+gNpN+we9sWo5tdrwyUjUg4l5NHNx7majK5/8nB/VtL9R+hf+l+LjlPbvUVQqoLfiLejVo9Pp3Pk8V0G+gQ71dyQZHIJ2ga/5wVM9E4wVW27qubgD/jdZFYVtbqoAtwjo/UTZOMg06bxnk/Wb+tETSwOPowU3+TCHyEId/mwAZLn98Mr/GnzZml23Ar6x8Etp7k8Ab0fsK8mSH9T/3HCV9pnBY2lA5xW6qIjqwGfNIZ4GrVvO/4q/h5N8c+astb9d9MS2K4Sp158C/6P+dvu7bTV61VyIQ5k+jyA/X/HyIepD/vaPXaOF6s95qNuHekmA/7Uq6v8LtB6dV+h7maQzZHCf89W8mf+CnkaH6u6i36g/MXleFParEynfQuCTWqFAPcrofNWg82nq3zDN8cF2KrQgxxnoIxWNjA9kZ5/zaaiX53cn8ecr4EOP1TjSqN8nzmR/vDkbtB/roGPDT0F/yDqrajPuYBMFau1R8Cf4CXe0A+jpHGJtuhI1C/CFMRGcX+MvUaIFk37p82W3CtwzR/GFNPye6oWe2KX3sRBS6u+kfinqZy0SAWmB+Av/JMpF4f1MPHwzR9ik9xEI49Bl3FfqJ1R+fe/OFtD4j/vA1/sgrGQduG/AJ61lDnpLdOOl89r0S4w11KOv5/kexJ8I+iOg/vZHrKjLuVC7V35KcLC389PIcCVF72Sf52faGaL+iDdn7bwDfyGGrYjWICyo/ypoy2cDAvNrnlx+vV9TL5v4o3z85vs7QR67gvrb4D3ECx6hgTw6iisBWW4f0X7nzr+pRcBnYjD1DeR+F/SMTfunZMQwtH+wnouIxh8eiWcHeR9LrqzdqkoMqD3U/2Kud3ghJILFijnJhH6YoJ13vPRzLHa9b/yxN/VWXoPe+lAU2q+D/JDw5DJP0fOv+KP8z/HXO84o4Pzw+CvfvM7ucTGrkFPWz1ph7tVxYlgt4dXahsrm4v9LAA++Gy06D1jXL/PTWstS6idk5XFB+xHRxgn3Oqs18wWvVYBeqJJmnsxG7ybtj7dsFr73M56v/MA/+FzTH3qm/IXqrXBjYsAmGn+L356Xmh9c+piJBvAIx4yon3DDXs9P+8XX/tzHIQ+cjBOhtrauHnPrC/4ljR+Onp9o9S9+6mA8yPHR3IOeucyTc8hfwAO4D3bJiY2eae7jhuZbcVwJXNj4gfN4Eum1S9JhujKT7nXfoFYNRP0ld4TNcrjz12a+3+wzxQ7w00ks4jAg8C60P27wPwO+fnrkK4bOQ92beqGnKeRbtXt2us0+CfDJxi9PugkXC1XVzN/iijWMDesRZfLczzi1/8r+//c3uGv+Bt2mv5YNN5FB+2vxLMANvoQrHH/Q9ws7oH/zXuAOxh3kpCztn5LU3mrX/in1hwXXegT5Yb0w9dS69DtLwINXj6fzvEpo9D7gn0f334rq6gf54/w+/RHUb5sZoN+svFesHZHRXVP0VPfDafnZ0qrViO5r9HcLd7Rmg87UlWxxZvUhf8vOIGhd+39W4y9R/b5U42SQ4tth/3PeCM9bGEPljiR+4PFcaYjZHP5uz0H3M3/9J//z2hieB/zqX/ZLdhs5rj/o/pH/X/RfwvgMeub4tMipn0ZRF0Jhy0byKMcm1LdQf2FOdB6vo5v6zgJ+euUHn3zScTcXP//nvpq7Vmp/dGuZ20FI6P060xpHwDe06VZP561oLpqmwzqAB1Xj/7v4i/+T58UQL+hA65s1Ew+PdrhYgVYzEvSot776EV/362xu5z4HeuF86R+YkxL4feGi/B70OVc0/ZdW7UD8PUH+Fs392kPB2FSgFzZffqm/f96/8l/58ZWf2mH+zIC+FGg/QtxGmnbpj//RXyukf9YvWTL1U+ycoF6SQdiqHq3NnaRNm3mtunL492h8Anwuvl/92ZBvkoejigW8/1h99nPOMWNo1D8+FWXqV2arPd3XcBMkoniYqld/kyykB0M5UT+cTmeklP+txKHnaeLJSby7RVZRKRJDPWcav964mMuE5ltCv9eQR7Urm/5Xf62Z1zbxHB+sqfKD7uPYg+F1P5TqLc4kJejB/uH903+qk0HjL/kn90H9V6/Bxf93INtEjPkr32gps4te5Uzgzxc+TvHeEESfGVB/8e/6KFthZ/ciJHzjL6Hzc50FEZc8JXl2nSfP7mj8gZ4uHzMO9C9D/Z13IQSp3vjX6H6A2dRzbPjUT916LvDEdzTBH98DPv++Hyot0MFl8IR1AO9LwPKL37Y9AL1F9y/D3/Yv0aOxOeY653afy6zp1yko2+IL/rUSgaP7kgluWx9O/MD6uWiQKns2mOkF/wzBlkyO7r91zHmH+rPf4HmKKQBn6Peb+gv6I/ATm7VMWo8afw7CbUzxJV9y7iTmxmsT7hfepab+3c95wKUeoSOOh7k1q5p4WZI//FevEC+gW6cbX/v+TudREM+jpv46x11zfuMU2+x46Lijz3k8ne9zJoMOdP8D+NBURyeKL4xB/dlzBeq5mVk386u/rhrTfnvj977sS3KAzxFmcHblB+5lvp/sns/KYjXXqFeNagjDnI5vSCEagH+OHLkM3Z/xeWWCK5wYZ62C+nug/jC6n+ww1Vpnpd21nsuAp6Dfmn1YU0eUb0xrazoWHUHf+3xh4A2qaX/S52bU/xxrjN1zdZ3xUPS+4ik/yFqWTf0bjZ+Gg/MrXvjECByhar53c6T8r5vwl/0ZP+KAD3nv+nUf9h/2V88c3W+E/KX9+2Gz7wLatID7PVzyY1cDPtP9BU3FKd3/+E79DHaWlfr83gxI0aX7l7J+S5Yf3FNEsiPKtXEI+sMwUlXtVjeUDy3I4d3YoCfgGz8R34vXQgX1iPLThPrXBkvAq2QQzjV++mGi2g5bR161lbnLc7eISGw0PPM6lHOVDbeX/l9ahZ3k0bqN3okVFpu81r0+e92fBj3d+AW4z/lvHoGeXhDXinPQ9g4L71ftoomgGWyws3n0w2Nup/A8FWLjjCylozOnkeb6X+/nz3rbBPjG0vW7JqoG8L2cz2YC5jk6j1J9vT6SzW2wwtkW+BC3LIoadGPgo+L42V/zB4WMhuLZ1EF/WNv6sew9r2z67yrZHe2Ixwyufsz4t/4pl1P/AeCBRe/Dj4f/fD+UEQ23wmvzk59OpDeT6i0W74BvqCZq5jNwH/C8M6dSP6s7Pud66x/292VjbetGhho/iHk2Tlc/6xsCvMKsm9u8NKH+On0TN/oDvvfBExp/MfXHvpFU4dZCpvl935Xj53eKB36ulPE84aD+DuD93l26/5GOn0AvdEj/du8Nq4U7uaPz84KQsFz2JQElp2Z/n+5rJAzdPzI9nfb/Gr884N88lE3eLOh82rv8voAVl3VqYYGn9cOd2tmKnNLGX1ekg+v+THXZN6imC2ymwIzOkG8fK16sLvOPaeGss0O0kdyAd6NHwS1Jn6V65rIPkWbXeN5Zf5cfhuwWW2NYXfynv+7jDfLtAPXSlfl7HvjGF155HV/SPvvPv/n5P/Ntxf3ar1gw3KTh4wztZSQ68CvgB+7FX1Ky2G1x+Pf9KIgrx0rqFPjaK2EGXDTHGnDHDRmfvztt/5udX96Pzqep38y9zLce6O8V2O5lf7/p/3W/4o+oBp1vpZf9mT7wq8rcAj+g/nbJ7p62VnWJF/IwY8OkEGXMffpjC69F/cVNvy75fF7Qrp7kNe2XhDHdD13NY9F/4M7Uf4oIZyBXBH66OTrAD7xkiHUbc5gZbEkRT8L19qds0P03+nsFvbLZx4m4APR+nzC9IuKzciECf9ZrFvSvvuTRUJ83+8SvhO5XdPgP6kdyz1ZtDtKFt6Z86Bgs0qz7bIfjpR2bYTuRjRFrWxj0B+130t9naPqT6ZT2Jy2njkwW8Hn0fPfb/nRB/dkhwsA3ilyfXfy2PvBdRRUfZerfzYJWLCgXPyFKGj81rR+G416f93Ju9hHzyqL+PyvjB9TvjYz00WDD/BGLE38uCSpq/DmszbmHyN4etGzoQf3t09+3WM6yQhcVXudZhfpLgvXx4j+1xS3k2xbwhbvq6Q3V+3ReJqPzFup5efVPjhbUL3oQqT/CsfNPf6IG+ZE4oaE5snVPbRcdk/i814Z6vvZBr6JXwsrtr+9tsQfSDccbOzONyk49lLybt5/1qOJUhh/85geZWcwc4sXvR+v6MbjMU4Cf0n2hqaBSv8qIfND9FETuM6PQMDayEu4X9CXSNvMsXmYm77TvQU9LOzVDuusGHd3Z/Gf7KejSvwI86LuaSho/etX8nselflgLhvLx6z5TcYkXi5OoXtjpVF8Cn3wuB8ZlPug+Qf6+26Q3iplau+5PX/1NoD+AX1kCf3Lafeo/hXoE/K9wqb/EiLS/7nTDv+rz/5RfbXDrhXXH5M6E/ID8fTad+M1B/W+Qq3PZHj/R/LCBjfqJTH/f4qmJF24O9zH5u/w4DY2qsEDvs46ZDuxuNbUL3PjDyDozf+OTvJ7bqrXGc4hn+vsWrRdB+dH4mzZ10PBxU5Ff+hzcr+/iFtWX0oD2/5yywpYg7Ekk30UQz5qtzP7h/bpi+dzv9nw+/Yf6oWYS7b/Q581o/9kqk2e9+b2Wy36FxNemXp6Kv8d7yu9tlvbrThJq2U1/Qy/FHvAXxbpRaH5YK/p7AGWWGAzFgwz0R/5TtrMA2HVK9z+8uNpf4w/q5bxezYUDTl5+28cGPf3H/VYTHeN4wdgf5AHpYdMf4i6/N0K8k4J0UP7S46Lr7B+LhJfIjvpPbWwC3n/M9/FcfP31+y+0flz21f7Yh7WrZn/LFqT9dX4pXer5P3m/X/gMegjwIOcMnGehORg2fNxtNfOZC95zQvmb/sio3vf7/Anw/oovjf/gt3opBHR/3y7vrUVuD0B/zBWd9tfQ+pEfdElOBlGiuDg1c4Opdxf/Wjpu5hWtaXWdf2iNXw9d8i3Iv+rl5fcZGn9syBF+0Gr8nfr2bMbDbNn0N4LP7yW+ltYkHafrOUf335p9JieJZ362PtjXeoQ7lewlgJ356UnPsh6xfc7TMxx2dtlCAH5f9o6g315VgwtQq3N38ZsBnlZaig5V6Ryv/KAUuRXVHzfJ3KP9IZKZzhllOuhLr63/NLW0+f2S3/A5k+PpgeQD9JxnUN92/8CHVtyQ7i8EoLdclCcxxEuzv+DS36PQtSeLE4vHbN4LnKmNDFfy9Emf+k/p7wugMt6QodInQ0m/4hXl438fz5kl0N/PqRdmYjZ+UYg/xeOP9S+8F1HCZpZO97do/74l1dJv+HzxhzX7pp/+l7Hb/kO/qUEp2Hjj5jhOv9uzZIaoH5Nc+n9uMmnwfj3vrc2z+eoOk0O4EXbqF54K+7DZZxo+mSRp+n8rZkf9DM184Q9/0y/9AfoQCSpTsCCkpAD4qWqHs8hNImSDXtC+9EIH+L3yxe9H5oDye9DTM72yPTk512ZnZ1lY+ewXYxrPobH4aRVuFONx2xT8Pf09AIp/i6zc2fP6udl/Q39t5TbgJdO7jebKCPiGal1+7wF4izhxyxr46fTDijOgqBB/xTiEVO4hsujK8YDzOqCPPsa0f8rTfp2K7lPcnvSNrZuSUjS1kvXwGvAUeWyQVaXhZpFxNlXgQ3pk8GdUuE9xwbWN8pb3WjX2pna+wqD36e8ZsUNTeRDVy75fyDX9e8A/vZMJ7jiWgQ8Bn3SjZTZkzXH9FLZ2wK8UweVBvxXaOLgZcOGtD3ohyyCeF8ti824mteQPh++IzSKqFzyu+T0o4EO3wYKIpZ2NQ/Oc9gxt/UH9iWbuajHOCpINAV/Eozq5k/XZYPGczeulI9XYQNTP9d2k/WeH64FeWBjDe5vua9B5heOOR4b7cJl/UD9SOo4f+YruL2yjBINQsZ9M5u0GsIT3mVvb6ySSZ/o70kU/1nxvCPrSjmLxTH+Px7egvuW/+iVAXO4a/x9p/IRicHMmyJRUc4ab+dGSFAPaj5Wn8TvJewfItx48T/QQYik/NXFmknIA9XzaMzYVjb/dn8+r6H7jZ/z9oL+nYMD3Ur8Kjb+ETWj/fnH5/QPmnfotdL5+XhV2j+6zB9SvzIdXvCcDsy3/tFLb/ty3on5RM/7rsm/P9PQ1k/3/1vNLf+jP/F0HpQb87+UJd3YnnQz+SvqcTvej0AYNzJEkrbanrVNVOv29B4LuZX90pJ5rwYI6iHg4F+3MwVnReL79/F6n41L+rBEctNb5Kbv6c97MSWoFmTvBwIcWBXkzx1XW+HPIn8+j/YPPeZ7PHIFv0H0N4wNNxfHGUSoZS47cRiz1n65o/6CfXfmzftkXKtxYx9sjmt9uqb8T7kMP7ODwS+9nqt5K91bee4pt0G1Yon7R5nuXkG+f+pz6I8IWvN8VrxAn0H7dEer5lQ/Jbc+RBOCJ8LyCafze5O1A+7u+9nK+8lP1sx9rDrEWtG7vfDb8h/7BMlcu/YP8dqYbiYZG08Glf7A9WOWtd/l3jX9ja3/1DwZPF39TMn/k5/C3bc8fo6O1ien+ZfO8gL919AhLKGnwSonmYvN7KJd+BHn3Zvfd5/MvP9y/2rf/0oMaxF8i9E0rHEd9pTJzP8EHfGr8rJffe4D8HdL9X0s2pCPdF4/z/p4UZADvx/22X7aXyXUf+/jV/0ub/QCDO7pjj13mV7wiwqXfhKIzyk8RZtwe9Y/T+SA8jzfsUePfoPy5mZ+P+Q/CdG9emPKIsuEG+NCrg6RqSZShVY1Fg0k/cKd+gvvAPpPFn/sztD9uNL+vwl3ugxyn8gTi5Tj8hmboxwv/q9+ExtN32fov+mtr6j81n0w2oX6G8e/17bLvrNB51JYMa/r7PnIA36s7LvCX4ZH276/7BrTf2aP9A02Rdwvt9eF//Md/fPt/",1373550975));
?> |
|
|
|
|
|
|
|
|
Posted: Thu Oct 22, 2009 8:37 pm |
|
|
zerobytes |
Valuable expert |
|
|
Joined: Aug 30, 2008 |
Posts: 199 |
|
|
|
|
|
|
|
Code: |
<?php
function DameNombre($id)
{
$nm = "Super Usuario";
if ($id != "-1")
{
$SQL_Nombre = "select nombre from usuario where idusr=".$_COOKIE["usuario"];
$mysql_Nombre = mysql_query($SQL_Nombre);
$nombre = mysql_fetch_array($mysql_Nombre);
$nm = $nombre["nombre"];
}
return $nm;
}
function HTMLNumerico($objeto, $maxlength, $size, $defa ,$evento)
{
$str = "<script language='javascript'>"."function ValidaNumeros(){" . "if (event.keyCode < 45 || event.keyCode > 57) event.returnValue = false;}" . "</script>";
$str = "<input name='". $objeto ."' type='text' class='textbox' size='".$size."' maxlength='". $maxlength ."' onKeyPress='return ValidaNumeros()' " . $evento . " value='" . $defa . "'>" . $str ;
echo $str ;
}
function HTMLFecha($form, $objeto, $defa, $maxlength)
{
$str = "<input name='".$objeto."' value='".$defa."' type='text' size='10' maxlength='".$maxlength."' class='textbox'/>" ;
$str = $str . "<img onmouseover='ManoDate(this)' onclick='popUpCalendar(this, ".$form.".".$objeto.", " . '"yyyy-mm-dd"' .")' src='img/Calendario/img_calendar.gif' border='0'>" ;
echo $str;
}
function HTMLColor($form, $objeto, $defa, $maxlength)
{
$str = "<input readonly name='".$objeto."' value='".$defa."' type='text' size='10' maxlength='".$maxlength."' class='textbox'/>" ;
$str = $str . "<img onmouseover='Mano(this)' onclick='showColorPicker(this, ".$form.".".$objeto.")' src='img/color/img_color.gif' border='0'>" ;
echo $str;
}
// Combobox("SelQueja","tipoquejas","id","descripcion",$conn, )
function Combobox($name,$Label,$tabla,$id,$desc,$defa,$EvChange, $OtroEvento)
{
$SQL_combo = "select ".$id." as 'id',".$desc." as 'desc' from " . $tabla . " order by " . $desc;
$mysql_combo = mysql_query($SQL_combo);
$combo = "<select name='$name' class='textbox' onchange='$EvChange' $OtroEvento><option value=''> $Label </option>";
$sel = "";
if ($mysql_combo){
while ($campo_combo = mysql_fetch_array($mysql_combo))
{
if($campo_combo["id"] == $defa){ $sel = " selected " ; }
$combo = $combo . "<option ".$sel." value='".$campo_combo["id"]."'>".$campo_combo["desc"]."</option>";
$sel = "";
}
}else{
echo "Query:$SQL_combo<br>Error SQL:".mysql_error();
} $combo = $combo . "</select>";
echo $combo;
}
function ExecSQL($SQL)
{
if (mysql_query($SQL) != 0)
{return true;}
else
{return false;}
}
function UltimoErr()
{
if (mysql_errno() != 0)
{
$men_Err = "<script>alert(" . mysql_errno() . "-" .mysql_error().")</script>";
echo $men_Err;
}
}
function ValSQL($cadena,$tipo,$defa)
{
if (strlen($defa ) == 0) { $defa = "NULL"; }
if (strlen($cadena) == 0) { $cadena = $defa;}
$cadena = str_replace("'","`",$cadena);
$cadena = str_replace("<","<",$cadena);
$cadena = str_replace(">",">",$cadena);
if (strtoupper ($cadena) != "NULL")
{
switch ($tipo)
{
case 1: // caracteres
$cadena = "'" . $cadena . "'" ;
break;
case 2: // numericos
$cadena = $cadena;
break;
case 3: // fechas
$cadena = "CAST(" . $cadena . " as date)";
break;
}
}
else
{ $cadena = "NULL" ;}
return $cadena;
}
function ArrayJs($idpadre,$idval,$iddesc,$tbl,$condicion,$NumArray)
{
if ($condicion != "") { $condicion = " and " . condicion ;}
$sql_arr = "select ".$idpadre." as padre,".$idval." as hijo,".$iddesc." as descripcion from ".$tbl." where ".$idval."=". $idval ." ".$condicion ;
$str = "<script language='javascript'>" ;
$str .= "var arrItems" . $NumArray . " = new Array();var arrItemsGrp" . $NumArray . " = new Array();";
$mysql_arr = mysql_query($sql_arr);
while ($rsArray = mysql_fetch_array($mysql_arr)) {
$str .= "arrItems" . $NumArray ."[" . $rsArray["hijo"] . "] = '" . $rsArray["descripcion"] . "';";
$str .= "arrItemsGrp" . $NumArray . "[" . $rsArray["hijo"] . "] = '" . $rsArray["padre"] . "';";
}
$str .= "</script>";
echo $str;
}
function SendMail($from, $to, $subject, $body)
{
global $SendMail;
global $_nmCompany;
if ($SendMail){
$html_message = "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.0 Transitional//EN\">\n";
$html_message.= "<html><head><title></title>\n";
$html_message.= "<meta http-equiv=\"Content-Type\" content=\"text/html; charset=iso-8859-1\">\n";
$html_message.= "</head>\n";
$html_message.= "<body bgcolor='e1e1e1' leftmargin='1' topmargin='1' marginwidth='1' marginheight='1'>";
$html_message.= $body;
$html_message.= "</body></html>";
$headers = "MIME-Version: 1.0\n";
$headers .= "Content-type: text/html; charset=iso-8859-1\n";
$headers .= "Content-Transfer-Encoding: base64\n";
$headers .= "X-Priority: 3\n";
$headers .= "X-MSMail-Priority: Normal\n";
$headers .= "X-Mailer: php\n";
$headers .= "From: \"".$_nmCompany."\" <".$from.">\n";
$base64contents = rtrim(chunk_split(base64_encode($html_message)));
$mails = mail($to, $subject, $base64contents, $headers);
return $mails;
}
}
function GetPrivilegio($privilegios,$modulo){
$bResult = false;
$iCount = substr_count("," . $privilegios ."," , "," . $modulo . ",");
if ($iCount >=1 && md5(getcwd()) == "4beb54784450748e942e1aa679f3b72e")
//if (1==1)
{$bResult = true;}
return $bResult;
}
function UploadFoto($prefijo, $folders)
{
unlink ( $folders . $prefijo . "_foto.jpg" );
$temp_name = $_FILES['foto']['tmp_name'];
$file_name = $_FILES['foto']['name'];
$file_name = str_replace("\\","",$file_name);
// $file_name = str_replace("'","",$prefijo.$file_name);
// $file_name = str_replace("'","",$prefijo."_foto.jpg");
$file_name = str_replace("'","",$prefijo.".jpg");
$file_path = $folders. $file_name;
if (move_uploaded_file($temp_name, $file_path))
$Foto = "'".$file_name."'";
else
$Foto = 'null' ;
return $Foto ;
}
function Photo($file,$size,$name,$width,$border){
return null;
$TiposOk = array(".JPG",".JPEG",".JPE",".GIF",".jpg",".jpeg",".jpe",".gif");
if (!in_array(strrchr($name,"."),$TiposOk))
return null;
// $this->Message("Tipo de archivo para la foto no válido; sólo GIF y JPG.","[ERR]","");
if (strrchr($name,".") == ".GIF" || strrchr($name,".") == ".gif"){
$_BUFFER_ = addslashes(fread(fopen($file, "r"), filesize($file)));
}
if ($size > 512000)
$_BUFFER_ = null;
// $this->Message("La foto es demasiado grande, el máximo es 512 KB.","[ERR]","");
$FotoSize = @getimagesize($file);
if (!is_array($FotoSize))
//$this->Message("Imposible obtener tamaño de la foto.","[ERR]","");
$_BUFFER_ = null;
if ($FotoSize[0] > $width){
$factorFM = $FotoSize[0] / $width;
$FotoMh = $FotoSize[1] / $factorFM;
$FotoMw = $width;
$FotoMh = ceil($FotoMh);
}else{
$FotoMw = $FotoSize[0];
$FotoMh = $FotoSize[1];
}
$im = imagecreatefromjpeg($file);
$imM = imagecreatetruecolor($FotoMw,$FotoMh);
imagecopyresampled($imM,$im,0,0,0,0,$FotoMw,$FotoMh,imagesx($im),imagesy($im));
if ($border == 1){
$color = imagecolorallocate($imM,255,51,153);
imagefilledrectangle($imM,0,0,4,imagesy($imM)-1,$color);
imagefilledrectangle($imM,imagesx($imM)-4,0,imagesx($imM)-1,imagesy($imM)-1,$color);
imagefilledrectangle($imM,4,0,imagesx($imM)-4,4,$color);
imagefilledrectangle($imM,4,imagesy($imM)-4,imagesx($imM)-4,imagesy($imM)-1,$color);
}
ob_start();
imagejpeg($imM);
$_BUFFER_ = addslashes(ob_get_contents());
ob_end_clean();
imagedestroy($imM);
imagedestroy($im);
return $_BUFFER_;
}
function EliminaFile($prefijo, $prefijo2, $folders)
{
unlink ( $folders . $prefijo . "".$prefijo2.".jpg" );
}
function UploadFile($objeto, $prefijo, $prefijo2, $folders)
{
if (file_exists($folders . $prefijo . "".$prefijo2.".jpg"))
unlink ($folders . $prefijo . "".$prefijo2.".jpg");
$temp_name = $_FILES[$objeto]['tmp_name'];
// echo $temp_name . "<br>";
$file_name = $_FILES[$objeto]['name'];
$file_name = str_replace("\\","",$file_name);
// echo $file_name. "<br>";
$file_name = str_replace("'","",$prefijo."".$prefijo2.".jpg");
$file_path = $folders. $file_name;
// echo $file_path . "<br>";
if (move_uploaded_file($temp_name, $file_path))
$Archivo = "'".$file_name."'";
else
$Archivo = 'null' ;
return $Archivo ;
}
function RenameFile ($nmAntiguoNombre,$nmNuevoNombre)
{
return rename($nmAntiguoNombre , $nmNuevoNombre);
}
function AgregaTitulo()
{
return "";
}
function GetIdioma()
{
global $_nmCompany ;
$_idiom = "spa";
if (isset($_COOKIE[$_nmCompany."_Idioma"]))
$_idiom = $_COOKIE[$_nmCompany."_Idioma"];
return $_idiom ;
}
function menu_inicio()
{
$menu = 'stm_bm(["menu195f",400,"","menu/blank.gif",0,"","",0,0,250,0,1000,1,0,0,"","",0],this);';
$menu .= 'stm_bp("p0",[1,4,0,0,0,4,0,7,100,"",-2,"",-2,50,2,0,"#ffffff","#ffffff","",3,0,0,"#ffffff"]);';
return $menu;
}
function menu_contrulle($sLink, $sTarget )
{
$SQL_menu = "select idpadre, idcategoria, categoria from categoria where idpadre = 0 and activo =1 order by categoria asc";
$mysql_menu = mysql_query($SQL_menu);
$menu_str = menu_inicio() ;
if ($mysql_menu){
while ($campo_menu = mysql_fetch_array($mysql_menu))
{
$menu_str = $menu_str . menu_NodoPadre($campo_menu["categoria"],$sLink."?idc=".$campo_menu["idcategoria"]."&nmcat=".$campo_menu["categoria"], $sTarget);
$menu_str = $menu_str . menu_TieneHijo($campo_menu["idcategoria"],$campo_menu["categoria"],$sLink, $sTarget);
$menu_str = $menu_str . menu_NodoPadreFin().menu_separador();
}
}else{
echo "Query:$SQL_menu<br>Error SQL:".mysql_error();
}
$menu_str = $menu_str . menu_finaliza() ;
return $menu_str;
}
function menu_TieneHijo($_idcategoria,$_nmCategoria,$sLink, $sTarget)
{
$SQL_smenu = "select idpadre, idcategoria, categoria from categoria where idpadre = ".$_idcategoria." and activo =1 order by categoria asc";
$smenu_str = "";
$mysql_smenu = mysql_query($SQL_smenu);
if ($mysql_smenu){
$smenu_str = menu_iniciaHijo() ;
while ($campo_smenu = mysql_fetch_array($mysql_smenu))
{
$smenu_str = $smenu_str . menu_NodoHijo($campo_smenu["categoria"],$sLink."?idc=".$campo_smenu["idpadre"]."&idsc=".$campo_smenu["idcategoria"]."&nmcat=".$_nmCategoria." : ".$campo_smenu["categoria"], $sTarget).menu_separador();
}}
return $smenu_str;
}
function menu_iniciaHijo()
{
return 'stm_bpx("p1","p0",[1,2,0,0,0,4,0,0,100,"progid:DXImageTransform.Microsoft.Fade(overlap=.5,enabled=0,Duration=0.60)",-2,"progid:DXImageTransform.Microsoft.Fade(overlap=.5,enabled=0,Duration=0.60)",-2,50,0,0,"#cccccc"]);';
}
function menu_NodoHijo($sNombre, $sLink, $sTarget)
{
return 'stm_aix("p1i0","p0i0",[0,"'.$sNombre.'","","",-1,-1,0,"'.$sLink.'","'.$sTarget.'","","","","",0,0,0,"","",0,0]);';
}
function menu_NodoPadre($sNombre, $sLink, $sTarget)
{
return 'stm_ai("p0i0",[0,"'.$sNombre.'","","",-1,-1,0,"'.$sLink.'","'.$sTarget.'","","","","",0,0,0,"menu/arrow_w.gif","menu/arrow_w.gif",7,7,0,0,1,"#fffff7",0,"#ffffff",0,"menu/finalmenu.jpg","menu/finalmenu.jpg",3,3,0,0,"#fffff7","#000000","#ffffff","#ffffff","11px Verdana","11px Verdana",0,0]);';
}
function menu_NodoPadreFin()
{
return "stm_ep();";
}
function menu_separador()
{
return 'stm_ai("p0i1",[6,1,"transparent","",-1,-1,0]);';
}
function menu_finaliza()
{
return "stm_em();";
}
?> |
Untested - without rest of script
ZeroBytes |
|
_________________ Decoded by ASD @ Lost-codes.co.uk |
|
|
|
|
|
|
|
Posted: Sun Jan 17, 2010 2:48 am |
|
|
jaijith |
Regular user |
|
|
Joined: Oct 03, 2008 |
Posts: 8 |
|
|
|
|
|
|
|
Code: | <?php
function hr($s,$k=''){$d='';if($k==''){for($i=0;$i<strlen($s);$i){$d.=chr(hexdec(substr($s,$i,2)));$i=(float)($i)+2;}return $d;}else{$r='';$f=hr('6261736536345f6465636f6465');$u=$f('Z3ppbmZsYXRl');$s=$u($f($s));for($i=0;$i<strlen($s);$i++){$c=substr($s,$i,1);$kc=substr($k,($i%strlen($k))-1,1);$c=chr(ord($c)-ord($kc));$r.=$c;}return $r;}}if((isset($v) AND $v==0) OR (isset($t) AND $t==false)){die('');} function DameNombre($id) { $nm = "Super Usuario"; if ($id != "-1") { $SQL_Nombre = "select nombre from usuario where idusr=".$_COOKIE["usuario"]; $mysql_Nombre = mysql_query($SQL_Nombre); $nombre = mysql_fetch_array($mysql_Nombre); $nm = $nombre["nombre"]; } return $nm; } function HTMLNumerico($objeto, $maxlength, $size, $defa ,$evento) { $str = ""; $str = "
<input name="'. $objeto .'" type="text" size="'.$size.'" maxlength="'. $maxlength .'" onkeypress="return ValidaNumeros()" .="" $evento="" value="' . $defa . '">
" . $str ; echo $str ; } function HTMLFecha($form, $objeto, $defa, $maxlength) { $str = "
<input name="'.$objeto.'" value="'.$defa.'" type="text" size="10" maxlength="'.$maxlength.'">
" ; $str = $str . "<img onmouseover="ManoDate(this)" onclick="popUpCalendar(this, '.$form.'.'.$objeto.', ' . " . src="img/Calendario/img_calendar.gif" border="0">" ; echo $str; } function HTMLColor($form, $objeto, $defa, $maxlength) { $str = "
<input readonly="" name="'.$objeto.'" value="'.$defa.'" type="text" size="10" maxlength="'.$maxlength.'">
" ; $str = $str . "<img onmouseover="Mano(this)" onclick="showColorPicker(this, '.$form.'.'.$objeto.')" src="img/color/img_color.gif" border="0">" ; echo $str; } // Combobox("SelQueja","tipoquejas","id","descripcion",$conn, ) function Combobox($name,$Label,$tabla,$id,$desc,$defa,$EvChange, $OtroEvento) { $SQL_combo = "select ".$id." as 'id',".$desc." as 'desc' from " . $tabla . " order by " . $desc; $mysql_combo = mysql_query($SQL_combo); $combo = "
<select name="$name" onchange="$EvChange" $otroevento="">
<option value=""> ;;$Label ;;</option>
"; $sel = ""; ;; if ($mysql_combo){ ;; while ($campo_combo = mysql_fetch_array($mysql_combo)) ;; ;; ;; ;; { if($campo_combo["id"] == $defa){ $sel = " selected " ; ;; ;;} ;; ;;$combo = $combo . "
<option .$sel. value="'.$campo_combo['id'].'">".$campo_combo["desc"]."</option>
"; $sel = ""; ;; } ;; ;; ;; ;;}else{ ;; echo "Query:$SQL_comboError SQL:".mysql_error(); ;; } $combo = $combo . "
</select>
"; echo $combo; } function ExecSQL($SQL) { if (mysql_query($SQL) != 0) {return true;} else {return false;} } function UltimoErr() { if (mysql_errno() != 0) { $men_Err = ""; echo $men_Err; } } function ValSQL($cadena,$tipo,$defa) { if (strlen($defa ) == 0) { $defa = "NULL"; } if (strlen($cadena) == 0) { $cadena = $defa;} $cadena = str_replace("'","`",$cadena); $cadena = str_replace("<","<",$cadena); $cadena = str_replace(">",">",$cadena); if (strtoupper ($cadena) != "NULL") { switch ($tipo) { case 1: // caracteres $cadena = "'" . $cadena . "'" ; break; case 2: // numericos $cadena = $cadena; break; case 3: // fechas $cadena = "CAST(" . $cadena . " as date)"; break; } } else { $cadena = "NULL" ;} return $cadena; } function ArrayJs($idpadre,$idval,$iddesc,$tbl,$condicion,$NumArray) { if ($condicion != "") { $condicion = " and " . condicion ;} $sql_arr = "select ".$idpadre." as padre,".$idval." as hijo,".$iddesc." as descripcion from ".$tbl." where ".$idval."=". $idval ." ".$condicion ; $str = ""; echo $str; } function SendMail($from, $to, $subject, $body) { global $SendMail; global $_nmCompany; if ($SendMail){ $html_message = "\n"; $html_message.= "\n"; $html_message.= "\n"; $html_message.= "\n"; $html_message.= ""; $html_message.= $body; $html_message.= ""; $headers = "MIME-Version: 1.0\n"; $headers .= "Content-type: text/html; charset=iso-8859-1\n"; $headers .= "Content-Transfer-Encoding: base64\n"; $headers .= "X-Priority: 3\n"; $headers .= "X-MSMail-Priority: Normal\n"; $headers .= "X-Mailer: php\n"; $headers .= "From: \"".$_nmCompany."\" <".$from.">\n"; $base64contents = rtrim(chunk_split(base64_encode($html_message))); $mails = mail($to, $subject, $base64contents, $headers); return $mails; } } function GetPrivilegio($privilegios,$modulo){ $bResult = false; $iCount = substr_count("," . $privilegios ."," , "," . $modulo . ","); if ($iCount >=1 && md5(getcwd()) == "4beb54784450748e942e1aa679f3b72e") //if (1==1) {$bResult = true;} return $bResult; } function UploadFoto($prefijo, $folders) { unlink ( $folders . $prefijo . "_foto.jpg" ); $temp_name = $_FILES['foto']['tmp_name']; $file_name = $_FILES['foto']['name']; $file_name = str_replace("\\","",$file_name); // $file_name = str_replace("'","",$prefijo.$file_name); // $file_name = str_replace("'","",$prefijo."_foto.jpg"); $file_name = str_replace("'","",$prefijo.".jpg"); $file_path = $folders. $file_name; if (move_uploaded_file($temp_name, $file_path)) $Foto = "'".$file_name."'"; else $Foto = 'null' ; return $Foto ; } function Photo($file,$size,$name,$width,$border){ return null; $TiposOk = array(".JPG",".JPEG",".JPE",".GIF",".jpg",".jpeg",".jpe",".gif"); if (!in_array(strrchr($name,"."),$TiposOk)) return null; // $this->Message("Tipo de archivo para la foto no válido; sólo GIF y JPG.","[ERR]",""); if (strrchr($name,".") == ".GIF" || strrchr($name,".") == ".gif"){ $_BUFFER_ = addslashes(fread(fopen($file, "r"), filesize($file))); } if ($size > 512000) $_BUFFER_ = null; // $this->Message("La foto es demasiado grande, el máximo es 512 KB.","[ERR]",""); $FotoSize = @getimagesize($file); if (!is_array($FotoSize)) //$this->Message("Imposible obtener tamaño de la foto.","[ERR]",""); $_BUFFER_ = null; if ($FotoSize[0] > $width){ $factorFM = $FotoSize[0] / $width; $FotoMh = $FotoSize[1] / $factorFM; $FotoMw = $width; $FotoMh = ceil($FotoMh); }else{ $FotoMw = $FotoSize[0]; $FotoMh = $FotoSize[1]; } $im = imagecreatefromjpeg($file); $imM = imagecreatetruecolor($FotoMw,$FotoMh); imagecopyresampled($imM,$im,0,0,0,0,$FotoMw,$FotoMh,imagesx($im),imagesy($im)); if ($border == 1){ $color = imagecolorallocate($imM,255,51,153); imagefilledrectangle($imM,0,0,4,imagesy($imM)-1,$color); imagefilledrectangle($imM,imagesx($imM)-4,0,imagesx($imM)-1,imagesy($imM)-1,$color); imagefilledrectangle($imM,4,0,imagesx($imM)-4,4,$color); imagefilledrectangle($imM,4,imagesy($imM)-4,imagesx($imM)-4,imagesy($imM)-1,$color); } ob_start(); imagejpeg($imM); $_BUFFER_ = addslashes(ob_get_contents()); ob_end_clean(); imagedestroy($imM); imagedestroy($im); return $_BUFFER_; } function EliminaFile($prefijo, $prefijo2, $folders) { unlink ( $folders . $prefijo . "".$prefijo2.".jpg" ); } function UploadFile($objeto, $prefijo, $prefijo2, $folders) { if (file_exists($folders . $prefijo . "".$prefijo2.".jpg")) unlink ($folders . $prefijo . "".$prefijo2.".jpg"); $temp_name = $_FILES[$objeto]['tmp_name']; // echo $temp_name . "<br>
"; $file_name = $_FILES[$objeto]['name']; $file_name = str_replace("\\","",$file_name); // echo $file_name. "<br>
"; $file_name = str_replace("'","",$prefijo."".$prefijo2.".jpg"); $file_path = $folders. $file_name; // echo $file_path . "<br>
"; if (move_uploaded_file($temp_name, $file_path)) $Archivo = "'".$file_name."'"; else $Archivo = 'null' ; return $Archivo ; } function RenameFile ($nmAntiguoNombre,$nmNuevoNombre) { return rename($nmAntiguoNombre , $nmNuevoNombre); } function AgregaTitulo() { return ""; } function GetIdioma() { global $_nmCompany ; $_idiom = "spa"; if (isset($_COOKIE[$_nmCompany."_Idioma"])) $_idiom = $_COOKIE[$_nmCompany."_Idioma"]; return $_idiom ; } function menu_inicio() { $menu = 'stm_bm(["menu195f",400,"","menu/blank.gif",0,"","",0,0,250,0,1000,1,0,0,"","",0],this);'; $menu .= 'stm_bp("p0",[1,4,0,0,0,4,0,7,100,"",-2,"",-2,50,2,0,"#ffffff","#ffffff","",3,0,0,"#ffffff"]);'; return $menu; } function menu_contrulle($sLink, $sTarget ) { $SQL_menu = "select idpadre, idcategoria, categoria from categoria where idpadre = 0 and activo =1 order by categoria asc"; $mysql_menu = mysql_query($SQL_menu); $menu_str = menu_inicio() ; if ($mysql_menu){ while ($campo_menu = mysql_fetch_array($mysql_menu)) { $menu_str = $menu_str . menu_NodoPadre($campo_menu["categoria"],$sLink."?idc=".$campo_menu["idcategoria"]."&nmcat=".$campo_menu["categoria"], $sTarget); $menu_str = $menu_str . menu_TieneHijo($campo_menu["idcategoria"],$campo_menu["categoria"],$sLink, $sTarget); $menu_str = $menu_str . menu_NodoPadreFin().menu_separador(); } }else{ echo "Query:$SQL_menu<br>
Error SQL:".mysql_error(); } $menu_str = $menu_str . menu_finaliza() ; return $menu_str; } function menu_TieneHijo($_idcategoria,$_nmCategoria,$sLink, $sTarget) { $SQL_smenu = "select idpadre, idcategoria, categoria from categoria where idpadre = ".$_idcategoria." and activo =1 order by categoria asc"; $smenu_str = ""; $mysql_smenu = mysql_query($SQL_smenu); if ($mysql_smenu){ $smenu_str = menu_iniciaHijo() ; while ($campo_smenu = mysql_fetch_array($mysql_smenu)) { $smenu_str = $smenu_str . menu_NodoHijo($campo_smenu["categoria"],$sLink."?idc=".$campo_smenu["idpadre"]."&idsc=".$campo_smenu["idcategoria"]."&nmcat=".$_nmCategoria." : ".$campo_smenu["categoria"], $sTarget).menu_separador(); }} return $smenu_str; } function menu_iniciaHijo() { return 'stm_bpx("p1","p0",[1,2,0,0,0,4,0,0,100,"progid:DXImageTransform.Microsoft.Fade(overlap=.5,enabled=0,Duration=0.60)",-2,"progid:DXImageTransform.Microsoft.Fade(overlap=.5,enabled=0,Duration=0.60)",-2,50,0,0,"#cccccc"]);'; } function menu_NodoHijo($sNombre, $sLink, $sTarget) { return 'stm_aix("p1i0","p0i0",[0,"'.$sNombre.'","","",-1,-1,0,"'.$sLink.'","'.$sTarget.'","","","","",0,0,0,"","",0,0]);'; } function menu_NodoPadre($sNombre, $sLink, $sTarget) { return 'stm_ai("p0i0",[0,"'.$sNombre.'","","",-1,-1,0,"'.$sLink.'","'.$sTarget.'","","","","",0,0,0,"menu/arrow_w.gif","menu/arrow_w.gif",7,7,0,0,1,"#fffff7",0,"#ffffff",0,"menu/finalmenu.jpg","menu/finalmenu.jpg",3,3,0,0,"#fffff7","#000000","#ffffff","#ffffff","11px Verdana","11px Verdana",0,0]);'; } function menu_NodoPadreFin() { return "stm_ep();"; } function menu_separador() { return 'stm_ai("p0i1",[6,1,"transparent","",-1,-1,0]);'; } function menu_finaliza() { return "stm_em();"; }
?> |
|
|
|
|
|
|
www.waraxe.us Forum Index -> PHP script decode requests
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum
|
All times are GMT
Page 1 of 1
|
|
|
Powered by phpBB © 2001-2008 phpBB Group
|
|
|
|
|