ASP.NET

<pre><System.Web.Services.WebMethod()>
    Public Shared Function GetListPriority()
        Dim client As New HttpClient()
        Dim Resp = client.GetAsync(New Uri(ConfigurationManager.AppSettings("WS") + "ListPriority"))
        Dim ds = JsonConvert.DeserializeObject(Of List(Of ListPriority))(Resp.Result.Content.ReadAsStringAsync().Result)
        Dim details As New List(Of ListPriority)()
        For Each i In ds
            Dim oListPriority As New ListPriority
            oListPriority.PriorityCode = i.PriorityCode
            oListPriority.bAktif = i.bAktif
            oListPriority.InputBy = i.InputBy
            oListPriority.InputDate = i.InputDate
            details.Add(oListPriority)
        Next
        Return details.ToArray
    End Function

    Public Class ListPriority
        Public Property PriorityCode As String
        Public Property bAktif As String
        Public Property InputBy As String
        Public Property InputDate As String
    End Class

<asp:Content ID="Content" ContentPlaceHolderID="MainContent" runat="server">
<div id="content-wrapper">
<div class="card mb-3">
        <div class="card-header">
            
               / Master / Priority
            <div style="float: right">
                <button type="button" class="btn btn-info btn-sm" data-toggle="modal" data-target="#myModal">NEW</button>
            </div>
        </div>
        <div class="card-body">
            <div class="table-responsive">
                <table class="table table-bordered" id="dataTable" width="100%" cellspacing="0">
                    <thead>
                        <tr>
                            <th>Priority Code</th>
                            <th>bAktif</th>
                            <th>Input By</th>
                            <th>Input Date</th>
                        </tr>
                    </thead>
                    <tfoot>
                        <tr>
                            <th>Priority Code</th>
                            <th>bAktif</th>
                            <th>Input By</th>
                            <th>Input date</th>
                        </tr>
                    </tfoot>
                   <tbody>
                   </tbody>
                </table>
            </div>
        </div>
        <div class="card-footer small text-muted">Updated yesterday at 11:59 PM</div>
    </div>
 </div>

</asp:Content>

<script src="../vendor/jquery/jquery.min.js"></script>
<script src="../Scripts/demo/datatables-demo.js"></script>
<script src="../vendor/datatables/jquery.dataTables.js"></script>
<script type="text/javascript">
    $(document).ready(function() {
        $.ajax({
            type: "POST",
            contentType: "application/json; charset=utf-8",
            url: "Priority.aspx/GetListPriority",
            data: "{}",
            dataType: "json",
            success: function (data) {
                var trHTML = '';
                for (var i = 0; i < data.d.length; i++) {
                    trHTML += '<tr><td>' + data.d[i].PriorityCode + '</td><td>' + data.d[i].bAktif + '</td><td>' + data.d[i].InputBy + '</td><td>' + data.d[i].InputDate + '</td></tr>';
                    ;
                };$('#dataTable tbody').append(trHTML)},
                error: function(result) {
                alert("Error");
                }
            });
        });
</script>

https://localhost:44351/UserDetails?id=1

ParamName               ParamValue

WindowsDomainServer	pcg.porto.loc
BaseDN	                DC=pcg, DC=porto, DC=loc (Base DN)
UserDN	                OU=InformationSystems (User DN)
GroupName	        CN=ITTESTAPP,  OU=IT-Groups, DC=pcg, DC=porto, DC=loc
AccountFilter	        sAMAccountName

protected void btnSubmit_Click(object sender, System.EventArgs e)
  {
      if (txtUserName.Text.Trim().Equals("") || txtPassword.Text.Trim().Equals(""))
      {
          Message.Text = "Please Enter UserName/Password...";
          txtPassword.Text = "";
          txtUserName.Text = "";
      }
      else
      {
          GetADSILogin();
      }

  }
  public void GetADSILogin()
  {
      try
      {
          string strServerName = "";
          string strBaseDN = "";
          string strUserDN = "";
          string strGroupName = "";
          string strAccountFilter = "";

          //Port no for LDAP Default is 389
          string strPortNo = "389";

          Boolean blnGroupUser = false;
          //Data source string

          string source = "Data Source=myDBServerName;Initial Catalog=MyDB;user=mysusername;password=myPassword";
          //SQL statement that will be issued

          string select = "SELECT * from ADSI_Table";

          //SQL Connection
          SqlConnection conn = new SqlConnection(source);

          // Open the database connection
          conn.Open();

          // Create the SQL command...
          SqlCommand cmd = new SqlCommand(select, conn);

          //Execute Data reader
          SqlDataReader myReader = cmd.ExecuteReader();

          //Check if any rows return against user/pass
          if (myReader.HasRows)
          {
              while (myReader.Read())
              {
                  //Store the parameter's data in variables
                  string strParameterName = myReader.GetString(0).Trim();
                  string strParameterValue = myReader.GetString(1).Trim();

                  if (strParameterName.ToUpper().Equals("SERVERNAME"))
                      strServerName = strParameterValue;

                  if (strParameterName.ToUpper().Equals("BASEDN"))
                      strBaseDN = strParameterValue;

                  if (strParameterName.ToUpper().Equals("USERDN"))
                      strUserDN = strParameterValue;

                  if (strParameterName.ToUpper().Equals("GROUPNAME"))
                      strGroupName = strParameterValue;

                  if (strParameterName.ToUpper().Equals("ACCOUNTFILTER"))
                      strAccountFilter = strParameterValue;
              }
          }

          //Search for user
          DirectoryEntry deSystem = new DirectoryEntry("LDAP://" + strServerName + "/" + strUserDN + "," + strBaseDN);
          deSystem.AuthenticationType = AuthenticationTypes.Secure;
          deSystem.Username = txtUserName.Text;
          deSystem.Password = txtPassword.Text;

          //Search for account name
          string strSearch = strAccountFilter + "=" + txtUserName.Text;

          DirectorySearcher dsSystem = new DirectorySearcher(deSystem, strSearch);
          //Search subtree of UserDN

          dsSystem.SearchScope = SearchScope.Subtree;

          //Find the user data
          SearchResult srSystem = dsSystem.FindOne();

          //Pick up the user group belong to
          ResultPropertyValueCollection valcol = srSystem.Properties["memberOf"];

          if (valcol.Count > 0)
          {
              foreach (object o in valcol)
              {
                  //check user exist in Group we are searching for
                  if (o.ToString().Equals(strGroupName + "," + strBaseDN))
                  {
                      blnGroupUser = true;
                      break;
                  }
              }
          }

          if (blnGroupUser == true)
              Message.Text = "Login Sucessfull...";
          else
              Message.Text = "User Does Not Belong to Specified ADSI Group";
      }
      catch (Exception ex)
      {
          Message.Text = (ex.Message);
      }
      int i = 0;
      i = i + 1;

      if (i == 5)
      {
          Message.Text = "Login failed for 5 times. Quiting...";
          this.Close();
      }
  }