vb.net database connection

[jamesd0142]

Ok getting desperate now.

I've looked over the net for hours and can find how to do this...

I want to connect to sql server 2000 database through vb.net.

Can anyone help?

Thanks James

[slapshock]

Imports System.Data.SqlClient
Imports System.Data

Dim con As SqlConnection = Nothing
Dim constr As String = New String("server=urservername;uid=urusername;pwd=urp assword;database=urdatabasename")
con = New SqlConnection(constr)
con.Open()


Hope it helps


Soulfly

[Dököll]

Imports System.Data.SqlClient
Imports System.Data

Dim con As SqlConnection = Nothing
Dim constr As String = New String("server=urservername;uid=urusername;pwd=urp assword;database=urdatabasename")
con = New SqlConnection(constr)
con.Open()


Hope it helps


Soulfly

Good job, slapshock, coming to aid...

I will add over to the .net area however for added feedback and so on.

Have a great week-end!

[jamesd0142]

Thanks for the reply, i find this works if anyone else needs it...

Dim Cmd As OleDb.OleDbCommand
Dim Con As OleDb.OleDbConnection
Dim Sql As String = Nothing
Dim Reader As OleDb.OleDbDataReader
Dim ComboRow As Integer = -1
Dim Columns As Integer = 0
Dim Category As String = Nothing
 
Con = New OleDb.OleDbConnection("Provider=sqloledb;Data Source=servername;Initial Catalog=master;Integrated Security=SSPI;")
Sql = "select name from sysdatabases where [name] like 'post16%'"
Cmd = New OleDb.OleDbCommand(Sql, Con)
Con.Open()
 
'this puts the results into a combo box, but you can edit it to your needs.
Reader = Cmd.ExecuteReader()
      While Reader.Read()
          For Columns = 0 To Reader.FieldCount - 1
              Category = Reader.Item(Columns)     
          Next
            cboDatabase.Items.Add(Category)
            ComboRow += 1
       End While
Con.Close()