Change User attribute in Active Directory by web (vb.net)

M

malin

(e-mail address removed) 19 Sie. 09:30 poka¿ opcje
Grupa dyskusyjna: microsoft.public.adsi.general
Od: (e-mail address removed) - Znajd¼ wiadomo¶ci tego autora
Data: 19 Aug 2005 00:30:24 -0700
Lokalna: Pi±t. 19 Sie. 2005 09:30
Temat: Change User attribute in Active Directory by web (vb.net)
Odpowiedz | Odpowiedz autorowi | Przekieruj | Drukuj | Wiadomo¶æ
prywatna | Poka¿ oryginaln± wiadomo¶æ | Usuñ | Zg³o¶ naruszenie
prawa lub regulaminu

Hi

I have some problem, i modify attributs in .net by web but nothing
happends, i don;t have any exceptions :(, everything would be okey but
does'nt :(

the code :

dim Entry_ldap As New
DirectoryEntry("LDAP://hercena11.d450000.wro.mofnet.gov.pl",
login.text, Password.text)
Dim lista_atr() As String = {"mail"}
Dim Filter As String = ("(&(sAMAccountName=" & login.text &
")(objectclass=" & "user" & "))")
Dim my_ldap_user As DirectorySearcher = New
DirectorySearcher(entry_ldap, Filter, lista_atr)
my_ldap_user.PropertyNamesOnly = True
Dim result As SearchResult
result = my_ldap_user.FindOne()
result.GetDirectoryEntry.Properties("mail").Value = txt_maillst.Text
result.GetDirectoryEntry.CommitChanges()

thanks for all answers
malin
 
J

Joe Kaplan \(MVP - ADSI\)

You multi-posted. Answered in microsoft.public.adsi.general.

Joe K.


(e-mail address removed) 19 Sie. 09:30 poka¿ opcje
Grupa dyskusyjna: microsoft.public.adsi.general
Od: (e-mail address removed) - Znajd¼ wiadomo¶ci tego autora
Data: 19 Aug 2005 00:30:24 -0700
Lokalna: Pi±t. 19 Sie. 2005 09:30
Temat: Change User attribute in Active Directory by web (vb.net)
Odpowiedz | Odpowiedz autorowi | Przekieruj | Drukuj | Wiadomo¶æ
prywatna | Poka¿ oryginaln± wiadomo¶æ | Usuñ | Zg³o¶ naruszenie
prawa lub regulaminu

Hi

I have some problem, i modify attributs in .net by web but nothing
happends, i don;t have any exceptions :(, everything would be okey but
does'nt :(

the code :

dim Entry_ldap As New
DirectoryEntry("LDAP://hercena11.d450000.wro.mofnet.gov.pl",
login.text, Password.text)
Dim lista_atr() As String = {"mail"}
Dim Filter As String = ("(&(sAMAccountName=" & login.text &
")(objectclass=" & "user" & "))")
Dim my_ldap_user As DirectorySearcher = New
DirectorySearcher(entry_ldap, Filter, lista_atr)
my_ldap_user.PropertyNamesOnly = True
Dim result As SearchResult
result = my_ldap_user.FindOne()
result.GetDirectoryEntry.Properties("mail").Value = txt_maillst.Text
result.GetDirectoryEntry.CommitChanges()

thanks for all answers
malin
 
P

Pat

z polski kolega



(e-mail address removed) 19 Sie. 09:30 poka¿ opcje
Grupa dyskusyjna: microsoft.public.adsi.general
Od: (e-mail address removed) - Znajd¼ wiadomo¶ci tego autora
Data: 19 Aug 2005 00:30:24 -0700
Lokalna: Pi±t. 19 Sie. 2005 09:30
Temat: Change User attribute in Active Directory by web (vb.net)
Odpowiedz | Odpowiedz autorowi | Przekieruj | Drukuj | Wiadomo¶æ
prywatna | Poka¿ oryginaln± wiadomo¶æ | Usuñ | Zg³o¶ naruszenie
prawa lub regulaminu

Hi

I have some problem, i modify attributs in .net by web but nothing
happends, i don;t have any exceptions :(, everything would be okey but
does'nt :(

the code :

dim Entry_ldap As New
DirectoryEntry("LDAP://hercena11.d450000.wro.mofnet.gov.pl",
login.text, Password.text)
Dim lista_atr() As String = {"mail"}
Dim Filter As String = ("(&(sAMAccountName=" & login.text &
")(objectclass=" & "user" & "))")
Dim my_ldap_user As DirectorySearcher = New
DirectorySearcher(entry_ldap, Filter, lista_atr)
my_ldap_user.PropertyNamesOnly = True
Dim result As SearchResult
result = my_ldap_user.FindOne()
result.GetDirectoryEntry.Properties("mail").Value = txt_maillst.Text
result.GetDirectoryEntry.CommitChanges()

thanks for all answers
malin
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Members online

No members online now.

Forum statistics

Threads
473,744
Messages
2,569,484
Members
44,903
Latest member
orderPeak8CBDGummies

Latest Threads

Top