Add a reference to the MS ActiveX data object 7 and the MS Data Binding
Collection. Then paste this code behind a button:
Dim oConn As New ADODB.Connection
oConn.Provider = "sqloledb"
oConn.Properties("Prompt") = adPromptAlways
oConn.Open "Network Library=DBMSSOCN;" & _
"Data Source=;" & _
"Initial Catalog=;"
Neil
"Eric Clapton" <no*****@bk.com> wrote in message
news:%2****************@TK2MSFTNGP09.phx.gbl...
Can anyone please help me to build the VB code connect to a SQL 2000
server? If you can give me a prototype, that will be very helpful? Thanks.