MVEs are more concerned with the satisfaction of those they help than with the considerable points they can earn. They are the types of people you feel privileged to call colleagues. Join us in honoring this amazing group of Experts.
'If there is still an available Host record and the Host is disabled in AD, lets disable it on the database if not already. ElseIf IsDBNull(objRecordSet.Fields("distinguishedName").Value) = False And IsDBNull(objRecordSet.Fields("description").Value) = False Then While Not objRecordSet.EOF Dim objAccount As ADODB.Recordset = GetObject("LDAP://" & objRecordSet.Fields("distinguishedName").Value) If objAccount.AccountDisabled Then ' Connect to DB and set the Status field to "Disabled" and ' the Flag(soon to be DaysOffline) field to 29 days. Dim sqlCon As New SqlClient.SqlConnection Dim sqlCom As New SqlClient.SqlCommand sqlCon.ConnectionString = My.Settings.ConnectionString Try
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
8 Experts available now in Live!