'--- start of vbslib include ------------------------------------------------------\r
-Dim g_debug, g_vbslib_path, g_IncludeType, g_CommandPrompt, g_fs, g_sh\r
+'// \82±\82±\82Í\81A\8fC\90³\82µ\82È\82¢\82Å\82\82¾\82³\82¢\81B\89º\8bL\83\81\83C\83\93\8aÖ\90\94\82©\82ç\83X\83N\83\8a\83v\83g\82ð\8bL\8fq\82µ\82Ä\82\82¾\82³\82¢\81B\r
+'// \82l\82r\83I\83t\83B\83X\82â\83R\83\93\83p\83C\83\89\82ª\82 \82ê\82Î\81A\89º\8bL\82Ì\82\87\81Q\82\84\82\85\82\82\82\95\82\87 \82ð\82P\82É\82·\82ê\82Î\81A\83f\83o\83b\83K\82ª\8eg\82¦\82Ü\82·\81B\r
+'// \82r\82\94\82\8f\82\90\96½\97ß\82ð\8bL\8fq\82·\82ê\82Î\81A\83f\83o\83b\83K\82Í\83u\83\8c\81[\83N\82µ\82Ü\82·\81B\8fÚ\82µ\82\82Í vbslib \82Ì\90à\96¾\8f\91\82Ì\8dÅ\8cã\82Ì\81u\8d¢\82Á\82½\82Æ\82«\82Í\81v\81B\r
+Dim g_debug, g_admin, g_vbslib_path, g_CommandPrompt, g_fs, g_sh, g_AppKey, g_Vers\r
If IsEmpty( g_fs ) Then\r
+ Dim g_MainPath, g_SrcPath : g_SrcPath = WScript.ScriptFullName : g_MainPath = g_SrcPath\r
+ Set g_Vers = CreateObject("Scripting.Dictionary") : g_Vers.Add "vbslib", 3.0\r
'--- start of parameters for vbslib include -------------------------------\r
OSDN Git Service
