CODEWITHSUNDEEP
sql-serversql-server-2008connection-string
mohsensajjadi
mohsensajjadi

Reputation: 335

How to connect to Sql Server 2008 database from Visual Basic 6?

What is the correct connection string and what are the requirements for connecting to Sql Server 2008 database from Visual Basic 6?

Upvotes: 2

Views: 35906

Answers (3)

nickotech2000
nickotech2000

Reputation: 259

Public Cnn As New ADODB.Connection
Cnn.Open Provider=SQLNCLI10;Server=10.1.100.1;Database=DataJualLama;Uid=sa;Pwd=sa;

It required to install sql server 2008 native client runtime from microsoft site.

Upvotes: 2

Mitch Wheat
Mitch Wheat

Reputation: 300749

' Initialize variables.
Dim cn As New ADODB.Connection
Dim provStr As String

' Specify the OLE DB provider.
cn.Provider = "sqloledb"

' Specify connection string on Open method.
ProvStr = "Server=MyServer;Database=northwind;Trusted_Connection=yes"
cn.Open provStr

For illustration only (Ref.):

Set rsOrders = New Recordset
rsOrders.Open "Select * from orders", cn
Do While Not rsOrders.EOF
    '
    ' If the order matches some custom business logic then get the details for
    ' that order, without opening a new connection.
    '
    If SomeBusinessLogic(rsOrders("CustomerID")) Then
        Dim rsDetails As Recordset
        Set rsDetails = New Recordset
        '
        ' Open a new recordset using the same connection. Normally it's not
        ' possible to have two recordsets simultaniously using the same
        ' connection, but MARS makes this possible
        '
        rsDetails.Open "Select sum(quantity * unitprice) as total " & _
            "from [order details] " & _
            "where OrderID=" & rsOrders("OrderID"), _
            cn
        grandTotal = grandTotal + rsDetails("total")
    End If
    rsOrders.MoveNext
Loop

lblTotalOrders = grandTotal

Upvotes: 3

Darin Dimitrov
Darin Dimitrov

Reputation: 1039368

You would use ADODB. And here are some connection string samples.

Upvotes: 2

Related Questions