kết nối với VB

[THIENAN]

mình đã tạo hoàn chỉnh csdl bằng SQL nhưng lại không biết làm sao để kết nối vào VB dể tạo giao diện. Mong các bác giúp đỡ cho. Mình chỉ biết kết nối VB vào eccess thoi

[ITbaby]

Thì nó cũng tương tự như với Acess vậy đó. Sau đây là ví dụ mẫu về kết nối với SQL server

Public cn As ADODB.Connection
Public rs As ADODB.Recordset
Public sqlServer As String
Public sqlUser As String
Public sqlPass As String

Public Sub mdlConnection()'Thủ tục dùng để kết nối với Database
sqlServer = "p3xp" 'Tenmay
sqlUser = "admin" 'Tenuser
sqlPass = "adminsystem" 'Password cua user đó
Set cn = New ADODB.Connection

cn.ConnectionString = "Provider=SQLOLEDB.1;Password='" & sqlPass & "';Persist Security Info=True;User ID='" & sqlUser & "';Initial Catalog=ADMIN;Data Source='" & sqlServer & "'"
cn.Open
End Sub

[gotobed]

sao không dùng thử adodb control xem sao chỉ cần vài cái nhấp chuột là xong ngay.

[dungtran]

Cho tui hỏi cái nữa, làm sao open được recordset vậy!!?

[past_beggar]

- Oài, để kết nối connection và mở reordset thì Access và SQL giống nhau thôi (chỉ khác Connect String thôi).
- Còn thao tác với database thì SQL nó hơn thằng Access rất nhìu.

Thử trước khi hỏi nhé,
Thân

[phatnq2003]

Cho tui hỏi cái nữa, làm sao open được recordset vậy!!?

Bạn khai báo biến recordset và mở thôi:

Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
With rs
.CursorLocation = ...
.CursorType = ...
.LockType = ...
.ActiveConnection = cn
.Open "câu lệnh sql mở source"
.ActiveConnection = Nothing
End With
:)