Index: base/applications/CMakeLists.txt
===================================================================
--- base/applications/CMakeLists.txt	(revision 73862)
+++ base/applications/CMakeLists.txt	(working copy)
@@ -22,6 +22,7 @@
 add_subdirectory(msconfig)
 add_subdirectory(msconfig_new)
 add_subdirectory(mscutils)
+add_subdirectory(mshta)
 add_subdirectory(mspaint)
 add_subdirectory(mstsc)
 add_subdirectory(network)
Index: base/applications/mshta/CMakeLists.txt
===================================================================
--- base/applications/mshta/CMakeLists.txt	(nonexistent)
+++ base/applications/mshta/CMakeLists.txt	(working copy)
@@ -0,0 +1,6 @@
+
+add_executable(mshta main.c mshta.rc)
+target_link_libraries(mshta wine)
+set_module_type(mshta win32gui)
+add_importlibs(mshta msvcrt mshtml kernel32 ntdll)
+add_cd_file(TARGET mshta DESTINATION reactos/system32 FOR all)
\ No newline at end of file
Index: base/applications/mshta/main.c
===================================================================
--- base/applications/mshta/main.c	(nonexistent)
+++ base/applications/mshta/main.c	(working copy)
@@ -0,0 +1,19 @@
+/*
+ * PROJECT:         HTML Application Viewer
+ * LICENSE:         GPL - See COPYING in the top level directory
+ * FILE:            base/applications/mshta/main.c
+ * PURPOSE:         HTML Application Host
+ * PROGRAMMERS:     Jared Smudde (computerwhiz02@hotmail.com)
+ */
+
+#define WIN32_LEAN_AND_MEAN
+#include <stdio.h>
+#include <windows.h>
+#include <mshtml.h>
+
+extern DWORD WINAPI RunHTMLApplication(HINSTANCE hinst, HINSTANCE hPrevInst, LPSTR szCmdLine, int nCmdShow);
+
+int WINAPI WinMain(HINSTANCE hInst, HINSTANCE hPrevInst, LPSTR cmdline, int cmdshow)
+{
+    return RunHTMLApplication(hInst, hPrevInst, cmdline, cmdshow);
+}
Index: base/applications/mshta/mshta.rc
===================================================================
--- base/applications/mshta/mshta.rc	(nonexistent)
+++ base/applications/mshta/mshta.rc	(working copy)
@@ -0,0 +1,7 @@
+#define REACTOS_STR_FILE_DESCRIPTION  "HTML Application Host"
+#define REACTOS_STR_INTERNAL_NAME     "mshta"
+#define REACTOS_STR_ORIGINAL_FILENAME "mshta.exe"
+
+#include <reactos/version.rc>
+
+1 ICON "mshta.ico"