Can you just redirect the output?  I don't know VB, but I'm thinking it
should work:

Private Sub Command1_Click()
    x = Shell("C:\Progra~1\IBM\ADSM\saclient\DSMADMC.EXE -id=admin -pa=x q
fi > c:\cmdout.txt")
End Sub

Nick Cassimatis
[EMAIL PROTECTED]

"I'm one cookie away from happy." - Snoopy (Charles Schulz)

Reply via email to