Переименованы конфигурационные файлы и обновлен change.bat

conf_DE_eth/s_start.vbs

@@ -0,0 +1,19 @@
+' Áëîê ïîâûøåíèÿ ïðàâ (îñòàâüòå åãî â íà÷àëå)
+If Not WScript.Arguments.Named.Exists("elevate") Then
+  CreateObject("Shell.Application").ShellExecute "wscript.exe", _
+  """" & WScript.ScriptFullName & """ /elevate", "", "runas", 1
+  WScript.Quit
+End If
+
+' ÈÑÏÐÀÂËÅÍÈÅ: Ïîëó÷àåì ïóòü ê ïàïêå, ãäå ëåæèò âàø VBS-ôàéë
+Set fso = CreateObject("Scripting.FileSystemObject")
+strPath = fso.GetParentFolderName(WScript.ScriptFullName)
+
+Set WshShell = CreateObject("WScript.Shell")
+
+' Çàïóñêàåì bat-ôàéë, óêàçûâàÿ åãî ÏÎËÍÛÉ ïóòü
+' 0 — ñêðûòü îêíî, True — æäàòü çàâåðøåíèÿ (ïî æåëàíèþ)
+WshShell.Run chr(34) & strPath & "\start.bat" & Chr(34), 0, True
+
+Set WshShell = Nothing
+Set fso = Nothing