Protected Sub btnClick(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click Dim rpt As New ReportDocument() rpt.Load(Server.MapPath("report.rpt")) Me.CrystalReportViewer1.ReportSource = rpt End Sub
<form id="form1" runat="server"> <div> <asp:Button ID="Button1" runat="server" Text="Button" /> <CR:CrystalReportViewer ID="CrystalReportViewer1" runat="server" AutoDataBind="true" /> </div> </form>
เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง