Avatar billede thomasgh Nybegynder
28. april 2003 - 16:06 Der er 12 kommentarer

Hvor er fejlin i følgende kode

Hej,

Jeg har kopieret følgende kode fra Internet..men det eller andet er galt.

Er der nogen som kan hjælpe mig ?

Set oConn = CreateObject("ADODB.Connection")
oConn.Provider = "ADsDSOObject"
oConn.Open
vSQL = "SELECT ADsPath,
sn,givenName,telephonenumber,mobile,physicaldeliveryofficename,FacsimileTelephoneNumber,"
& _
"pager FROM " & Chr(39) & GetDnc() & Chr(39) &_
"WHERE objectCategory='person' AND objectClass='user' AND sn = '*' ORDER BY sn"
Set oRs = oConn.execute(vSQL)


Hvor GetDNC() er følgende function:

Function GetDnc()

Set objRootDSE = GetObject("GC://RootDSE")
Dnc = objRootDSE.Get("defaultNamingContext")
Set ObjRootDSE = Nothing
GetDnc = "LDAP://cn=users," & DNC
End Function


På forhånd tak for hjælpen

Thomas
Avatar billede martin_moth Mester
28. april 2003 - 16:41 #1
Hvor kommer selve databasens navn ind i koden - mangler du ikke at angive den?
Avatar billede tsunami Nybegynder
28. april 2003 - 16:45 #2
Hvad for en fejlmeddelelse får du?
Avatar billede thomasgh Nybegynder
28. april 2003 - 16:58 #3
jeg fr følgende fejlmeddelse: 
Kompileringsfejl i Microsoft VBScript (0x800A03EA)


Databasen er egenligt Active Directory.
Forbindelsen bliver oprettet på følgede måde:

Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Provider = "ADsDSOObject"
oConn.Open
Avatar billede martin_moth Mester
28. april 2003 - 18:02 #4
Nu er jeg helt newbii i asp og databaser - men som jeg ser det, mangler du at angive hvilken database du vil connecte (fx. "MinDatabase.mdb")
Just my 2 pennies - over and out, Martin :o)

PS: Har jeg helt misforstået, så spild ikke tid på at forsøge at forklare mig noget ;o)
Avatar billede tsunami Nybegynder
29. april 2003 - 16:48 #5
Hvor gør du ikke bare som der står på http://infocenter.cramsession.com/TechLibrary/GetHtml.asp?ID=1118

og bruger

'Return a list of active directory user's who have a telephone number listed.
Set Cn = CreateObject("ADODB.Connection")
Conxn = "provider=ADsDSOObject"
'Open the connection.
Cn.open Conxn
Set oRS = CreateObject("ADODB.RecordSet")
SQLText = "SELECT ADsPath, sn,givenName,telephonenumber,mobile,physicaldeliveryofficename,FacsimileTelephoneNumber," & _
"pager FROM " & Chr(39) & GetDnc() & Chr(39) &_
"WHERE objectCategory='person' AND objectClass='user' AND sn = '*' ORDER BY sn"
oRS.Open SQLText, Cn, adOpenStatic, adCmdText

istedet
da den løsning du bruger skal lave en
Set oRs = oConn.execute(vSQL)
Og den der står på deres side skal du bruge recordset.... kan være at det er derfor den ikke virker... det kan jo være at objectet ikke kan bruge Execute metoden...
Avatar billede thomasgh Nybegynder
29. april 2003 - 17:24 #6
Det er netop denne PhoneBook som jeg gerne vil have til at køre.
Jeg har prøvet det du foreslår - men jeg får en fejl på følgende linje:

oRS.Open SQLText, Cn, adOpenStatic, adCmdText

Hvad end den betyder...

Jeg får følgende fejl:
ADODB.Recordset (0x800A0E7D)
The connection cannot be used to perform this operation. It is either closed or invalid in this context.


Bruger du selv denne Phonebook ?

Hvis ja - er jeg meget interesseret i at vide hvordan du har fået den til at virke - eller om du har andre foreslag.

Thomas
Avatar billede tsunami Nybegynder
29. april 2003 - 19:13 #7
Køre du den på din egen maskine eller en hostet server....??

og hvilket domæne er registreret hvis du bruger din egen maskine...

Nej bruger den ikke men en hurtig søgning på internettet kan hente mange spændende oplysninger
Avatar billede thomasgh Nybegynder
29. april 2003 - 19:17 #8
jeg har indtil vide forsøgt på nin lokale PC (med IIS)
PC*en er en del at vores domæne: EMEA

Jeg er lidt i tvivel - hvor mange filer denne kode skal deles i - og hvordan de kalder hinanden.

Og ikke mindst hvorfor jef får en fejli linjen:

oRS.Open SQLText, Cn, adOpenStatic, adCmdText

Men den ser nu også lidt underlig ud....

Thomas
Avatar billede tsunami Nybegynder
30. april 2003 - 14:53 #9
Hvor meget af koden har du ændret?...

Og har du tilføjet denne tjeneste til Outlook eller Exchange Serveren
("Microsoft LDAP Directory")?
Avatar billede thomasgh Nybegynder
30. april 2003 - 15:21 #10
Jeg har kun ændred den kode som du foreslog...
Hvad angår at tilføje denne tjeneste til Outlook/Exchange...er jeg ikke helt med på hvad du mener,

Jeg har antaget at denne ASP kode ligger på en IIS web server - og henter informationen fra AD direkte.

Er jeg helt forkert på den ?

Thomas
Avatar billede thomasgh Nybegynder
30. april 2003 - 15:25 #11
Egenligt ville jeg gerne have en AD integreret PhoneBook på vores intranet - hvor alle kan søge oplysninger om ansatte.
Functionen med er exportere til Excel - er mindre interessant.

Da jeg fandt denne kode - var min forestilling at jeg kunne ændre denne således at den opfylder vores behov.

Men...det lader ikke til at være helt let.

Thomas
Avatar billede tsunami Nybegynder
30. april 2003 - 18:15 #12
Nej det er ikke helt let... sagen er den at den application du har med at gøre gør at du kan få vist din/jeres adresse bog/bøger fra outlook eller exchange server på nettet... og dertil skal Outlook/exchange sættes op så den bruger noget der hedder Microsoft LDAP Directory da det er et object som du tilslutter til via ado og på den måde kan få fat i outlook... mere information om at få installeret LDAP kan du finde på adressen http://www.dpo.uab.edu/4manager/ldap-outlook-corporate.html og hvis ikke den er installeret er det nok derfor du ikke kan få det til at virke...
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester