Вопрос : Запланированные задачи выполнить ежедневный экспорт журналов телезрителя случая сервера W2K3 .......

Мне нужно сделать ежедневный экспорт всех архивов телезрителя случая на наших серверах…, котор следующий будет сценарием я нашел искать google….  мыслью
My первоначально была сделать его через задачи запланированные окнами, но любая дорога work.

Can любое передаст мне их мысли на сценарии или другой дороге автоматически ехпортировать журналы телезрителя случая??? class=

' имя этого сценария: rel= " nofollow " " _blank " " target= " http://www.ftponline.com/wss/2004_12/magazine/features/kgardinier/page2.aspx href= '- > rel= " nofollow " " _blank " " target= " http://www.go-itservices.com/Windows_Server_2003_Maintenance_Strategy.pdf href= ss/2004_12/magazine/features/kgardinier/page2.aspx
'- http://www.ftponline.com/w > rel= " nofollow " " _blank " " target= " http://safari.samspublishing.com/0672326671/index?indexview=L href= om/Windows_Server_2003_Maintenance_Startegy.pdf
'- http://www.go-itservices.c > 2326671/index ng.com/067 http://safari.samspublishi? indexview=L (поиск:


strArchiveFolder = «C:\BckEvt "
ServerName = «SrvDC001 "

Set WS =
Set CreateObject («Wscript.Shell»)

leSystemObject»)/>DateString =

Purge = ложно «<---  Я изменил его к f для испытание, ему be*: Next

on/>StartTime = Now
Output»---------------------------------«
OutPut «начатое на: » & система
Set ""
Output CStr (теперь) = GetObject («winmgmts: {(Backup, Security)}\ \» & ServerName & " _
\ корень \ CIMV2 ")
If Err.Number = 0 colLogs Then
установленные =

System.ExecQuery («выберите * от Win32_NTEventLogFile», 48) для каждого refLog в colLogs
LogName = ServerName&» _ «& LogFileName (refLog.LogFileName) & _
» _ «& DateString

если
, то _
FSO.DeleteFile FSO.FileExists (strArchiveFolder &» \ «& LogName &» .evt ") после этого (strArchiveFolder & «\» & LogName & «.evt») если продувка Then
RetVal = reflog.ClearEventlog, то (strArchiveFolder &» \ « & LogName &
Else
RetVal» .evt ") = конец If

reflog.BackupEventlog (strArchiveFolder & «\» & LogName & «.evt») если RetVal = 0 vbTab & «журналов выхода Then
было помещено в архив в форме .evt:, то » &
LogName & «.evt " если продувка после этого вывела наружу vbTab & «все случаи, то было освобожено от журнала "
Else
вывело наружу vbTab & «ошибка пока помещающ в архив в форме .evt. «конец If
Next
Else

вывел наружу vbTab & «потерпел неудачу соединитесь к серверу " colLogs
End If
Set = refLogs Nothing
Set = системе Nothing
Set = Nothing

Output»----------------------------------------«
OutPut «законченное на: » &
Set ""
Output ""
Output CStr (теперь) WS = Nothing
» FullLog.Close???
Set FullLog = Nothing
Set FullLog=unknown FSO = Nothing

Function CurrentDate
сегодня = Date
если месяц (сегодня) < 10 Then
CurrentDate = «0» & CStr, то (месяц (сегодня))
Else
CurrentDate = CStr (месяц (сегодня))Конец If

если день (сегодня) < 10 Then
CurrentDate = CurrentDate & «0» & CStr, то (день (сегодня))
Else
CurrentDate = CurrentDate & CStr (день (сегодня))Конец If
CurrentDate = CurrentDate & CStr
(год (сегодня))
если час (время) < 10 Then
CurrentDate = CurrentDate & «0» & CStr, то (час (время))
Else
CurrentDate = CurrentDate & CStr (час (время))
If
End Function

Function LogFileName конца
(LogName) выбирает
LogFileName «применения " случая LogName
случая =
LogFileName обслуживания директории " случая
««app " = случай «
LogFileName
«dir " сервера DNS " =
LogFileName обслуживания репликации архива " случая
««dns " =
LogFileName «обеспеченностью " случая
«rep " =
LogFileName «системы " случая
«sec " = текст text
' FullLog.writeline
' wscript.echo выхода Select
End Function

Sub конца
«sys " (текста)??? FullLog=unknown
End Sub

class=

Ответ : Запланированные задачи выполнить ежедневный экспорт журналов телезрителя случая сервера W2K3 .......

Создайте, котор хранят процедуру для того чтобы побежать отчет о SSRS.

В процедуре
1. создайте a [временно таблицу] для того чтобы держать результаты ваши возвращения вопроса выше. Создайте автоматически принимаемые значения вычеркните внутри общие колонки.
2. Введите ваши данные в [временно таблица] с отборным вопросом, котор вы возвращаете данные с теперь. Измените ваше соедините к полная наружной соедините связывая к таблице даты.
3. Ваша таблица создаст zero значения на каждая дата а без численных данных.

Выберите результаты от временно таблицы для того чтобы возвратить к отчету о SSRS.