quote: Dim UserWrap Set UserWrap = CreateObject("DynamicWrapper")
' Call MessageBoxA(), first register the API function UserWrap.Register "USER32.DLL", "MessageBoxA", "I=HsSu", _ "f=s", "R=l" ' now call the function UserWrap.MessageBoxA Null, "MessageBox (ANSI)", _ "From DynaWrap Object", 3