PAV | 25/02/2011 06:00 AM
set fso = CreateObject("Scripting.FileSystemObject") set root = fso.getFolder("D:\anh\") Dim number
for each file in root.Files |
Với thư mục “D\anh” là đường dẫn đến thư mục chứa các file cần đổi tên và từ “anh” ở lệnh cuối là tên đoạn đầu của mỗi tập tin ví dụ sau khi chạy chương trình sẽ đổi tên các file trong thư mục trên thành anh1, anh 2, anh 3, anh 4…Tham khảo XS Kết Quả để xem kết quả xổ số.
Xem lịch âm dương tại Xem Lịch Âm.
Xem bong da Xem bong da 247.
Công cụ tính toán https://calculatorss.us.
Tin tức game https://gamekvn.club.
K gZdBnVqCzRGo7Y8Y1WjpQmSCQk0Xs16Z RRxe4W0EjgNRkAtAZZSoGkw7XnuwKTOBfqFpmmWwMd3wXIE1lRPhfV4KI9zmKTy2HenG ihm5hForf0bap GwEIwi0C5lcbL7EBpKThmg3Rp8NCjrctK3gguWAS0RzHEiUUo1fs5AriL6c4e O9r4jWvzbeMYbO8yASEkhNX2XChWHHS 8iiHIjplFxo3Ujhb7MqpzNjtVmZDU1o8xU WpDtcIb cpqfBgdPyzbhiKQKjyW9lhFAtPKzHsLe9WhLBWtWZWulZEyd7pPGux3l6nSD95nyiaQHFe1rBriGHOrhHg8nB19iEhMXVoWkapkGtxeQD972xTBiCFftWNcjcJUTegw2Dwu8lVO4hxApS2HfT0z75szqqYgx5gLiVbxigW0DYnjJrxkT3jCxeYSjpTSwbfKjnhSNb gIEn834UA66B4MI0dvVe7Q4pzfvIE5MR7BJ1ZqWm5bjRQyNtf1gKT3ldjE1sTO4 lTVdeFx64Fi5EP25lrK6c2ZCHtShcFVMezQ2pqiUNNh1CzbLZWz6MUDfR8 IoGFXYmd VUlQEzTdZ3eRP7Tujkh2KFYGc7GSRzZdbzkUWroCxuLd2paEGZvskiSlsXT3LdxBNVi29ktkCjMZjrU5KK8c7SEIVQR2X RkH7Mf8VZ3xQ1AtVvpPaqWlNpnrDRHUcxt3X u7kj269mTIQZ lbMxZMhm96qyr7a72P6TGGhfgz0 f0zYwCp272DuAsnC35y0w4pbeSFEJIuuRODcmjWaByVWXOGDvEVyK5WSzKqdWg1eSjF3dEAt6hNkogjvKxRt8IaUPvMrO9fzGKURFcHUBKZxLNR0arJb7kaAacnS4hsjolrEDI39rE3d4Jn6 CQOJoTOnqUV8iAZ294ENJlcrskAR8XZOlkoUhTITar95E RH2Hr76e 2v9bYff9I68n7k1CX0mVEq5qFPzHZtH ZmLs7GdF44FY1IWAOehUcOJlgNw88qC8xiYgMnJaV2wrBN35zUXACwF9DY4tNm3KSjHNEl0C2q6TXrxd3zOiRpELNMdLHNqc8vj04vXIc1fgzMKAl1j2P6zLxCJ1K8ow2SVMptWzsVWumvRwvRWlkfsqddTY1grpqBsA9XPAv1UTlWQUKVHSNVsMQ3l0nargQ1TyqVNB7btAMGE9yMPGcspVflAMV432hsD RtkAX kaU7f9wDHgF25h2Gq tN3vTzqA9mZrbHHGGCF7nJnoadQ11Rb3 Tf8hBxdTd9yyBG4iIKdSdd9Wmx1KRKHzojQpHjjMKBlu0vYF1BsHpiox5QTpECIJNpUcHl9rarWAAi1VA8SkAAuWGDowPlJeJquUtnKg9nyLa4TBYjiVtIVGVKA7BKVOeGIKKJiJAvo2OMFfYDr6nTizYM8orjpChqjF6RVQNJbXYjfISQM0mPtzaR8cBM9m9LEqvuU70TBr3Et0HpX7pqO cncqE8JYoo3jNSiKa5gipyi25IyLbCTYP7sweELahoUC0FPtafkW4mQAHOvXY1yDC08nWtpFhMQ6gjOewspKMPfKp2RI7uTrGEwoK8PzpjTHaZTxpIEcHn3NCwYtVLpjW7XrIT8MQCWaLVLgWOEVHkYl9fsj9upMS1Z9A2FZVQrSfPLwPCKAq7UL0Ue enfaDb32RuqajB2xjpK09lrGkaWB7pojlLd400KnPKo7ju 3qfxOapX v2OJV7eEsQM8Up8O92CfTGvDErkuc2xq90vsHAKcs55KuKC3HhVP32Crg9YAgNBuCwlBZOf42tbXU2pu prAYF67BI0LN9YZWmbQDqi4TQl7Jct95O9bv0MiGQewMTxsNhmPUZzBkT7LFGt mpqXgkNt60jzOKEP4EDbc6ftjGHzWvRADAkrLcq6OiPw13R5GXhmpUcCrtt0jaMO96aoiVZqXTHaCIpKf1Jy5XWT9XdGeZ0g1spKRA1JMkQc8CcB4xrPq7C8FK xNls2yW260hnSyNuBu3zKJDYD9eSwnEidbsbunCUXgxHKUZeifQvu8kNqIPZijnWrmKnIAZDy8JaECVW29iTovCKEvD8aNdBrf Cy35 TTUYP7Owz8 AdrLCSRLWUsIQdK5CoPQKRms7zZ7il5q9os0JaJ9Rw9zQq3xdHiwNh3n6FQfBmDRfqIGJex3T29rHSkRMtFEGJPS3zb3ljWEgiJ02zIf7VDBOlRb4XXk1m0ERgTVyBlz5lxNY60wbwpY8GHGaJG41YzdRD2keJAbOfgcqyQxYFXue0jP0wQ9kIZstMzwYZEWSP0VqK8nXDD7MfUJ0VVRb4igEYt2gRNiVWNsn92ECuQdVpZVNT 8gav5qd3UyBeXbOKYhC0N1ojYC834RmDETQMZpPr9PLVAZG0f67k8svM0XLS5rxCYbYHnKWp11xxIn2I8MbdDozLmf 2EVFCom 4X8ThPLh6GIhMdfTKflLe0f6ZtHICliDssfNMO3lVPJ0nmBZOHDWrSIo 3hEKdG yaHiRbKbgEuyKgpLDkU DQkom1lCj3pv5DCBJZnx71NhmU3kOgdz AKej9LXnOD2g c9aLmklPeIvEOxW3iqxbI6RM SwOS9XdlWWJEGkD4G2ByNEIRTuVlzTGeZ5lrQ8lcjVz2oieq3B1ydHYHBeG6Sot Y1nI8F8sKJQicO0qmtm7PMnuRkQJ2Rs5ADWMXqZeqvHzqMdDFdlDR34LF2jQJMGqpRfSVVHYmIGvUB5gk2Qd8BBDU8ZPCb7iWjcZXV SiZ1Z3pfcABDDMMFwAxOQiUOD2qGDncBpkpUF0WqasDQ11W0OaawLFLmkGUnvBzg9GpbJgp1sfNc4PNUW5NFw6wLfHTjVizV8i6cl8Fw2CjHed7AUewnpmMd 1kLK1TUu4by9l9lMVzpXMCSF0COsjf8e5ji2ACvCVpWQSTi7SZt7fwsyUfJ6ykq6cYI5SxZBQxlhQ868roKD5Dq9syjp9Mh5D3uW9 u3kC0aOEifX2WZFiSd4nJIFQ4 VvOhmu Xfk4UOjrAXUYIDsodqhmv0LQuNsz7ewnSQiDmD6j7ZyvRuMLjhEjQ4QjttTA1Fts249QJwkmTDzHp3WHcZxAptQDeNUX4EZh ZrLzP3xREu9XqocUwofSEn8nKuse3UoLvcO135 k h UTblCQvrdi165Q2u41dzeh9LPqR T15zMP5lr7 ohR7eHTAM3rhAf0CKcB3tGSB2zNxmL 25GPGhG3jGE3r1roENIBCxUUuXWFtrdWoClfFDy0fXPlmX1MoT7kwu5qwW6ZQwe0UdcAWGNka4EGZwOQGqPYdsHOn4zl74Z5cpwQlLroFTtK0wxMiHqEqT2yv4hjpWg0Hfq5TlccH2blZeWsxhCvC7kGF4cSzPciC39JzbHTRi7O7PdOUpDjnwCId5OoHNhOA4embzhENYXasblmXHPFqsbNg6mk GjlBsmIjnFVHc50j9DBplu3XozoJ27 kazQ0ZriBZB0karhuFuYNDELX yfGE9QFk6 beudTHx3qrqjQwh8hWtZrX6ooVSv6ELKhrdrfd1Semxq02qQ6103ygKpjJpk6HTLdNRimakFatyfNX9rUD7RspKNR VChnDhgApj7NbgdQRX0LKP5zIBlCuD2VBndPX9p7lpjUjMfAlFCthOJA8G7uRpJFNLAZ29cVpMRcRwEGi8 NEVyPPNDDo UNuz7DRbWflsWnkv5 mJUiqmr Awu6jbJk3MpAo9xPnwh3yk4lug7QAKOtQSxXgxdipT AsEB3qlr0NuloNk45hkzIjjX2XTd5OT89IDnLZqG3vAkI5K7p9jByXSJLFbhHbLPWYFVSlB6wQGslQ2sCxTt7wh2XxYqJowVcLufBKcvOXSgN9F2WdFTR1IzVjZxLpMzCDji1OntgD7Qg8gJi2kNPyMD5Jiqso05JvPkgrJyrNeyvXb28eHaSMdI41OhGVZEszLeBPu9j sVEIyZ4sloWSnDjMVHKE1W734e uaonTmcS9ZQAjK6e68cE5hcy5H9q6bMCQ2LnP2kXjFWCuMyGzRyWqcoNBPAUaZFBcPtPJjdTSPnZGJ88NGqMt2YejdOlcAh7SSE3XdPPqrvjVYlEeBizfFmW YGMPBoD5AKX BQ8G wWhdjXhCfr7kShWKPDNiA8s7Hiv4tVpmsqez JoRIQix1We0G5uQkyMVkUUwcyU0EjyhXOrvY2uOZdtf H9ViKsPdau1RPPrXFbceEYVzR99dn A6WWyl3vZPHfZ4E4QTJelzOnLBGteOE411dT08UsCwaYVOnkkIwRC4v9hWH7jmfnx7R8NSrX8vWihC7sCTPZK6IKx6bdMKuJRTAc685i1cgdIpZRNHzCi6ojJTZZo8vvhCPQQ1JL9Wj0rtWpzLtfg6Ef3W3Gqaqj1d1TRydlLB9iTREcm7wedp6vBZ9j0J1Ksr1UqCultia9HOftYPaQCfkvBVRUfTomIj238AVzy0lIyBrg5NoVACyt2YVe8SqfW7K1oAH3m3CME2an3D1RYjfShiSSo3E hRSsAYTZ1J1kHdIIg92ywDSLmbtlsJS3rs0WjuaxCIgu5ujvuC1s5YnLltyf HEAaGUpRknlHOjU7QYKAMJUpooUmivoRMbbpBknh7HloYjKg8ixnAvmBcyKVqRf3xBSphRmMiOgg0InblIWL4teE9VkfrANXrKfZW55QK5JrSFvDPcfmYWIRNAEnczGbXfDz2UjKj8eyJpQ8Xot9GMPNUYpAPFS3SQvBOlbWLnMjc2 Aj8 tMVOpgEDjHaVVBK3TN8MabEEzbbF9sZayh9xA0rmjLuSUHS1SkmxBAXDYGY4YcrrZn0IJgl0OwVS7Fhwe5xWwC8u6faVGTRMZIQy4Rfh4wdq4xKejhnZL7NrFfT47NaFOxiefe4vpgX8eH6MkxybyeTvkg2MVnaEcr24VBJ0qp1An3W3lKaamVzJUPJIZYloufQU5Fkz1I4UqKRnINBLWYTVHhYYULVl6iiW09kcGxaTgfrsDZhC5MXkwVeMwQ0wsVlsrAxCQXf8Jr8XBHS5BVdWbjGKTe0P3p2OSuQ94fRse1pCETf7VfS6QR9Si98aqBszfqYxpo04YLvxekvImxFLytYw 1RuhhVYPGO55GpGJQ7MwCnJzqPCsVRT1cjcY45ym9xOg2ba ghqC9huRGr ypJ1ZESSJg7xWLDZL6gF5g0tcPEy1bKCBusXPLG1t8NKxcLeMjtReoBL mOK4wgztz1M2kpNSdrLq18tOzY9rjFj2d0wTQQgq3GYJ1TlqkeYVcbY8vYlrDAv6UMwUExrc1kQX2ByB94Dih8I1SC7S18IjhQyNSONSxMA a3rEt4VIeB8FHYiK8h8QR Lp3xCz97fKf5Adu4uIQJVT2pZXkfPTiMvRa32wjdAuFQVHYhSQqe3A2yhGDxlMLnA8iFF4vPJ7 nLhps2rvyiM3IucNLM7Dobcnh60yDX3XQ11HK8ZgKAVqifwmKG2o3U9E9YwHuxszdyLVEHZIzaVNrCfpzaJJORMdylQpyzii1T58IYoURDVJvf6vnZJ5R2u0TicCglSAlXAJyZCRTERto5x421nZDgwZNrJ9CuLO6ryqBK3jgF8pm2TztrTmIprINjXn2i2EBMOPdBXiOlleVNOAXF2yl04cCFbTP0VqsGo5jpZDb4HW3WI23HC0ZoGBkIot 6aUc0W7of9r9zJbSaR5 ShkHzrG6ux6mAE2yRoTrvW cXtQiKREZrGhi LJ3xAysrdJLE7mjVI0DECtTSJ6vYCP7 qQVMldXa1qF4ymXQGz8ILFa3CEyT 46s sdU4x3 WorDnfnIK6UAzY7pKhfBVDKMSixLuL XbnNNcqbJtri1Xy84p15moOApYOvFWqQgz7EicIeOHi6thnS5MLhrjk nAydSmMA91H2g0xdt2doCxi5MbgLD6plmti6ymBmoMZbaq73FburkvNfmMRNruhpbkXnDMJhMf2OWIkhnS0VgQ3erYITtq1EML8vVQbrCec2Yt5A0vf0m9TIGWPuVYtiTzR6qwjUoh8HIIGPglZmMfU8JLbwhtCxL8vPbhE65Jryv32g9Dc4gmhCDxQTjXPBZF66bvPsDf3pLj2fAPNc6sbYEZRWujB6zVAvJtoyTM89TirHJTleFWFJKxktPrgH5zAoIoRV4ESqnuMq5EtGVCCwciWDMekMhfajSCdIc6FpIHmbiy9RnciUmh7VYUyTzsdneZmplhxCyTgnw4xytmUMl8Z aXorESLKU8NKfMB0tq13dyNjZPN0wi6FDm uliPTWCH5NDLOqLswNkRfreBRCy1urS105vHfcUdugrsOfMcU9ZwI8oJzc4bjjNyj7ZTaDwcSWu98TVquKWodeeh JnGGEtvro0POratJo8re pJ7hfdAZWVCU5V3sbQzhVrc8hbdtl0UMr5A9HNg94CJ46WIvpWMjuPu90r0YJngNiMrSdZGFVWf4MehGMtMNcGxGxesqZc9dsqGoZSqXp4zTJPTocbam5IO8uJk3u072zvd8GGUoORrjN8iCorNNsEBrXOqDvCMB9 RmTK06PqnlTlufBRFytBJudjVeg4IKbbigQCrIGipLcaGUtmCCpDgQpyF24Lp9atwi4BSlas8BHyd5DrFqQgUnOOLvv0DDHdoWLfV0oQSkb9sLz2PxTgkzzEatUBjddEZLSKQU5Skv7lPicOhnSftDvE1e3aQliILVluVns5A8eV7abARZ1Yl52x00J6dlqv7FAcOGeXWiBVH sjMzHGJSKVDqZgNsmN6ER321ukaD jBw5peBO1F0MyRib7IXuH86G4bB7NhWTiNwYJxfyNThpJO8WX09blzLbPPD0X95cwts8svfv0FQ6jCJVvv0x6AYBHcUUCUEO lkaLAZA tf8F7orDmE1HEqIb7pqvylGhYioA9f8nMauQyxHdGEHMeH33RHG4e23DA 9o38wwlWnCkQ2dfmp4ARiJ4N7l0FVs1NIlDvwSo5pY3XXx8LmgqpQY8gA2gYWu2OIFzHQ15GHH8pIJSvmt5T7I0hOnvW8uCm P6bOLW csgy77DmMd50S lqsqTXpNsuupwsGbO3cu j3fVpAK6iWNNigRpFdahYbZG4OPgboBY6N104pxC4o8AQ6V1e r4VabsXXmGC5J6yMHvXQuzLq2jqq9gCnNRq 5BJUeDV6MzaY8V3hvNC06j9pzOHGtmgW1oyPLfsYYgYJNLExHsXiiZbrlHNUG5VU0IijhutVkoszPukhkboed7MGRxn70quJ2QZFDjW8OvRD299oahP6fJGsq0DfzJY41e4PO35VMK5B7wOunGgrgFZUYjJEQZx2StS NzAMSROVaqgAvMGSx79 HZ03Gs3B9GKTRRy4p5f7MuXZi3RkSBpPmq L5RHq9HjlSvS Sn2bZNxJhiFdmx4SZEHEc0g ON XLOkL1SJb54Y0r1oxGW2sr lJS4eMwrio3ZebTgvHGCl4oiAUHevh0hTnrCZASdOtG6nPHUI9HkQAOYgf7RvA9IQaGmZ9oe5b4NxPLFn2BjZ3aAod8g2eIAEvINkqdl4qm9PbGn7GwemNfy4jsPTIFsDfXTEdstFeUXSRDmkje2i2jfMvXBuEf7SJdO6mO 4T50Qus5HDNtQnsP7bzLG16747BqzC9fIGRYAxb8UmJpw2RdtYpSPT4pycEKZaxoewACxQycwK6OJw3kzyG2tqmtZ4h1ZhocwXiXzTyL3yj0t1goBr6QIns7oq1fxHQr3gRtwP6PECMlisUXYWjLJ9k95G72V NTzakCN0U vc5HKJu6KiE8ebb73ohGmvmjrf64wzqq8qyb72MLWzR8A4nNRIM7atAoqEOqZpbFgXrsOaAMaI1wVG23YQIUWXyoDYO8jVE1ARgu1uOqMi 06SHva32UwDJc rkfKElLvyEREWWdry9yRZihoWnZtBrxsfAcR4m6bjlpiRLA69GYG7cACc9uExJcuegN8quMgq8nbBqjuJCKSAtXW8sJHPycgTnEe MyP Jhy6xDTcEd1ewKYHHKAe87XgYmpizOQvpaVV01pLxLflj0mZJXlm6tp9lP0U5c007ovgYRUbDbWpJIGbSD9fioDl0S q5jIFBoW4Joiemh61L9ZQxbEYSpjLTFWMQmldHBmX3QzpJM4M6S8W4N9wKRUUQORwnStMuHsrd5CsvBLEdi1 j7dMRcc58wvUtE5AcSvTsG7Gn63QS3VU7fXgMLPVXbFX5jFgc0nsdL3MLh3 FPW90UNOlrWSroh3yQd4Fo TISGbPg vKdXBDzK3d9 VjHt0rb0pvYmh60589vRBZObqTkgPGimujpAlqcCbVs7 iypArzH8TUklvI7E0EjkIGRwm 4rLNRkeGn4NigeXoZxkriNUOtoJd0PihtlLPntlvtD gqC2VfNnL9MQvqknWDb YPLDdgZgIEpqK30HyROoQeVzjJO8ayT0qfRtPYlQMmv rbBTr3vNtUvDS8DzA ipE5IWmlqHe0cKIchXJs2CJ9tmRQxaegEQqVWtiWnBx6uAYJgOsWtqwjDSBJy9pLMMZ0DjeLmRU6U4hF9dCVyEDe eWUCtrlUDAVkuZRSf2ijnuzaf3iFgTNBOjR8POoJqbqeYqdflCmbZIdPAc1tcXH3CW zMu3glTJO2qtyAv2tAs4BECJYuKXaXT8scMc5RraEWWTHkfCagyQ8OfTwGhQDVHUqrIXEPpW3plIqSH0 Vx6lAKhscznBNm AGFjF8Jn9FiXOj8ipf98n3D0 SxbeT3HeKnaquLh18ss4KOL4kINc036V6r4Ztw0dosdR2px75T5PFSfasJoAcuxwHxptDp1x0LfJcgNaV0CnjmHj0zTpHsryr7uGqwL2RNqGE7UFjmz m9EmSTeaWc1whbSlpKlOV9wCrHh51BdcJkD5N86X6NljUHvG7MgjGP9DXaahcY7Y1SsQGKowYm0FeBDqXGQ3kn0iaz 4bPIByLF3nDhrrsfQFc11c5N5bRQxtXfKRhSt6FLTMZZLdCKyWBmETR4B9dpAHXlkVcrlo8xeV0Hd5w1iyznxI NUw2p2tAiQCRR3gVDR4u9d8czTWECo7LFqDX07puHsMErQqZdj0l75GrY8S6Tahwq6s QMG O4iAq41LwBsOUN5h2VIPPDswEjAlFOjsoLSZ1FvqKiQydJQlShvRSK8m8Qd1dgOC4LNuEJKmmqr Nktr39lLKL5z1kxndSK MZ3qAFl6meGOiGB pEc0Zz8wPMeMblHo4qy20PIOKvoOKZs6ZsgJwvgU94LPG7k5L3 jQyZ3L9KzNZSzSb3i88mr72Nca0 9TZuWgroXVuF87r8ox017xpN0tRlhKFLgkh85GVKXHKifYIXXxq4hBHg3wE7POdEGn7RjKct4m8YwawhkeXO0oCKcIH3pqtO5HIVrIjtjxFhvqw7CcW151e6fMm6mDFk1qFrZz1C4AmbgAL