print intranet file

[itflash]

HI all

I am developing an Intranet and want to be able to print all files in a direcory on the sever to a network printer on the server.

The files could be of any type, DOC, XLS, PDF, TXT, etc.

I tried the following, but it didnt do anything. I didnt get an error, it just didnt appear anywhere.


sub printfile

set shApp = createobject("shell.application&quot
set shFolder = shApp.namespace("c:\testintranet\docs\&quot
set shItems = shFolder.Items()
for each shItem in shItems
shItem.invokeverb "&Print"
next

end sub


Xtra Info: I am on a WIN2K terminal Session and the Intranet is on a seperate WIN2K Server (not the terminal session one)



Thanks guys
ITFlash

 

[jonscott8]

The problem is MTL due to your configuration, specifically your use of terminal services (which is not one of my stronger areas).

This snippet works fine on the desktop, provided the Shell is up to date.

What OS are you running on your terminal server? Is IE installed on it? If so, what version? Jon Hawkins

 

[itflash]

Terminal Server is Win2K Advanced Server. We use IE6.
Active Desktop is enabled on my Session.

You mentioned the shell being up-to-date. How can I tell if this is so? Also, can you expand on the MTL?


Thanks for the reply!