Function CreateQueue(name)
On Error Resume Next
set q = CreateObject ("MSMQ.MSMQQueueInfo")
q.PathName = ".\private$\" + name
q.Create
End Function
Function DeleteQueue(name)
On Error Resume Next
set q = CreateObject ("MSMQ.MSMQQueueInfo")
q.PathName = ".\private$\" + name
q.Delete
End Function
Call CreateQueue("Test")
이제 설치하면 개인 큐도 자동으로 생성/삭제 할 수 있다. 후후..
큐 삭제 액션은 Custom Actions에서 아래와 같이 설정
In-Script Execution : Deferred Execution
Install Exec Sequence : After DeleteService
Install Exec Sequence : REMOVE="ALL"
Admin Exec Sequence : After InstallInitialize
Admin Exec Condition : REMOVE="ALL"
1시간은 헤맨 것 같네
IIS 가상 디렉터리 설정 보고 답을 얻음
On Error Resume Next
set q = CreateObject ("MSMQ.MSMQQueueInfo")
q.PathName = ".\private$\" + name
q.Create
End Function
Function DeleteQueue(name)
On Error Resume Next
set q = CreateObject ("MSMQ.MSMQQueueInfo")
q.PathName = ".\private$\" + name
q.Delete
End Function
Call CreateQueue("Test")
이제 설치하면 개인 큐도 자동으로 생성/삭제 할 수 있다. 후후..
큐 삭제 액션은 Custom Actions에서 아래와 같이 설정
In-Script Execution : Deferred Execution
Install Exec Sequence : After DeleteService
Install Exec Sequence : REMOVE="ALL"
Admin Exec Sequence : After InstallInitialize
Admin Exec Condition : REMOVE="ALL"
1시간은 헤맨 것 같네
IIS 가상 디렉터리 설정 보고 답을 얻음




덧글