diff --git a/dlls/vbscript/tests/api.vbs b/dlls/vbscript/tests/api.vbs
new file mode 100644
index 00000000000..2b2cf6407f6
--- /dev/null
+++ b/dlls/vbscript/tests/api.vbs
@@ -0,0 +1,35 @@
+'
+' Copyright 2011 Jacek Caban for CodeWeavers
+'
+' This library is free software; you can redistribute it and/or
+' modify it under the terms of the GNU Lesser General Public
+' License as published by the Free Software Foundation; either
+' version 2.1 of the License, or (at your option) any later version.
+'
+' This library is distributed in the hope that it will be useful,
+' but WITHOUT ANY WARRANTY; without even the implied warranty of
+' MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+' Lesser General Public License for more details.
+'
+' You should have received a copy of the GNU Lesser General Public
+' License along with this library; if not, write to the Free Software
+' Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
+'
+
+Option Explicit
+
+Dim x
+
+Class EmptyClass
+End Class
+
+Call ok(isObject(new EmptyClass), "isObject(new EmptyClass) is not true?")
+Set x = new EmptyClass
+Call ok(isObject(x), "isObject(x) is not true?")
+Call ok(isObject(Nothing), "isObject(Nothing) is not true?")
+Call ok(not isObject(true), "isObject(true) is true?")
+Call ok(not isObject(4), "isObject(4) is true?")
+Call ok(not isObject("x"), "isObject(""x"") is true?")
+Call ok(not isObject(Null), "isObject(Null) is true?")
+
+Call reportSuccess()
diff --git a/dlls/vbscript/tests/rsrc.rc b/dlls/vbscript/tests/rsrc.rc
index 834df1ddb7b..0ca68d4e694 100644
--- a/dlls/vbscript/tests/rsrc.rc
+++ b/dlls/vbscript/tests/rsrc.rc
@@ -16,5 +16,8 @@
  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  */
 
+/* @makedep: api.vbs */
+api.vbs 40 "api.vbs"
+
 /* @makedep: lang.vbs */
 lang.vbs 40 "lang.vbs"
diff --git a/dlls/vbscript/tests/run.c b/dlls/vbscript/tests/run.c
index 9aba09123d9..b631c88f6e6 100644
--- a/dlls/vbscript/tests/run.c
+++ b/dlls/vbscript/tests/run.c
@@ -1098,6 +1098,7 @@ static void run_tests(void)
     CHECK_CALLED(testobj_propput_i);
 
     run_from_res("lang.vbs");
+    run_from_res("api.vbs");
 
     test_gc();
 }