我创建了一个包含报告的报告库。
我创建了一个WPF应用程序。 我在WPF App&添加了一个报告查看器。他在报告中指出了这一点。
如何将所有内容链接在一起? WPF应用程序中的数据需要在报告中。
我的解决方案: 我添加了一个“数据”DLL,并将对数据DLL的引用添加到报告和放大器中。 WPF应用程序。 当我运行程序时:
Sub HTML_scrape()
Dim IE As Object
Dim objElement As Object
Dim objCollection As Object
Dim objCollection2 As Object
Dim r As Integer
Dim v As Object
' Create InternetExplorer Object
Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = True
' Using the URL with "full" map
IE.navigate "http://taxsales.lgbs.com/map?lat=39.576604&lon=-96.72178200000002&zoom=4&offset=0&ordering=sale_date,address_full,uid&sale_type=SALE,RESALE,STRUCK%20OFF,FUTURE%20SALE&in_bbox=-137.2217809271164,15.247775193567845,-56.221783072883625,57.63696077532424"
' Wait while IE loading...
Do While (IE.Busy Or IE.READYSTATE <> 4)
Application.Wait DateAdd("s", 2, Now)
Loop
' Click the Agree Button
Set objCollection = IE.document.getElementsByClassName("btn btn-primary")
objCollection(0).Click
Do While (IE.Busy Or IE.READYSTATE <> 4)
Application.Wait DateAdd("s", 2, Now)
Loop
' Find all tags and collect the associated data
' This should only find the relevant property data, but I can not
' figure out how to only take the information within a
' <a class="ng-binding" ng-click="listing.addressClick()"> tag
Set objCollection2 = IE.document.getElementsByTagName("*")
r = 1
For Each v In objCollection2
Sheets("Sheet1").Range("A" & r).Value = v.outerHTML
r = r + 1
Next
With Sheets("Sheet1").Columns("A")
Dim DQ As String
DQ = Chr(34)
.Replace What:="@", Replacement:="'"
.Replace What:=DQ, Replacement:="'"
End With
End Sub
好的,这是有道理的,因为没有链接。
在WPF App实例化数据后,该实例如何链接到报告?
答案 0 :(得分:0)
关键思想:
在报告的代码背后,
protected override void OnNeedDataSource(object sender, System.EventArgs e)
在构造函数中
Report.DataSource = null;
//&#34;在运行时,仅当报表没有数据源集时才会引发Report.NeedDataSource事件&#34;
将数据从应用程序传递到报告作为参数 //这是一项正在进行的工作......