Minh Tiên > 25-12-13, 05:12 PM
Private Sub Report_Open(Cancel As Integer)
Dim sql As String
sql = "Select * from tblDanhsachnhanvien"
Dim rs As ADODB.Recordset
OpenConnect
Set rs = New ADODB.Recordset
rs.Open sql, Conn, adOpenKeyset, adLockReadOnly
Set Me.Report.Recordset = rs
With Me.Report
!txtMa.ControlSource = "Ma"
!txtTen.ControlSource = "Ten"
!txtDiachi.ControlSource = "Diachi"
!txtDienthoai.ControlSource = "Dienthoai"
End With
CloseConnect
Set rs = Nothing
End Sub
Xuân Thanh > 26-12-13, 02:24 PM
(25-12-13, 05:12 PM)tmtien261 Đã viết: Xin các ACE chỉ giúp:
tmtien261 có một đoạn code mở report bằng ADODB trong Access 2007 như sau:
........
Khi mở report bị báo lỗi tại dòng: "Set Me.Report.Recordset = rs" với
Nội dung lỗi: "Run-time error 32585; This feature is only available in an ADP"
Xin các Pro chỉ giúp nguyên nhân lỗi và cách gỡ lỗi.
Cảm ơn nhiều !
Minh Tiên > 26-12-13, 02:36 PM
Xuân Thanh > 26-12-13, 08:13 PM
Minh Tiên > 27-12-13, 09:13 AM