- ｅｘｃｅｌマクロにバージョンチェックを入れてみた＾＾
newver =
strfname = thisworkbook.path 。。ver.txt
if urldownloadtofile(0, strurl, strfname, 0, 0) = 0 then '読み込み成功したら
intff = freefile
open strfname for input as #intff
line input #intff, newver
close #intff
else
end if on error resume next
kill strfname
on error goto 0
if curver = newver then
vercheck = true
else
vercheck = false
end if
end function
- 2009 ＵＳＬＰＧＡ Final Qualifying Tournament 初日の結果
2009 ｕｓｌｐｇａfinal qualifying tournamentの初日が終了しました
|
