Help me, ADO,DataList

[n2v82]

Tui moi hoc VB, ba con cho tui hoi:
1 Cach add recordset !
Dim cn As new connection
Dim rc As ADOB.Recordset
cn.open "Provider=Microsoft.JET.OLEDB.4.0;") & _
"data source=path"
Set rc=new adodb.recordset
rc.open "table",cn,,,AdCmdtable
Nhung khi dung phuong thuc : rc.newadd thi trinh bien dich bao loi :bawling:
2. Khi dung Ado Control lien ket den CSDL(access)
Tui dung Datalist va ADO(adodc1)
Khi khai bao : DataList.source=adocd1 trinh bien dich bao loi ! :bb:
Hic hic, 2 ngay mo mam ma khong lam duoc gi !
Ba con giup tui voi!

[Surom]

Bạn thử đoạn code này đi
trước hết, mở kết nối
Set cn = New ADODB.Connection
With cn
.Provider = "Microsoft.Jet.OLEDB.4.0"
.CursorLocation = adUseClient
.Mode = adModeReadWrite
.Open "Data Source=" & Path & ";"
End With

kế đến mở recordset

Set rc= New ADODB.Recordset
With rc
.CursorLocation = adUseClient
.Open strSQL, cn, adOpenDynamic, adMode
End With

trong đó Path chỉ đến CSDL của bạn, strSQL là chuỗi truy vấn như SELECT * FROM Table...

khi muốn thêm mới một record bạn dùng
rc.addnew
Chúc thành công