XProfan

Source watts on the 15.07.2007 from the MMJ-Quellcodesammlung (Dietmar horn) in The Babyklappe on XProfan.Com stored:
API: SHLWAPI.DLL - Test, whether a File a defined Endung has
testing whether a File a defined Endung has, 1 = Yes
Author Dieter Zornow
free
DEF PathMatchSpec(2) ! shlwapi,PathMatchSpecA

Proc IssExt

    parameters way$,ext$
    Return PathMatchSpec(addr(way$),addr(ext$))

endproc

cls
print IssExt(c:\temp\Test.txt,*.doc)
waitinput