csdl trên vb.net và sql server

Windows Form programming with VB.Net 2005. 1 Bu Bu ổ ổ i 8: N i 8: N Ộ Ộ I DUNG I DUNG  VB.Net và SQL Server  Tạo báo cáo (Crystal Report)  Đóng gói chương trình (Program Package) ¾ Trong bài này chúng ta sẽ tiếp cận CSDL trên SQL Server & VB.NET ¾ Cách Tạo những báo cáo bằng Crystal Report và hiển thị trên Form sau đócóthể Print a Report ra giấy hoặc xuất ra các file như: PDF, Word, Excel ¾ Cách tạo một trình Setup cho chương trình của mình để triển khai cài đặt tại máy khác Windows Form programming with VB.Net 2005. 2 VB.Net v VB.Net v à à SQL Server SQL Server   Vi Vi ệ ệ c l c l ậ ậ p tr p tr ì ì nh VB.Net v nh VB.Net v ớ ớ i SQL Server không i SQL Server không kh kh á á c g c g ì ì bao nhiêu so v bao nhiêu so v ớ ớ i Access ch i Access ch ỉ ỉ kh kh á á c khai c khai b b á á o v o v ề ề đ đ ố ố i tư i tư ợ ợ ng liên quan đ ng liên quan đ ế ế n CSDL như n CSDL như : : Connection, Command, DataAdapter, Connection, Command, DataAdapter, DataReader DataReader … … thông qua không gian tên thông qua không gian tên ( ( Namespace Namespace ) v ) v à à c c ú ú ph ph á á p khai b p khai b á á o. o.   Access v Access v à à c c á á c CSDL kh c CSDL kh á á c SQL Server c SQL Server Imports Imports System.Data.OLEDB System.Data.OLEDB   SQLServer SQLServer Imports Imports System.Data.SQLClient System.Data.SQLClient Windows Form programming with VB.Net 2005. 3 CSDL kh CSDL kh á á c c SQL Server SQL Server OleDB OleDB Connection Connection Sql Sql Connection Connection OleDB OleDB Command Command Sql Sql Command Command OleDB OleDB Paremeter Paremeter Sql Sql Paremeter Paremeter OleDB OleDB DataReader DataReader Sql Sql DataReader DataReader OleDB OleDB DataAdapter DataAdapter Sql Sql DataAdapter DataAdapter   C C á á c đ c đ ố ố i tư i tư ợ ợ ng trên ch ng trên ch ỉ ỉ kh kh á á c nhau v c nhau v ề ề ph ph ầ ầ n tên n tên so v so v ớ ớ i OLEDB do đ i OLEDB do đ ó ó ta ch ta ch ỉ ỉ c c ầ ầ n thay th n thay th ế ế tên đ tên đ ố ố i i tư tư ợ ợ ng c ng c ầ ầ n chuy n chuy ể ể n t n t ừ ừ OLEDB sang SQL Server OLEDB sang SQL Server theo b theo b ả ả ng so s ng so s á á nh trên v nh trên v à à chu chu ỗ ỗ i k i k ế ế t n t n ố ố i CSDL. i CSDL. So s So s á á nh c nh c á á c đ c đ ố ố i tư i tư ợ ợ ng CSDL trong ADO.NET ng CSDL trong ADO.NET Windows Form programming with VB.Net 2005. 4 C C á á ch 1: ch 1: "Data Source= "Data Source= ServerName ServerName ;Initial ;Initial Catalog= Catalog= DatabaseName DatabaseName ;Integrated ;Integrated Security=True" Security=True" Vd Vd : : gi gi ả ả s s ử ử bi bi ế ế n n strConnection strConnection đư đư ợ ợ c khai b c khai b á á o. o. strConnection = strConnection = "Data Source= "Data Source= (local) (local) ;Initial ;Initial Catalog= Catalog= QLHoaDon QLHoaDon ;Integrated Security=True ;Integrated Security=True “ “ C C á á ch n ch n à à y l y l à à ch ch ứ ứ ng th ng th ự ự c quy c quy ề ề n truy xu n truy xu ấ ấ t thông t thông qua qua User c User c ủ ủ a Windows a Windows ( ( thư thư ờ ờ ng l ng l à à m m á á y ch y ch ủ ủ ) ) đã đã đư đư ợ ợ c c c c ấ ấ p quy p quy ề ề n k n k ế ế t n t n ố ố i v i v ớ ớ i SQL Server đư i SQL Server đư ợ ợ c c c c à à i i t t ạ ạ i m i m á á y ch y ch ủ ủ đ đ ó ó . . Chu Chu ỗ ỗ i k i k ế ế t n t n ố ố i: Trong SQL Server i: Trong SQL Server Windows Form programming with VB.Net 2005. 5 C C á á ch 2: ch 2: "Data Source= "Data Source= ServerName ServerName ;Initial ;Initial Catalog= Catalog= DatabaseName DatabaseName ; ; Persist Security Persist Security Info=True Info=True ; ; User ID= User ID= Uname Uname ;Password= ;Password= Pass Pass " " Vd Vd : gi : gi ả ả s s ử ử bi bi ế ế n n strConnection strConnection đư đư ợ ợ c khai b c khai b á á o. o. strConnection = strConnection = "Data Source= "Data Source= (local) (local) ;Initial ;Initial Catalog= Catalog= QLHoaDon QLHoaDon ; ; Persist Security Persist Security Info=True Info=True ; ; User ID= User ID= Uname Uname ;Password= ;Password= Pass Pass “ “ ¾ ¾ C C á á ch n ch n à à y l y l à à ch ch ứ ứ ng th ng th ự ự c quy c quy ề ề n truy xu n truy xu ấ ấ t thông t thông qua qua User c User c ủ ủ a SQL Server a SQL Server t t ạ ạ i m i m á á y c y c à à i đ i đ ặ ặ t SQL t SQL Server Server Chu Chu ỗ ỗ i k i k ế ế t n t n ố ố i: Trong SQL Server i: Trong SQL Server Windows Form programming with VB.Net 2005. Demo Demo Windows Form programming with VB.Net 2005. 7 Crystal Report: Crystal Report: Các nội dung cần chuẩn bị cho việc tạo Report:  Software Crystal Report cần phải được cài đặt  Các yêu cầu cần báo cáo (Report) ¾Tùy theo nhu cầu của bài toán (Vd: báo cáo doanh thu bán hàng trong ngày, tháng) ¾Các yêu cầu báo cáo thường được chuẩn bị trước thông qua các Table trong CSDL hoặc các truy vấn (query) được tạo trước trong CSDL (đối với Access là các Query. đ/v SQL Server là các View hoặc StoredProcedure)  Tạo báo cáo bằng Software Crystal Report Windows Form programming with VB.Net 2005. 8 D D ù ù ng Sofware Crystal Report: ng Sofware Crystal Report: xem video hư xem video hư ớ ớ ng ng d d ẫ ẫ n n Windows Form programming with VB.Net 2005. 9 Crystal Report & VB.NET: Crystal Report & VB.NET: ¾Copy -> Paste file Report vào Project tạo báo cáo ¾Tạo tham chiếu (Reference): ¾Tại Menu Project -> Add Reference … sau đó chọn CrystalDecisions.Windows.Forms ¾Tạo 1 Form cần hiển thị Report frmReportCTHoaDon chúng ta sẽ viết Code cho Form này để tạo Report. ¾Một Form có thể cho hiển thị nhiều Report khác nhau tùy theo nhu cầu của bài toán Windows Form programming with VB.Net 2005. Demo T Demo T ạ ạ o Report b o Report b ằ ằ ng Video ng Video Windows Form programming with VB.Net 2005. 11 Windows Form programming with VB.Net 2005. 12 Crystal Report & VB.NET: Crystal Report & VB.NET: Imports CrystalDecisions.CrystalReports.Engine Imports CrystalDecisions.Windows.Forms Public Class frmReportCTHoaDon ' Tại Form Load gọi phương thức hiển thị Report Private Sub frmReportCTHoaDon_Load(sender, e) Handles MyBase.Load ' Gọi phương thức ShowReport ở phần dưới ShowReports() End Sub Windows Form programming with VB.Net 2005. 13 Private Sub Private Sub ShowReports() ShowReports() ' ' Phương th Phương th ứ ứ c ShowReport c ShowReport ' ' T T ạ ạ o đ o đ ố ố i tư i tư ợ ợ ng ng reportDocument1 reportDocument1 Dim Dim reportDocument1 reportDocument1 As As ReportDocument ReportDocument ‘ ‘ rptCTHoaDon rptCTHoaDon l l à à class ch class ch ứ ứ a file t a file t ạ ạ o B o B ằ ằ ng ng Crystal Report Crystal Report reportDocument1 = New reportDocument1 = New rptCTHoaDon rptCTHoaDon ' ' T T ạ ạ o đ o đ ố ố i tư i tư ợ ợ ng ng CrystalReportViewer1 CrystalReportViewer1 Dim Dim CrystalReportViewer1 CrystalReportViewer1 As New As New CrystalReportViewer CrystalReportViewer CrystalReportViewer1 CrystalReportViewer1 .Dock = .Dock = DockStyle.Fill DockStyle.Fill ' ' Add đ Add đ ố ố i tư i tư ợ ợ ng ng CrystalReportViewer1 CrystalReportViewer1 tư tư ợ ợ ng v ng v à à o Form o Form Me. Me. Controls.Add Controls.Add ( ( CrystalReportViewer1 CrystalReportViewer1 ) ) ' ' Set ngu Set ngu ồ ồ n d n d ữ ữ li li ệ ệ u cho u cho CrystalReportViewer1 CrystalReportViewer1 đ đ ể ể hi hi ể ể n th n th ị ị CrystalReportViewer1 CrystalReportViewer1 .ReportSource = .ReportSource = reportDocument1 reportDocument1 End Sub End Sub End Class End Class ' ' K K ế ế t th t th ú ú c class c class frmReportCTHoaDon frmReportCTHoaDon Windows Form programming with VB.Net 2005. 14 Program Package Program Package ( ( Đ Đ ó ó ng g ng g ó ó i chương tr i chương tr ì ì nh) nh)   M M ụ ụ c đ c đ í í ch: ch: ¾ ¾ T T ạ ạ o chương tr o chương tr ì ì nh Setup nh nh Setup nh ằ ằ m thu m thu ậ ậ n l n l ợ ợ i i cho vi cho vi ệ ệ c tri c tri ể ể n khai c n khai c à à i đ i đ ặ ặ t cho c t cho c á á c m c m á á y y t t í í nh c nh c ầ ầ n ch n ch ạ ạ y y ứ ứ ng d ng d ụ ụ ng. ng. ¾ ¾ C C ó ó nhi nhi ề ề u c u c á á ch th ch th ự ự c hi c hi ệ ệ n (d n (d ù ù ng c ng c á á c c chương tr chương tr ì ì nh c nh c ủ ủ a hãng th a hãng th ứ ứ 3 3 như như : : InstallShell, Install2Go InstallShell, Install2Go … … ) ) ở ở đây ch đây ch ú ú ng ta ng ta d d ù ù ng công c ng công c ụ ụ c c ó ó s s ẵ ẵ n trong b n trong b ộ ộ Visual Visual Studio 2005 c Studio 2005 c ủ ủ a Microsoft. a Microsoft. Windows Form programming with VB.Net 2005. 15 Bư Bư ớ ớ c 1: T c 1: T ạ ạ o Setup Project o Setup Project ¾ ¾ File File - - > New > New - - > Project > Project trong c trong c ử ử a s a s ổ ổ New New Project Project ch ch ọ ọ n n Other Project Types Other Project Types - - > Setup > Setup and Deloyment and Deloyment bên khung bên khung Template Template ch ch ọ ọ n n Setup Project Setup Project ¾ ¾ T T ạ ạ i textbox i textbox Name Name (bên (bên dư dư ớ ớ i) i) gõ tên chương gõ tên chương tr tr ì ì nh c nh c ầ ầ n t n t ạ ạ o Setup o Setup Vd: QuanLyHoaDon Vd: QuanLyHoaDon ¾ ¾ T T ạ ạ i i combobox combobox Location Location ch ch ọ ọ n n ổ ổ đ đ ĩ ĩ a v a v à à thư thư m m ụ ụ c lưu chương tr c lưu chương tr ì ì nh Setup nh Setup ¾ ¾ Click OK bư Click OK bư ớ ớ c 2 c 2 Windows Form programming with VB.Net 2005. 16 Windows Form programming with VB.Net 2005. 17 Bư Bư ớ ớ c 2: T c 2: T ạ ạ o Setup Project o Setup Project   T T ạ ạ i khung File System c i khung File System c ó ó 3 m 3 m ụ ụ c c ¾ ¾ Application Folder: Application Folder: Folder Lưu c Folder Lưu c á á c file chương c file chương tr tr ì ì nh sau khi đư nh sau khi đư ợ ợ c c c c à à i đ i đ ặ ặ t v t v à à ch ch ú ú ng n ng n ằ ằ m trong tư m trong tư m m ụ ụ c c Program Files Program Files c c ủ ủ a a ổ ổ đ đ ĩ ĩ a c a c à à i đ i đ ặ ặ t Windows. t Windows. ¾ ¾ User User ’ ’ s Desktop: s Desktop: Ch Ch ứ ứ a Folder v a Folder v à à c c á á c file khi c c file khi c ó ó nhu c nhu c ầ ầ u lưu tr u lưu tr ữ ữ t t ạ ạ i thư m i thư m ụ ụ c Desktop c c Desktop c ủ ủ a User a User thu thu ộ ộ c Windows khi c c Windows khi c à à i đ i đ ặ ặ t chương tr t chương tr ì ì nh. nh. Thư Thư ờ ờ ng ng ở ở đây ch đây ch ỉ ỉ t t ạ ạ o Shortcut ch o Shortcut ch ỉ ỉ t t ớ ớ i file i file chươ ng tr chương tr ì ì nh trong thư m nh trong thư m ụ ụ c c c c à à i đ i đ ặ ặ t t ở ở trên trên ¾ ¾ User User ’ ’ s Programs Menu: s Programs Menu: ch ch ứ ứ a c a c á á c Folder c Folder shortcut v shortcut v à à c c á á c shortcut đư c shortcut đư ợ ợ c c á á nh x nh x ạ ạ trong trong Programs thu Programs thu ộ ộ c Start c Start - - > Programs. > Programs. Windows Form programming with VB.Net 2005. 18 Bư Bư ớ ớ c 2.1. c 2.1. Application Folder Application Folder ¾ ¾ Click chu Click chu ộ ộ t ph t ph ả ả i Add i Add - - > F > F older đ older đ ể ể t t ạ ạ o Folder lưu o Folder lưu c c á á c file c c file c à à i đ i đ ặ ặ t chương tr t chương tr ì ì nh (Vd: QuanLyHoaDon) nh (Vd: QuanLyHoaDon) ¾ ¾ Click chu Click chu ộ ộ t ph t ph ả ả i t i t ạ ạ i i Folder v Folder v ừ ừ a a - - > Add > Add - - > > File File … … c c ầ ầ n thi n thi ế ế t c t c ủ ủ a a chương tr chương tr ì ì nh c nh c ầ ầ n t n t ạ ạ o o Setup (c Setup (c á á c file *.exe, c file *.exe, *.mdb *.mdb … … trong trong Bin Bin \ \ Debug) ho Debug) ho ặ ặ c c c c á á c c file Report, *.dll t file Report, *.dll t ù ù y y theo nhu c theo nhu c ầ ầ u c u c ủ ủ a a chương tr chương tr ì ì nh nh … … Windows Form programming with VB.Net 2005. 19 Bư Bư ớ ớ c 2.2. c 2.2. User User ’ ’ s Programs Menu s Programs Menu a. a. Click chu Click chu ộ ộ t ph t ph ả ả i i Add Add - - > Folder > Folder đ đ ể ể t t ạ ạ o Shotcut o Shotcut Folder trong Menu Programs thu Folder trong Menu Programs thu ộ ộ c Start c Start - - > > Programs c Programs c ủ ủ a Windows (công vi a Windows (công vi ệ ệ c n c n à à y l y l à à t t ù ù y ý). y ý). b. Click chu b. Click chu ộ ộ t ph t ph ả ả i ( i ( ListView bên ph ListView bên ph ả ả i) i) Add Add - - > File > File t t ạ ạ o Shotcut file chương tr o Shotcut file chương tr ì ì nh trên Menu Programs nh trên Menu Programs (C (C ó ó th th ể ể t t ạ ạ o trong Folder trên ho o trong Folder trên ho ặ ặ c tr c tr ự ự c ti c ti ế ế p trên p trên Menu Programs t Menu Programs t ù ù y thu y thu ộ ộ c v c v à à p ta Click ph p ta Click ph ả ả i chu i chu ộ ộ t) t) c. c. Ch Ch ỉ ỉ t t ớ ớ i File chương tr i File chương tr ì ì nh (*.exe) trong nh (*.exe) trong Application Folder Application Folder ở ở bư bư ớ ớ c 2.1 c 2.1 (vd: (vd: QuanLyHoaDon.exe). QuanLyHoaDon.exe). Ti Ti ế ế p theo C p theo C ó ó th th ể ể ch ch ỉ ỉ ra Icon ra Icon cho Shotcut n cho Shotcut n à à y t y t ù ù y ý y ý Windows Form programming with VB.Net 2005. 20 Bư Bư ớ ớ c 2.3. c 2.3. User User ’ ’ s Desktop s Desktop ¾ ¾ L L ậ ậ p l p l ạ ạ i m i m ụ ụ c b v c b v à à c c c c ủ ủ a bư a bư ớ ớ c 2.2 c 2.2 (c (c á á c shortcut c shortcut c c ó ó th th ể ể rename t rename t ù ù y ý khi click ph y ý khi click ph ả ả i chu i chu ộ ộ t) t) ¾ ¾ Chu Chu ộ ộ t ph t ph ả ả i t i t ạ ạ i i Shortcut Shortcut c c ủ ủ a a User User ’ ’ s Programs s Programs Menu Menu - - > Cut > Cut ¾ ¾ Click chu Click chu ộ ộ t ph t ph ả ả i i User User ’ ’ s Desktop s Desktop - - > Paste > Paste ¾ ¾ Click chu Click chu ộ ộ t ph t ph ả ả i i User User ’ ’ s Desktop s Desktop - - > Properties > Properties Windows Windows - - > AlwaysCreate = True > AlwaysCreate = True ¾ ¾ Save All Save All - - > Build Menu > Build Menu - - > Build Solution ( > Build Solution ( ho ho ặ ặ c c ReBuild Solution: ReBuild Solution: biên d biên d ị ị ch l ch l ạ ạ i i ). ). Ghi ch Ghi ch ú ú : Sau khi : Sau khi Build Solution Build Solution c c á á c file c c file c ầ ầ n c n c à à i đ i đ ặ ặ t t n n ằ ằ m trong thư m m trong thư m ụ ụ c Debug c c Debug c ủ ủ a Setup Project a Setup Project vd: vd: D: D: \ \ QLyHoaDon QLyHoaDon \ \ QLyHoaDon QLyHoaDon \ \ Debug Debug [...]...Setup trên máy chưa có Framework 2.0 Sau khi hoàn tất 3 bước trên Chuột phải vào tên Project (hoặc trên Menu Project) -> Properties Click PrerequiSites… Check chọn các mục sau: NET Framework 2.0 Windows Installer 3.1 Crystal Reports for NET Framework 2.0... của Microsoft Setup Framework từ chương trình cài đặt Setup Framework từ Website mạng LAN Windows Form programming with VB.Net 2005 Save All -> Build Menu -> Build Solution ReBuild Windows Form programming with VB.Net 2005 Solution 21 22 Demo bằng Video Windows Form programming with VB.Net 2005 . Form programming with VB. Net 2005. 2 VB. Net v VB. Net v à à SQL Server SQL Server   Vi Vi ệ ệ c l c l ậ ậ p tr p tr ì ì nh VB. Net v nh VB. Net v ớ ớ i SQL Server không i SQL Server không kh kh á á c. v à à c c á á c CSDL kh c CSDL kh á á c SQL Server c SQL Server Imports Imports System.Data.OLEDB System.Data.OLEDB   SQLServer SQLServer Imports Imports System.Data.SQLClient System.Data.SQLClient Windows. programming with VB. Net 2005. 3 CSDL kh CSDL kh á á c c SQL Server SQL Server OleDB OleDB Connection Connection Sql Sql Connection Connection OleDB OleDB Command Command Sql Sql Command Command OleDB OleDB Paremeter