Database

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>

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

USE pubs<br />
GO<br />
SELECT    'Price Category' = <br />
      CASE <br />
         WHEN price IS NULL THEN 'Not yet priced'<br />
         WHEN price < 10 THEN 'Very Reasonable Title'<br />
         WHEN price >= 10 and price < 20 THEN 'Coffee Table Title'<br />
         ELSE 'Expensive book!'<br />
      END,<br />
   CAST(title AS varchar(20)) AS 'Shortened Title'<br />
FROM titles<br />
ORDER BY price<br />
GO

<italic>Work hard, Work effectively and a bit of luck is the key to success.