例如:A、B、C、D、E五個人,在各自登入Reporting看"銷售明細表"的時候,A只能看的到A自己的客戶,B、C、D登入時也只能看到自己的客戶資料,但E登入卻可以看到所有的資料.
實作上大致如下:
'1. 在BLL 那層製作一傳入sales變數的method,如下:
Public Class RptBLL
Private _Adapter As RptTableAdapter = Nothing
Protected ReadOnly Property Adapter() As RptTableAdapter
Get
If _Adapter Is Nothing Then
_Adapter = New RptTableAdapter()
End If
Return _Adapter
End Get
End Property
_
Public Function GetDataBySalesMan(ByVal salesMan As String) As myDS.rptDataTable
Return Adapter.GetData(salesMan)
End Function
End Class
'2. 在dataset, 建一名為"rpt"的data table, 並加入一個fill屬性的method, 參數是salesMan, 裏頭的sql如下:
select * from salesReport where salesMan = @salesMan
'3. 建立報表階段, 在建datatable時, 把salesMan傳到1所建的method, 像這樣:
Dim bll_rptAs RptBLL= New RptBLL()
dt_rpt = bll_rpt.GetData(salesMan)
'4. 至於是哪個業務員, 你可從login那邊得知
沒有留言:
張貼留言