Find Method wild card search?

  • Thread starter Thread starter patrick.mcdonald
  • Start date Start date
P

patrick.mcdonald

Hello,

I am trying to figure out the following.

Is it possible to do a dynamic search on a subject line?

This is the subject line:

Dictation Job 09121-006, John Doe (TMALA), Acct 3235555555,filename:
GR169-477

Can I do something like:

myItems.Find("[Subject] = 'Dictation Job *, * *, Acct *,filename: * ")

We are using Outlook 2000

I'm very new to VBA.

any help will be appreciated.

Thanks.
 
Yes, you can use the LIKE predicate, but only with the AdvancedSearch object,
not the Restrict method.

Here's a sample from the Outook VBA Reference:

Public blnSearchComp As Boolean

Private Sub Application_AdvancedSearchComplete(ByVal SearchObject As Search)
MsgBox "The AdvancedSearchComplete Event fired"
blnSearchComp = True
End Sub

Sub TestAdvancedSearchComplete()
Dim sch As Outlook.Search
Dim rsts As Outlook.Results
Dim i As Integer
blnSearchComp = False
Const strF As String = "urn:schemas:httpmail:subject LIKE '%mykeyword%'"
Const strS As String = "Inbox"
Set sch = Application.AdvancedSearch(strS, strF)
While blnSearchComp = False
DoEvents
Wend
Set rsts = sch.Results
For i = 1 To rsts.Count
MsgBox rsts.Item(i).SenderName
Next
End Sub
 
Eric, the syntax can be used with Restrict, a neat little undocumented plus:

strRestrict = "@SQL=" ' then add the filter to that. no spaces.
oItems.Restrict(strRestrict)

So LIKE can be used in a Restrict clause :)
 
But that's still only in OL2002 or later, right?

--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003

and Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers


Ken Slovak - said:
Eric, the syntax can be used with Restrict, a neat little undocumented plus:

strRestrict = "@SQL=" ' then add the filter to that. no spaces.
oItems.Restrict(strRestrict)

So LIKE can be used in a Restrict clause :)

--
Ken Slovak
[MVP - Outlook]
http://www.slovaktech.com
Author: Absolute Beginner's Guide to Microsoft Office Outlook 2003
Reminder Manager, Extended Reminders, Attachment Options
http://www.slovaktech.com/products.htm


Eric Legault said:
Yes, you can use the LIKE predicate, but only with the AdvancedSearch
object,
not the Restrict method.

Here's a sample from the Outook VBA Reference:

Public blnSearchComp As Boolean

Private Sub Application_AdvancedSearchComplete(ByVal SearchObject As
Search)
MsgBox "The AdvancedSearchComplete Event fired"
blnSearchComp = True
End Sub

Sub TestAdvancedSearchComplete()
Dim sch As Outlook.Search
Dim rsts As Outlook.Results
Dim i As Integer
blnSearchComp = False
Const strF As String = "urn:schemas:httpmail:subject LIKE '%mykeyword%'"
Const strS As String = "Inbox"
Set sch = Application.AdvancedSearch(strS, strF)
While blnSearchComp = False
DoEvents
Wend
Set rsts = sch.Results
For i = 1 To rsts.Count
MsgBox rsts.Item(i).SenderName
Next
End Sub


--
Eric Legault (Outlook MVP, MCDBA, MCTS: Messaging & Collaboration)
Try Picture Attachments Wizard for Outlook:
http://www.collaborativeinnovations.ca
Blog: http://blogs.officezealot.com/legault/
Click to expand...
Click to expand...
 
I believe so but I've never tested it with an Outlook 2000 setup.

But it's an interesting undocumented way to get wildcards and other things
you can't really do with the Jet syntax without waiting for Outlook 2007 if
you don't have to support Outlook 2000.




But that's still only in OL2002 or later, right?

--
Sue Mosher, Outlook MVP
Author of Configuring Microsoft Outlook 2003

and Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers
 
Back
Top