HOWTO: Shutdown a Windows COM+ Web Application from AVR

The information in this article applies to:

ASNA Visual RPG, Release 3.1 and higher
Windows
COM+
ActiveX
Web

SUMMARY:

This article will discuss a way in which you can shutdown a COM+ Windows 2000 and XP Professional web application from AVR.

MORE INFORMATION:

NOTE: These methods listed below are examples. There might be other methods in which this feature can be incorporated into an AVR application that is not mentioned in this article.

This example assumes the Web Application, you wish to shutdown, is installed on the same server. This example also assumes you have the appropriate Project Reference to the COM+ Object (See Figure 1a for Windows 2000 and Figure 1b for Windows XP Professional):

Figure 1a

Figure 1b

Figure 2 displays the example code required. You will have to draw a button on a form and call it "btnShutdownComApp":

//This is for the Win2000 COM+ Object DCLFLD COMadmin Type(COMAdmin.COMAdminCatalog) BEGSR btnShutdownComApp Click //This is for the Win2000 COM+ Object COMadmin.ShutdownApplication(iofield1) ENDSR

Figure 2

Note the declarations to the COM+ Object: DCLFLD COMadmin Type(COMAdmin.COMAdminCatalog) and the use of the ShutdownApplication Method. You can look at other methods, events, properties for this Object using ASNA's Object Browser.

Figure 3 shows the example form:

Figure 3

NOTE: "NutPack" is the ASNA's Example Web Application that gets built with ASNA's Web Smarties Tutorial.

TIP: You can place a timer event that will go off at a set interval that will verify the connection to the AS/400 is valid and have this application run in the background. If the AS/400 connection is not valid, then you can instruct this application to shutdown any Web Applications that require AS/400 data. You can also use this process to restart a web application that is experiencing problems. After the shutdown has occurred, the next person attempting to access the application will re-start the package.