Windows 2008 R2：Perfmon，多個數據收集集，有可能

我正在嘗試在我們的網路伺服器上設置一些性能監控。

我認為擁有 2 個單獨的數據收集集是有意義的，一個帶有用於硬體和作業系統的計數器，另一個用於 Web 資訊（.net 性能、每分鐘連接數、錯誤等）。

我設置了時間表，以便兩者同時執行，但一個總是在 5 秒後退出。是否可以同時執行多個數據收集器集？

好吧，這些年來我在許多性能日誌中都遇到了同樣的問題。對我有用的解決方法是：

• 僅在一項作業中配置所有計數器
• 確保目標文件夾不受系統保護
• 使用 relog -q 一次“提取”所有計數器
• 使用一些腳本（我使用 vbscrip）使用您真正需要的計數器將大文件“拆分”為較小的文件。

我認為這種方法要好得多，因為：

1. 您可以在聚會後檢查“更多”計數器並過濾它們，但您始終可以選擇獲取“其他”計數器。
2. relog 可以導出為 csv 或 txt，並將其解析為圖形

在我的伺服器中，在處理之後，我通常會得到大約 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

引用自：https://serverfault.com/questions/490023