here is the code. i&#039;m very new to asp .net this is the first thing I&#039;m am trying to do any help with this would be appreciated. i want to be able to check the dataset to see if the name has been returned and if it has then it is already in use and the user has to pick a different name to register.<BR>thanks for any help<BR><BR><BR> Function checkuser(ByVal username As String) As System.Data.DataSet<BR> Dim connectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0; Ole DB Services=-4; Data Source=D:web pageuse"& _<BR>"rs.mdb"<BR> Dim dbConnection As System.Data.IDbConnection = New System.Data.OleDb.OleDbConnection(connectionString )<BR><BR> Dim queryString As String = "SELECT [userinfo].[username] FROM [userinfo] WHERE ([userinfo].[username] = @user"& _<BR>"name)"<BR> Dim dbCommand As System.Data.IDbCommand = New System.Data.OleDb.OleDbCommand<BR> dbCommand.CommandText = queryString<BR> dbCommand.Connection = dbConnection<BR><BR> Dim dbParam_username As System.Data.IDataParameter = New System.Data.OleDb.OleDbParameter<BR> dbParam_username.ParameterName = "@username"<BR> dbParam_username.Value = username<BR> dbParam_username.DbType = System.Data.DbType.String<BR> dbCommand.Parameters.Add(dbParam_username)<BR><BR> Dim dataAdapter As System.Data.IDbDataAdapter = New System.Data.OleDb.OleDbDataAdapter<BR> dataAdapter.SelectCommand = dbCommand<BR> Dim dataSet As System.Data.DataSet = New System.Data.DataSet<BR> dataAdapter.Fill(dataSet)<BR><BR> Return dataSet<BR> End Function<BR><BR><BR><BR><BR>Sub addButton_Click_1(sender As Object, e As EventArgs)<BR><BR><BR>If mName.Text = "" Or mPassword.Text = "" Or mEmail.Text = "" Then<BR><BR>msgLabel.Text = "One or more required fields are empty. <BR>Please complete all fields."<BR>msgLabel.Visible = true<BR><BR>Else<BR>Dim userDS As New System.Data.DataSet<BR>userDS = checkuser( mName.Text)<BR><BR> If userDS is "" Then<BR> accountinsert(mName.Text, mPassword.Text, mEmail.Text, mFirst.Text, mMiddle.Text, mLast.Text, mCity.Text, mState.Text, mZip.Text)<BR> msgLabel.Text = mName.Text & " was added successfully"<BR> msgLabel.Visible = True<BR><BR> Else<BR> msgLabel.Text = mName.Text & " is alredy being used"<BR> msgLabel.Visible = True<BR><BR> End if<BR>End If<BR>End Sub<BR>