Re: How to "programmatically" end "pcsws.exe"

Under CA/Express's window setup dialog, set the window name to something known,
like "NTPRINTER" or some such.  The following example assumes this:

(Assuming you're using vb)

Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal
lpClassName As String, ByVal lpWindowName As String) As Long
Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal
hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As
Long
'
Public Const WM_CLOSE = &H10
'

Private Sub EndProgram()
Dim wHandle&
Dim lRetval&

wHandle = FindWindow(vbNullString, "NTPRINTER")
If wHandle <> 0 Then
   lRetval = SendMessage(wHandle, WM_CLOSE, 0, 0)
End If


End Sub

Now, if you screw around with the express toolkit and learn how to check data
queues, you could make this a service program, and have it read a dataqueue on 
the
400.  When it finds a value, it shuts the program down.  On the 400, you stuff 
the
data queue you're monitoring just before you execute the pwrdwnsys command.

I don't know if there's an exit point you can trap, but you could have a job 
running in a
subsystem that monitors for shutdown of the subsystem and stuffs the data queue
for you.

HTH,

--Chris

> > Subject: How to "programmatically" end "pcsws.exe"
> >
> > Hi everybody, I've been looking thru the archives and could not find
> > any thing related to following question: One of our NT Servers is
> > configured with a ClientAccess (Express, in our case) printer
> > session and works fine. The problem is: short before AS/400 will end
> > ( PWRDWNSYS ) we would like to "programatically" end the "pcsws.exe"
> > printer session. Obviously, I'm not talking of executing ENDPRTWTR
> > in the AS/400, since pcsws.exe will keep running in the PC. Not
> > either can relay on "programmed tasks" in the PC, since ending time
> > for AS/400 changes from day to day under certain circunstances. I am
> > thinking of some kind of  RUNRMTCMD or STRPCCMD stuff or the like
> > that we can send asking the NT to "kill" the pcsws.exe task... Any
> > idea how to build such an command ? Happy New Year to everybody in
> > this list ! ------------------------- Antonio Fernandez-Vicenti
> > afvaiv@wanadoo.es
> >