🚀 go-pugleaf

Goh Honma wrote:

> VB5.0 + WindowsNT4.0 WS SP2 $B$G%U%!%$%k>pJs$r%j%9%H%S%e!<%3%s%H%m!<%k$K(B
> $BI=<($9$k%"%W%j%1!<%7%g%s$r:n@.$7$F$$$^$9!#(B
> $B$=$3$G%U%!%$%k$NB0@-$rD4$Y$?$/$F(B getAttr$B4X?t$r;H$C$?$H$3$m(B
> getAttr("C:\pagefile.sys")
> $B$H%U%!%$%k$NB0@-$rD4$Y$h$&$H$9$k$H%(%i!<$K$J$j$^$9!#(B
> $B$J$*B>$N%U%!%$%k$NB0@-$O<hF@$G$-$F$$$^$9!#(B
> pagefile.sys$B$NB0@-$r<hF@$9$kJ}K!$O$J$$$N$G$7$g$&$+!)(B

$B;d$b!"$^$5$KF1$8LdBj$G$O$^$C$F$7$^$$!"(Bfj.os.ms-windows.programming
$B$G<ALd$7$?$H$3$m(B FindFirstFile() $B$H$$$&(BWin32API$B$N;HMQ$r(B
$B%"%I%P%$%9$5$l!"$3$l$r;HMQ$9$k$h$&$KJQ99$7$?$H$3$m!"(Bpagefile.sys
$B$r4^$`A4$F$N%U%!%$%k$NB0@-$r<hF@$G$-$^$7$?!#(B

$B$A$J$_$K!";d$N:G=i$N%W%m%0%i%`$O(BVB$B$N(BDir()$B$H(BGetAttr()$B$r(B
$BAH$_9g$o$;$F;H$&$H$$$&%5%s%W%k!&%W%m%0%i%`$HF1$8$h$&$J(B
$B:n$j$K$J$C$F$$$?$N$G$9$,!"$3$l$r(B FindFirstFile() $B$H(B
FindNextFile() $B$H$$$&(BWin32API$B$r;HMQ$9$k$h$&$KJQ99$7$?(B
$B$H$3$m!">e5-$N%(%i!<$N2sHr$K2C$($F!"=hM}B.EY$b?oJ,(B($BG\DxEY(B)
$BAa$/$J$j$^$7$?!#(B

----
$B9bEg(B (takasima@mars.dtinet.or.jp)