Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

qn urgent...

0 views
Skip to first unread message

shimano

unread,
Apr 14, 2002, 9:05:09 PM4/14/02
to
i know that retrieve the user name is by this way --
Request.ServerVariables("REMOTE_USER")...but if i want to
retrieve other information like user department? telephone?

how can i do it?
.

Barry Wiech

unread,
Apr 14, 2002, 10:24:10 PM4/14/02
to
Hi,
Try Using ADSI
the following link is a good place to start
http://www.aspfree.com/adsi/Default.asp

"shimano" <ta...@hotmail.com> wrote in message
news:258d01c1e419$96701e10$36ef2ecf@tkmsftngxa12...

shimano

unread,
Apr 15, 2002, 12:00:06 AM4/15/02
to

thank thank amd thank for ur reply!
can't find department and telephone inside ??
onli got full name and description...

regard
shimano

>.
>

Barry Wiech

unread,
Apr 15, 2002, 1:18:34 AM4/15/02
to
Try This:

Dim oConn,strQuery,oRS

oConn.Provider = "ADsDSOObject"
oConn.Open "Ads Provider"
strQuery= "<GC://DOMAINNAME>;(SAMAccountName=" & Session("LOGON_USER") &
_
");ADsPath,displayname,telephonenumber,Department"
Set oRS=oConn.Execute(strQuery)

Response.Write "Name:" & oRS("displayName")
Response.Write "Department: " & oRS("Department")
Response.Write "Telephone Number: " & oRS("telephonenumber")


"shimano" <ta...@hotmail.com> wrote in message

news:26e301c1e432$071d8f40$3bef2ecf@TKMSFTNGXA10...

shimano

unread,
Apr 15, 2002, 1:48:15 AM4/15/02
to
hi

erm, how come cannot work when i paste the code??
is there anything i need to change in order for it to
work??

thank for ur guidence!

>.
>

Barry Wiech

unread,
Apr 15, 2002, 3:15:34 AM4/15/02
to
you must change the DOMAINNAME to your local domain name

"shimano" <ta...@hotmail.com> wrote in message
news:279301c1e441$23183240$37ef2ecf@TKMSFTNGXA13...

shimano

unread,
Apr 15, 2002, 5:08:35 AM4/15/02
to

hi..thank again

i change the domain name but how come it said object
reqired??
what actually happen?
object reuqire in this line?
oConn.Provider = "ADsDSOObject"

sorry for the trouble

>.
>

Barry Wiech

unread,
Apr 15, 2002, 7:15:04 PM4/15/02
to
is the script running on a windows 2000 box? if not you will need to install
adsi2.5 from the microsoft site


"shimano" <ta...@hotmail.com> wrote in message

news:213801c1e45d$1fa80100$a4e62ecf@tkmsftngxa06...

0 new messages