lookjapan.COM - IRC ve mIRC dünyasının forumu!

lookjapan.COM - IRC ve mIRC dünyasının forumu! (http://www.lookjapan.com/index.php)
-   mIRC Parça Kodlar (http://www.lookjapan.com/forumdisplay.php?f=53)
-   -   Netstat & tasklist (http://www.lookjapan.com/showthread.php?t=2401)

Return 03 Ekim 2015 10:40

Netstat & tasklist
 
Tasklist ve Netstat verilerini yansitir, cmd komutlarini kullanarak dahada cogaltabilirsiinz; elinizde. [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] "system info" da cmd ekrani kapandikdan sonra "/88" komutunu uygulayin.


Kod:

alias xx { $iif(!$window($1),window -ze $1,clear $1) | var %s 1, %f $lines(ss.txt) | while %s <= %f { inc -u %s | if ($$read(ss.txt,%s)) echo -t $1 - $gettok($replace($$read(ss.txt,%s),Ba§lantlar,Bağlantilar,Ëœl.Kr.,Metot),1,32) $chr(9) $gettok($replace($$read(ss.txt,%s),Ba§lantlar,Bağlantilar),2,32) $chr(9) $gettok($replace($$read(ss.txt,%s),Ba§lantlar,Bağlantilar),3,32) $chr(9) $chr(9) $gettok($replace($$read(ss.txt,%s),Ba§lantlar,Bağlantilar),4,32) | inc %s }  }
alias xxx var %s 1, %. $lines(ss.txt) | $iif(!$window(@tasklist),window -ze @tasklist,clear @tasklist) | echo @tasklist Program Adi $chr(9) $chr(9) Bellek $chr(9) Acıklama | while %s <= %. { aline @tasklist  $remove($iif($len($regsubex($remove($read(ss.txt,%s),=,Gâ€rnt Ad pid Hizmetler),(.+)\s\d+,\1)) > 26,$left($regsubex($remove($read(ss.txt,%s),=,Gâ€rnt Ad pid Hizmetler),(.+)\s\d+,\1),23) $+ ..,$regsubex($remove($read(ss.txt,%s),=,Gâ€rnt Ad pid Hizmetler),(.+)\s\d+,\1)),Yok) $chr(9) $chr(9) $regsubex($remove($read(ss.txt,%s),=,Gâ€rnt Ad pid Hizmetler),.+\s(\d+)\s.+,\1) $chr(9) $regsubex($remove($read(ss.txt,%s),=,Gâ€rnt Ad pid Hizmetler),.+\s\d+\s(.+),4\1)  | inc %s }
alias netstat { if ($file(b.bat)) .remove b.bat | if ($file(ss.txt)) .remove ss.txt  | .write b.bat netstat -n> $shortfn($mircdir) $+ ss.txt | .run b.bat  | .timerss 1 10 xx @Netstat }
alias tasklist { if ($file(b.bat)) .remove b.bat | if ($file(ss.txt)) .remove ss.txt  | .write b.bat  tasklist /svc > $shortfn($mircdir) $+ ss.txt  | .run b.bat  | .timerss 1 3 xxx }
alias systeminfo {  if ($file(b.bat)) .remove b.bat | if ($file(ss.txt)) .remove ss.txt  | .write b.bat systeminfo.exe> $shortfn($mircdir) $+ ss.txt  | .run b.bat }
alias 88 { var %s 1, %f $lines(ss.txt) | while %s <= %f { echo -a - $replace($read(ss.txt,%s),˜,İ,Ÿ,ş,§,ğ,‡,ç,š,Ü,$chr(129),ü,$chr(141),ı,™,Ö) | inc %s } }

Alıntıdır.


All times are GMT +3. The time now is 06:50.

Powered by vBulletin®
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.