ASP.NET

Public Sub CountAlphaNumeric(ByVal input As String)
    Dim alphaCount = input.Count(Function(c) Char.IsLetter(c))
    Dim numericCount = input.Count(Function(c) Char.IsDigit(c))
    MessageBox.Show(String.Format("Number of alphabets : {0}", alphaCount))
    MessageBox.Show(String.Format("Number of numerics : {0}", numericCount))
End Sub

public class Product : BaseEntity
{
   public int ProductId { get; set; }
   public string ProductName { get; set; }
}

public interface IDbContext : IDisposable
{
    IDbSet<TEntity> Set<TEntity>() where TEntity : BaseEntity;
}

public class MyObjectContext : DbContext, IDbContext
{
    public new IDbSet<TEntity> Set<TEntity>() where TEntity : BaseEntity
    {
        return base.Set<TEntity>();
    }
}

public interface IDbContextFactory
{
    Lazy<IDbContext> CreateDbContext();
}

public class MyDbContextFactory : IDbContextFactory
{
    public MyDbContextFactory(string dbConnectionString)
    {
        _dbConnectionString = Settings.DbConnectionString;
        _dbContext = CreateDbContext();
    }
 
    public IDbContext CreateDbContext()
    {
        IDbContext dbContext = new IDbContext(() => CreateNewContext());
        return dbContext;
    }
 
    private MyObjectContext CreateNewContext()
    {
        return new MyObjectContext (_dbConnectionString);
    }
}

public partial interface IRepository<T> where T : BaseEntity
{
    T GetById(object id);
}

public partial class EfRepository<T> : IRepository<T> where T : BaseEntity
{
    private readonly Lazy<IDbContext> _dbContext;
    private readonly IDbContextFactory _dbContextFactory;
    private readonly Lazy<ObjectStateManager> _objectStateManager;
 
    public EfRepository(IDbContextFactory dbContextFactory)
    {
        _dbContextFactory = dbContextFactory;
        _dbContext= _dbContextFactory.CreateDbContext();
        _objectStateManager= new Lazy<ObjectStateManager>(() => ((IObjectContextAdapter)_dbContext.Value).ObjectContext.ObjectStateManager);
    }
 
    public T GetById(object id)
    {
        return this.Entities.Find(id);
    }
}

public CountryController(Lazy<IRepository<Country>> countryRepository)
    {
        _countryRepository = countryRepository;
    }
 
    public Country GetCountryById(int id)
    {
        Country country = _countryRepository.Value.GetById(id);
 
        if (country != null)
            return country;
        else
            return null;
    }

IDBContext -> IDBContextFactory -> IRepository <T>

Hello;

I'm working on a simple login form in c# in asp.net. I'd like to bind a key to the password and then save it in encrypted form. When the user logs in, he should enter his key and password. The key will be bind to the password and then compared to the one stored on the database.

Please help me with the binding process and encryption.
Thanks.

Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Load

    If Not IsPostBack Then
        ddlParks.AppendDataBoundItems = True
        Dim strQuery As [String] = "Select parkID, parkName from ParksCategory"
        Dim con As New SqlConnection(strConnString)
        Dim cmd As New SqlCommand()
        cmd.CommandType = CommandType.Text
        cmd.CommandText = strQuery
        cmd.Connection = con
        Try
            con.Open()
            ddlParks.DataSource = cmd.ExecuteReader()
            ddlParks.DataTextField = "parkName"
            ddlParks.DataValueField = "parkID"
            ddlParks.DataBind()
        Catch ex As Exception
            Throw ex
        Finally
            con.Close()
            con.Dispose()
        End Try
    End If
End Sub
Protected Sub ddlParks_SelectedIndexChanged(ByVal sender As Object, ByVal e As EventArgs) Handles ddlParks.SelectedIndexChanged

    Dim strQuery As [String] = "select subcatID, subcatName from SubCategory" _
                                & "where parkID=@parkID AND Status=1"
    Dim con As New SqlConnection(strConnString)
    Dim cmd As New SqlCommand()
    cmd.Parameters.AddWithValue("@parkID", _
                         ddlParks.SelectedItem.Value)
    cmd.CommandType = CommandType.Text
    cmd.CommandText = strQuery
    cmd.Connection = con
    Try
        con.Open()

        dr = cmd.ExecuteReader()

        Do While dr.HasRows
            lblfacility.Text = dr.GetName(1)

            Do While dr.Read()

                  lblfacility.Text = dr.GetString(1)
            Loop

            dr.NextResult()
        Loop

    Catch ex As Exception
        Throw ex
    Finally
        con.Close()
        con.Dispose()
    End Try
End Sub