Я пытаюсь настроить мониторинг производительности на наших веб-серверах.
Я подумал, что имеет смысл иметь 2 отдельных набора данных, один со счетчиками для оборудования и ОС, а другой для веб-информации (производительность .net, количество подключений в минуту, ошибки и т. Д.).
Я настроил расписание так, чтобы оба запускались одновременно, но один всегда вылетает через 5 секунд. Возможно ли, чтобы одновременно работало более одного набора сборщиков данных?
Что ж, у меня была такая же проблема во многих журналах производительности на протяжении многих лет. Мой обходной путь, который отлично подходит для меня:
На мой взгляд, этот подход намного лучше, потому что:
На моих серверах и после обработки я обычно получаю около 6-8 разных файлов, csv и другие скрипты загружают их в графики DDBB для периодических запросов.
Надеюсь, поможет.
-------------- Дополнительная информация ----------------
Это часть сценария, не на английском языке, но я думаю, вы поймете суть, если немного разбираетесь в сценариях (и я уверен, что вы знаете)
У меня есть папка «скрипт», папка «метрика» и папка «счетчик», в основном, я запускаю relog с разными параметрами и счетчиками, но с одним и тем же «входом», поэтому я получаю столько файлов, сколько групп счетчиков, которые я хочу извлечь .
Если вы экспортируете их в двоичный (BLG), вы можете открыть их с помощью консоли производительности (также хорошо для отладки).
' *** Constantes ***
' Algunas incluyen el espacio para que sea mas comodo su concatenacion
Const LanzaScript = "cscript "
Const ScriptConversion = "CambiaFormatoFechaYCaracterDecimal.vbs "
Const ArchivoMetrica = "DataCollector01.blg"
Const Para_Relog = "relog.exe "
Const Para_FormatoBin = " -f BIN "
Const Para_ExtBin = ".blg"
Const Para_FormatoCsv = " -f CSV "
Const Para_ExtCSV = ".csv"
Const Para_Contadores = " -cf "
Const Para_Salida = " -o "
Const Directorio_Salida = "D:\Metricas\"
Const Para_Confirmacion = " -y "
' Comprobaciones previas
CompruebaUso
CompruebaArgumentos
' Variables
Dim fso
Dim DirectorioMetricas
Dim DirectorioContadores
Dim Archivo
Dim objShell
Dim Estado
Dim Cmdz
' Objetos de ambito global
Set fso = CreateObject("Scripting.FileSystemObject")
Set objShell = CreateObject("WScript.Shell")
Set DirectorioMetricas = fso.GetFolder (WScript.Arguments(0))
Set DirectorioContadores = fso.GetFolder (WScript.Arguments(1))
' Comprobamos o creamos el directorio de salida
If Not fso.FolderExists (Directorio_Salida & "\" & Right (WScript.Arguments(0),6)) Then
fso.CreateFolder (Directorio_Salida & "\" & Right (WScript.Arguments(0),6))
End If
' Algoritmo
If WScript.Arguments.Count = 3 Then
Set Archivo = fso.GetFile (WScript.Arguments(1) & "\" & WScript.Arguments(2))
ProcesaMetrica (Archivo)
Else
For Each Archivo In DirectorioContadores.Files
ProcesaMetrica (Archivo)
Next
End If
' Salida
' Funciones
Sub ProcesaMetrica (Archivo)
Dim Cmdz
Dim fso
' Extraemos contadores a formato binario
Cmdz = Transforma (Archivo, "BIN")
objShell.Run Cmdz,2,True
' Extraemos contadores a formato CSV
Cmdz = Transforma (Archivo, "CSV")
objShell.Run Cmdz,2,True
' Cambiamos orden de fecha y caracter decimal
Cmdz = CambiaFormato (Archivo.Name)
objShell.Run Cmdz,2,True
End Sub
Function Transforma (Contador, tipo)
' tipo puede ser "BIN" o "CSV"
Dim Cmdz
Select Case LCase(tipo)
Case "bin"
' Extraemos contadores a formato binario
Cmdz = Para_Relog & Chr(34) & DirectorioMetricas & "\" & ArchivoMetrica & Chr(34)
Cmdz = Cmdz & Para_Contadores & Chr(34) & Contador & Chr(34) & Para_FormatoBin & Para_Salida
Cmdz = Cmdz & Chr(34) & Directorio_Salida & Right(WScript.Arguments(0),6) & "\" & Archivo.Name & Para_ExtBin & Chr(34) & Para_Confirmacion
WScript.Echo "*** Para BLG :" & Cmdz
Case "csv"
' Extraemos contadores a formato CSV
Cmdz = Para_Relog & Chr(34) & DirectorioMetricas & "\" & ArchivoMetrica & Chr(34)
Cmdz = Cmdz & Para_Contadores & Chr(34) & Contador & Chr(34) & Para_FormatoCsv & Para_Salida
Cmdz = Cmdz & Chr(34) & Directorio_Salida & Right(WScript.Arguments(0),6) & "\" & Archivo.Name & Para_ExtCSV & Chr(34) & Para_Confirmacion
WScript.Echo "*** Para CSV :" & Cmdz
End Select
Transforma = Cmdz
End Function