Shell does not work in windows server 2008 and 2003 for openfile command bat files

I am running a bat file in my vb6 code as shown below .GetOpenFileList is a variable having path of bat file.

Shell(Chr(34) & GetOpenFileList & Chr(34), vbMaximizedFocus)

The bat file content is

openfiles /query /FO CSV >> D:\OpenFileList.txt

It works properly in windows xp professional, but does not work in windows server 2008 and windows server 2003

But if run the bat file manually by double clicking on it then it works fine in windows server 2008 and windows server 2003.

So what is error in my vb6 code which causes it to fail.Also file D:\OpenFileList.txt does not contain any contents in the error case.

(before i posted question here which was not actual problem so i created new thread here)