msxml3: Implement IXMLDOMComment_get_data.

dlls/msxml3/comment.c

@@ -474,8 +474,20 @@ static HRESULT WINAPI domcomment_get_data(
     IXMLDOMComment *iface,
     BSTR *p)
 {
-    FIXME("\n");
-    return E_NOTIMPL;
+    domcomment *This = impl_from_IXMLDOMComment( iface );
+    HRESULT hr = E_FAIL;
+    VARIANT vRet;
+
+    if(!p)
+        return E_INVALIDARG;
+
+    hr = IXMLDOMNode_get_nodeValue( This->node, &vRet );
+    if(hr == S_OK)
+    {
+        *p = V_BSTR(&vRet);
+    }
+
+    return hr;
 }
 
 static HRESULT WINAPI domcomment_put_data(

dlls/msxml3/tests/domdoc.c

@@ -2105,6 +2105,12 @@ static void test_xmlTypes(void)
                 ok(hr == S_OK, "ret %08x\n", hr );
 
                 /* get data Tests */
+                hr = IXMLDOMComment_get_data(pComment, &str);
+                ok(hr == S_OK, "ret %08x\n", hr );
+                ok( !lstrcmpW( str, _bstr_("This &is a ; test <>\\") ), "incorrect get_data string\n");
+                SysFreeString(str);
+
+                /* get data Tests */
                 hr = IXMLDOMComment_get_nodeValue(pComment, &v);
                 ok(hr == S_OK, "ret %08x\n", hr );
                 ok( V_VT(&v) == VT_BSTR, "incorrect dataType type\n");