Всем добрый день (ночь, утро).
Дали скриптик для изменения параметров связанных отчетов.
Public sub Min()
Dim ci(), c As ReportingService.CatalogItem
Dim l As String
rs.Url = "http://localhost/reportserver/reportservice.asmx"
rs.Credentials = System.Net.CredentialCache.DefaultCredentials
ci = rs.ListChildren("/", True)
For Each c In ci
If c.Type = ReportingService.ItemTypeEnum.LinkedReport Then
Dim p(5) As ReportingService.Property
p(0) = New ReportingService.Property
p(0).Name = "PageHeight"
p(1) = New ReportingService.Property
p(1).Name = "PageWidth"
p(2) = New ReportingService.Property
p(2).Name = "TopMargin"
p(3) = New ReportingService.Property
p(3).Name = "BottomMargin"
p(4) = New ReportingService.Property
p(4).Name = "LeftMargin"
p(5) = New ReportingService.Property
p(5).Name = "RightMargin"
l = rs1.GetReportLink(c.Path)
p = rs1.GetProperties(l, p)
rs.SetProperties(c.Path, p)
End If
Next
End Sub
Но при запуске скрипта
rs - LinkedReports.rss -s http://dmits185/reportserver/ выдает ошибку - "Main is not a member of '____ScriptClass'"
Кто имел дело с такими скриптами помогите плз.
P.S. Кто даже не подозревает что это такое просьба не флудить.
Ответить
|