Различия

Показаны различия между двумя версиями страницы.

--- dwrcc [2026/04/09 09:45] – bonterkoz
+++ dwrcc [2026/04/09 09:59] (текущий) – bonterkoz
@@ Строка 28: / Строка 28: @@
 ) -NoNewWindow
 </code>
+====== Скрипт с выбором опций ======
+<code>
+# script.ps1
+# Скрипт лежит в: DameWare\Dameware Remote Support\
+# DWRCC.exe лежит там же
+$exePath = Join-Path $PSScriptRoot 'Dameware Remote Support\DWRCC.exe'
+if (-not (Test-Path $exePath)) {
+    Write-Error "Файл не найден: $exePath"
+    exit 1
+}
+function Read-MachineName {
+    while ($true) {
+        Write-Host ""
+        Write-Host "Выберите формат имени машины:" -ForegroundColor Cyan
+        Write-Host "  1) VK0000####   (пример: VK00006547)" -ForegroundColor Gray
+        Write-Host "  2) VIP###       (пример: VIP001)" -ForegroundColor Gray
+        Write-Host "  3) Полное имя   (пример: CENTAUR)" -ForegroundColor Gray
+        Write-Host "  0) Выход" -ForegroundColor DarkGray
+        $choice = Read-Host "Ваш выбор (0-3)"
+        switch ($choice) {
+            '1' {
+                do {
+                    $suffix = (Read-Host "Введите последние 4 цифры для VK0000####").Trim()
+                    $ok = $suffix -match '^\d{4}$'
+                    if (-not $ok) {
+                        Write-Host "Ошибка: нужно ввести ровно 4 цифры." -ForegroundColor Yellow
+                    }
+                } while (-not $ok)
+                return "VK0000$suffix"
+            }
+            '2' {
+                do {
+                    $suffix = (Read-Host "Введите 3 цифры для VIP###").Trim()
+                    $ok = $suffix -match '^\d{3}$'
+                    if (-not $ok) {
+                        Write-Host "Ошибка: нужно ввести ровно 3 цифры." -ForegroundColor Yellow
+                    }
+                } while (-not $ok)
+                return "VIP$suffix"
+            }
+            '3' {
+                do {
+                    $name = (Read-Host "Введите полное имя машины (например, CENTAUR)").Trim().ToUpper()
+                    # Разрешаем буквы/цифры/дефис, длина до 15 (NetBIOS)
+                    $ok = $name -match '^[A-Z0-9-]{1,15}$'
+                    if (-not $ok) {
+                        Write-Host "Ошибка: допустимы A-Z, 0-9, '-', длина 1..15." -ForegroundColor Yellow
+                    }
+                } while (-not $ok)
+                return $name
+            }
+            '0' {
+                Write-Host "Выход." -ForegroundColor DarkGray
+                exit 0
+            }
+            default {
+                Write-Host "Неверный выбор. Введите 0, 1, 2 или 3." -ForegroundColor Yellow
+            }
+        }
+    }
+}
+$machineName = Read-MachineName
+Write-Host "Подключение к: $machineName" -ForegroundColor Green
+Start-Process -FilePath $exePath -ArgumentList @(
+    '-c:',
+    '-h:',
+    "-m:$machineName",
+    '-u:Admin',
+    '-p:RChS-2014',
+    '-a:2',
+    '-v:'
+) -NoNewWindow
+</code>
 <code>