Jacek Caban : mshtml: Added support for text/vbscript script type.

[Alexandre Julliard]

Module: wine
Branch: master
Commit: 3a268796b82a3ffc4f11c986d69a80066f620453
URL:    http://source.winehq.org/git/wine.git/?a=commit;h=3a268796b82a3ffc4f11c986d69a80066f620453

Author: Jacek Caban <jacek at codeweavers.com>
Date:   Fri Sep  2 12:03:17 2011 +0200

mshtml: Added support for text/vbscript script type.

---

 dlls/mshtml/script.c |    6 ++++++
 1 files changed, 6 insertions(+), 0 deletions(-)

diff --git a/dlls/mshtml/script.c b/dlls/mshtml/script.c
index 9b1a81e..25ae0b6 100644
--- a/dlls/mshtml/script.c
+++ b/dlls/mshtml/script.c
@@ -48,6 +48,8 @@ static const WCHAR emptyW[] = {0};
 
 static const CLSID CLSID_JScript =
     {0xf414c260,0x6ac0,0x11cf,{0xb6,0xd1,0x00,0xaa,0x00,0xbb,0xbb,0x58}};
+static const CLSID CLSID_VBScript =
+    {0xb54f3741,0x5b07,0x11cf,{0xa4,0xb0,0x00,0xaa,0x00,0x4a,0x55,0xe8}};
 
 struct ScriptHost {
     IActiveScriptSite              IActiveScriptSite_iface;
@@ -718,10 +720,14 @@ static BOOL get_guid_from_type(LPCWSTR type, GUID *guid)
 {
     const WCHAR text_javascriptW[] =
         {'t','e','x','t','/','j','a','v','a','s','c','r','i','p','t',0};
+    const WCHAR text_vbscriptW[] =
+        {'t','e','x','t','/','v','b','s','c','r','i','p','t',0};
 
     /* FIXME: Handle more types */
     if(!strcmpiW(type, text_javascriptW)) {
         *guid = CLSID_JScript;
+    }else if(!strcmpiW(type, text_vbscriptW)) {
+        *guid = CLSID_VBScript;
     }else {
         FIXME("Unknown type %s\n", debugstr_w(type));
         return FALSE;