Run-time error 438 
Author Message
 Run-time error 438

Hi,

I'm fairly new to VB. I picked out the following code from MS Technet which
will locate a mailbox in the MS Exchange directory whose city property
matches the search criteria. However, when I run the program, I get
"Run-time error 438". The de{*filter*} points to this line "objADOconn.Open "ADs
Provider".

What could be wrong? Any help is appreciated. Thank you.

Jean

*********************************************************************

Dim objADOconn
Dim strADOQueryString
Dim objRS
Dim strCriteria
strCriteria = "Bellevue"
Set objADOconn = CreateObject("ADODB.Connection")
objADOconn.Provider = "ADSDSOObject"
objADOconn.Open = "ADs Provider"
strADOQueryString = "<LDAP://" + strServer +
">;(&(objectClass=organizationalPerson)(1=" + strCriteris +
"));cn,adspath;subtree"
Set objRS = objADOconn.execute(strADOQueryString)
If Not objRS.EOF Then
    While Not objRS.EOF
        objnewdl.Add objRS.fields(1).Value
        response.write objRS.fields(0) + " added : )"
        objRS.movenext
    Wend
Else
    response.write "No mailboxes were added to the DL"
End If
objRS.Close
End Sub

*********************************************************************



Fri, 23 Mar 2001 03:00:00 GMT  
 
 [ 1 post ] 

 Relevant Pages 

1. Run time error 438

2. run time error 438

3. run time error 438

4. Run Time error 438

5. Run-time error 438 - Calling all VB gurus

6. VB Run time error 438 : Object doesn't support this property or method

7. Run-time error 438 on some but not all machines (VB 4.0 16-bit)

8. Runtime error 438

9. Runtime Error 438 - What does this mean?

10. **** Runtime Error 438

11. Runtime error 438

12. runtime error 438?

 

 
Powered by phpBB® Forum Software