_src/_replica/vbslib/setting_default/tools_setting_default.vbs

   1 Option Explicit \r
   2 \r
   3 Function  Setting_getEditorPath()\r
   4   '// sakura editor : http://cgi.search.biglobe.ne.jp/cgi-bin/search7-n?q=sakura+editor\r
   5   ReDim  pathes(1)\r
   6   pathes(0) = g_sh.ExpandEnvironmentStrings( "%ProgramFiles%\sakura\sakura.exe" )\r
   7   pathes(1) = g_sh.ExpandEnvironmentStrings( "%WinDir%\notepad.exe" )\r
   8   Setting_getEditorPath = GetExistPathInSetting( pathes, "Setting_getEditorPath" )\r
   9 End Function\r
  10 \r
  11 Function  Setting_getDiffPath()\r
  12   '// Rekisa : http://cgi.search.biglobe.ne.jp/cgi-bin/search7-n?q=rekisa\r
  13   ReDim  pathes(1)\r
  14   pathes(0) = g_sh.SpecialFolders("MyDocuments") + "\prog\Rekisa\Rekisa.exe"\r
  15   pathes(1) = g_sh.ExpandEnvironmentStrings( "%ProgramFiles%\Rekisa\Rekisa.exe" )\r
  16   Setting_getDiffPath = GetExistPathInSetting( pathes, "Setting_getDiffPath" )\r
  17 End Function\r
  18 \r
  19  \r