Знакомая проблема.
… ибо использоваться будет в больнице, соответственно персонал не особо ладит с компютерами.
Решения типа orts или багтрекера не подойдут 90% таких пользователей (пользователи просто не осилят такую систему). В свое время, я решил данную проблему простым vbs скриптом:
Set wshshell = CreateObject("WScript.Shell")
computer = WshShell.ExpandEnvironmentStrings("%computername%")
Input = InputBox ("Опишите проблему и нажмите ОК." & Chr(10) & "Если хотите отказаться, жмите Отмена " & Chr(10) & Chr(10) & "Телефон системного администратора "& Chr(10) & ".... или ....", "Создать заявку", "Сюда введите краткую причину вызова")
If Input = "" then WScript.Quit 0
check = MsgBox ("Вы точно хотите отправить эту информацию?", 4+48 ,"Внимание!")
If check = 7 Then WScript.Quit 0
Dim fso1
Set fso1 = WScript.CreateObject("Scripting.FileSystemObject")
Dim objADSystemInfo
Dim objUser
Set objADSystemInfo = CreateObject("ADSystemInfo")
Set objUser = GetObject("LDAP://" & objADSystemInfo.UserName)
If Fso1.FileExists ("\\server\Zayavki.txt") Then
Set txtStreamOut = fso1.OpenTextFile("\\server\Zayavki.txt",8,True)
With objUser
txtStreamOut.WriteLine computer & " - " & .displayName & " - " & Input & " - " & Now
End With
Else
Set MyFile = fso1.CreateTextFile("\\server\Zayavki.txt")
With objUser
MyFile.WriteLine computer & " - " & .displayName & " - " & Input & " - " & Now
End With
End If
WshShell.run "net send " & "XXXXXX" & " Заявка!"
MsgBox "Ваша заявка отпрвлена!", 0+65536 ,"Congratulations!"
Set oShell = Nothing
Set wshshell = Nothing
Set objADSystemInfo = Nothing
Set objUser = Nothing
Необходимо такой скрипт раскидать пользователям по рабочим столам, с красивой иконкой и названием. При открытии скрипта открывается MsgBox с предложением ввести описание проблемы, после подтверждения текст записывается в файл с именем пользователя, компьютера и временем заявки, отправляется NetSend админу, и выдается окошко об успехе. Админ смотрит файл и связывается с пользователем. Работает только в домене, необходимо установить в AD на автозапуск службу сообщений Messenger (для отправки net send), //server/Zayavki.txt необходимо заменить на свой путь к файл серверу (общей папке), XXXXXX на имя компьютера админа. Скрипт не отработает конечно, если будут неполадки с сетью.
Надеюсь, помог Вам:)
