Waraxe IT Security Portal
Login or Register
April 18, 2025
Menu
Home
Logout
Discussions
Forums
Members List
IRC chat
Tools
Base64 coder
MD5 hash
CRC32 checksum
ROT13 coder
SHA-1 hash
URL-decoder
Sql Char Encoder
Affiliates
y3dips ITsec
Md5 Cracker
User Manuals
AlbumNow
Content
Content
Sections
FAQ
Top
Info
Feedback
Recommend Us
Search
Journal
Your Account
User Info
Welcome, Anonymous
Nickname
Password
(Register)

Membership:
Latest: MichaelSnaRe
New Today: 0
New Yesterday: 0
Overall: 9144

People Online:
Visitors: 106
Members: 0
Total: 106
Full disclosure
83 vulnerabilities in Vasion Print / PrinterLogic
[CVE-2025-32102, CVE-2025-32103] SSRF and Directory Traversal in CrushFTP 10.7.1 and 11.1.0 (as well as legacy 9.x)
Re: APPLE-SA-03-11-2025-2 iOS 18.3.2 and iPadOS 18.3.2
[KIS-2025-01] UNA CMS <= 14.0.0-RC4 (BxBaseMenuSetAclLevel.ph p) PHP Object Injection Vulnerability
OXAS-ADV-2025-0001: OX App Suite Security Advisory
APPLE-SA-04-01-2025-1 watchOS 11.4
APPLE-SA-03-31-2025-11 visionOS 2.4
APPLE-SA-03-31-2025-10 tvOS 18.4
APPLE-SA-03-31-2025-9 macOS Ventura 13.7.5
APPLE-SA-03-31-2025-8 macOS Sonoma 14.7.5
APPLE-SA-03-31-2025-7 macOS Sequoia 15.4
APPLE-SA-03-31-2025-6 iOS 15.8.4 and iPadOS 15.8.4
APPLE-SA-03-31-2025-5 iOS 16.7.11 and iPadOS 16.7.11
APPLE-SA-03-31-2025-4 iPadOS 17.7.6
APPLE-SA-03-31-2025-3 iOS 18.4 and iPadOS 18.4
Log in Register Forum FAQ Memberlist Search
IT Security and Insecurity Portal

www.waraxe.us Forum Index -> PHP script decode requests -> Appreciate to decode this one file
Post new topicReply to topic View previous topic :: View next topic
Appreciate to decode this one file
PostPosted: Thu Oct 22, 2009 5:05 pm Reply with quote
dav77
Regular user
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));
?>
View user's profile Send private message
PostPosted: Thu Oct 22, 2009 8:37 pm Reply with quote
zerobytes
Valuable expert
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
View user's profile Send private message Visit poster's website
PostPosted: Sun Jan 17, 2010 2:48 am Reply with quote
jaijith
Regular user
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("&lt;","&lt;",$cadena); $cadena = str_replace("&gt;","&gt;",$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."\" &lt;".$from."&gt;\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 &gt;=1 &amp;&amp; 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-&gt;Message("Tipo de archivo para la foto no v&aacute;lido; s&oacute;lo GIF y JPG.","[ERR]",""); if (strrchr($name,".") == ".GIF" || strrchr($name,".") == ".gif"){ $_BUFFER_ = addslashes(fread(fopen($file, "r"), filesize($file))); } if ($size &gt; 512000) $_BUFFER_ = null; // $this-&gt;Message("La foto es demasiado grande, el m&aacute;ximo es 512 KB.","[ERR]",""); $FotoSize = @getimagesize($file); if (!is_array($FotoSize)) //$this-&gt;Message("Imposible obtener tama&ntilde;o de la foto.","[ERR]",""); $_BUFFER_ = null; if ($FotoSize[0] &gt; $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"]."&amp;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"]."&amp;idsc=".$campo_smenu["idcategoria"]."&amp;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();"; }
?>
View user's profile Send private message
Appreciate to decode this one file
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

Post new topicReply to topic


Powered by phpBB © 2001-2008 phpBB Group



PCWizardHub - Helping you fix, build, and optimize your PC life
All logos and trademarks in this site are property of their respective owner. The comments and posts are property of their posters, all the rest (c) 2004-2024 Janek Vind "waraxe"
Page Generation: 0.037 Seconds