Database

My: Blog | Photos | Next SQL Presentation
WDevs.com - Open Source Code Hosting, Blogs, FTP, Mail and More

SELECT user1 User FROM table WHERE user2='flintstone' 
UNION
SELECT user2 FROM table WHERE user1='flintstone'

<code>     Private Sub PullData()

           'DECLARE VARIABLES
           Dim ds As New DataSet("DataSetName")
           Dim dr As DataRow
           Dim myConnection As New SqlClient.SqlConnection("Data Source={Local};database=Northwind;user id=sa;")
           Dim myAdapter As New SqlClient.SqlDataAdapter()
           Dim myCommand As New SqlClient.SqlCommand(("SELECT LastName, FirstName, Title, BirthDate  FROM Employees"), myConnection)
             Try
               myCommand.CommandType = CommandType.Text
               myAdapter.SelectCommand = myCommand
               myAdapter.SelectCommand.Connection = myConnection
               myAdapter.Fill(ds,"Employee")
           Catch ex As Exception
               lblMessage.Text = ex.Message
           End Try
           'Close connection
           myConnection.Close()

           dataGrid.DataSource = ds.Tables("Employee")
          End Sub</code>