VB 6 và MS SQL 2000

[boysg]

Xin các cao thủ chỉ cho em cách kết nối dữ liệu từ VB 6. 0 vào MS SQL 2000

Em xin cảm ơn

[DIEN]

Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset

Private Sub Form_Load()
cn.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=QLyDuAn;Data Source=."
cn.CursorLocation = adUseClient
cn.Open
rs.Open "select * from dm_khach", cn, 3, 3

End Sub

*****QLyDuAn: tên database
*****datasource: tên server muốn kết nối

[huykhoi]

Nhớ thêm vào thư viện của ADODB (ActiveX)

[ytuong]

Chào bạn, bạn hãy dùng MSDN và message trước có chỉ cách kết nối nhưng lại cố định cách kết nối.

[rangkuk]

hay that tui cung cam on luon