I Have created the MSMQQueueInfo object and tried to set the id.FormatName
to the queue that I'm trying to access. I get the message "Object doesn't
suport this Property or method qobj.FormatName. When I type the instruction
in the code. it comes up as a valid property.
Here is the code I'm trying to use
<html xmlns="http://www.w3.org/1999/xhtml" >
<head>
<meta name="GENERATOR" content="Microsoft Developer Studio"/>
<meta http-equiv="content-Type" content="text/html; charset=iso-8859-1"/>
<title>test</title>
<script type="text/VBScript" language="VBScript">
Sub GetQueueData()
dim q
qobj.FormatName = "DIRECT=TCP:192.168.20.211\private$\outbound"
'Set q = qobj.Open ( 1, 0 )
'set msg=q.Receive (0, true, true, 100 )
''set msg=q.Peek(0, true, true, 100 )
'if Not msg is Nothing then
' txtTrace.value = "DATA RECV:"+msg.body
'else
' txtTrace.value = "Nothing in Queue"
'end if
'set msg = Nothing
'q.Close
'Set q=Nothing
'D7D6E07C-DCCD-11D0-AA4B-0060970DEBAE MSMQQueueinfo ID
End Sub
</script>
</head>
<body onload="GetQueueData()">
<object id="qobj" classid="clsid:D7D6E07C-DCCD-11d0-AA4B-0060970DEBAE" >
<span style="color:red">ActiveX control failed to load!
-- Please check browser security settings.</span>
</object>
<h1>test Page</h1>
<table style="width: 882px">
<tr>
<td style="width: 159px"><input type="text" value="" name="txtTrace"/></td>
</tr>
</table>
</body>
</html>
Has anyone tried to do this before? I can't seem to find any examples, but
lots of hints that it should work.
Barry