CREATEQ.ASP
<%@ LANGUAGE="VBSCRIPT" %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual InterDev 1.0">
<META HTTP-EQUIV="Content-Type" content="text/html; charset=iso-8859-1">
<TITLE>MSMQ ASP Sample Create Queue Page</TITLE>
</HEAD>
<BODY>
<H1>MSMQ ASP Sample Create Queue Page</H1>
<H2>Creating Queue : <%= Request.QueryString ( "MachineName" ) & "\" & Request.QueryString ( "QueueName" ) %></H2>
<% Set msmqinfo=CreateObject ( "MSMQ.MSMQQueueInfo" )
msmqinfo.PathName=Request.QueryString ( "MachineName" ) & "\" & Request.QueryString ( "QueueName" )
msmqinfo.Create
Set msmqinfo=Nothing
%>
<A HREF="Default.asp">[Home]</A>
</BODY>
</HTML>