Change port on TS printer with VBScript

[cygnuskaltora]

I have a PXES thin client setup on an old machine with no hard drive. I have a printer setup on the Terminal Server that is using the TS### port to print. This works great, print output comes from the printer with no issues. Here's the problem: When I log out of the terminal server session and log back in again, it creates a new TS### port (where ### is the terminal server session number.) I need to then manually set the printer to use the new port. Is there a way that I can script this? I have a script that will give me the client name, but not the session ID. I'm assuming I'll need both.