Wcmatch question

I am trying to step thru all my Named Page Setups, and delete some by name.
In the following code, IL imports the named Page Setups fine. In DL, the
first Alert works fine, showing both Setups, but the second Alert fails for
both names, so I assume I am doing something wrong with wcmatch. At first I
was searching for "B&W*", but even just looking for "Plotter*" isn't
working.
I hate when I get stumped on these really short things. Makes me want to go
home and go back to bed.

Thanks,
Gordon


(defun c:IL ()

(setvar "FILEDIA" 0)
(command "-psetupin" "Xerox Plotting.dwg" "30x42 - B&W Plotter")
(command "-psetupin" "Xerox Plotting.dwg" "30x42 - B&W Plotter (half)")
(setvar "FILEDIA" 1)
(princ))

(defun CL ()
(vlax-for ps (vla-get-plotconfigurations (vla-get-activedocument
(vlax-get-acad-object)))
;(vla-delete ps)
(Alert (vla-get-name ps))
(if (wcmatch (vla-get-name ps) "Plotter*")(Alert (vla-get-name ps)))
); vlax-for
(princ))

 

"*B&W*" or "*Plotter*"

You need to woldcard match BOTH sides of the string to find....

Jeff

 

Uh, shouldn't have gotten out of bed. Thanks, works like a champ now

Gordon