| Platform SDK: Exchange 2000 Server |
[This is preliminary documentation and subject to change.]
The LIKE operator performs character matching on a specified string. The percent character, %, matches any or no characters adjacent to the specified string. For example, "%he ca%" matches "the cat."
This example search a folder’s items whose urn:schemas:mailheader:from property contains a specified name.
Dim Rec
Dim Rs
Dim strURL
Dim strQ
Dim strSubj
Dim DomainName
Dim strLocalPath
Set Rec = CreateObject("ADODB.Record")
Set Rs = CreateObject("ADODB.Recordset")
'for large folders,
'you may need to increase
'script timeout
Session.Timeout = 1400
' set your own values to these variables:
DomainName = "bruceham2dom.extest.microsoft.com"
strLocalPath = "public folders/disc"
strURL = "file://./backofficestorage/" & DomainName & "/" & strLocalPath
Rec.Open strURL
strQ = "select "
strQ = strQ & " ""DAV:displayname"""
strQ = strQ & " from scope ('shallow traversal of "
strQ = strQ & Chr(34) & strURL & Chr(34) & "') "
'specify a string for LIKE, this example uses Savage
strQ = strQ & "WHERE ""DAV:displayname"" LIKE '%Savage%'"
Rs.Open strQ, Rec.ActiveConnection
Rs.MoveFirst
Do Until Rs.EOF
Response.Write "<b>Subject:</b><br>"
Response.Write Rs.Fields("DAV:displayname").Value & "<br>"
Response.Write "</p>"
Rs.MoveNext
Loop
Rs.Close
Rec.Close