Need help with shell

[jav0]

I have been unsucessful in making this work.. I have to be really close.. Please tell me where I've messed up..

Thanks..

Private Sub Command1_Click()
Dim srvname As String
srvname = txtServer.Text
Shell "c:\winnt\system32\ping" & srvname & "
>c:\temp\testping10.txt"
End Sub

Thanks again for your help

 

[ngagne]

I believe that Shell() requires a return variable like this

Dim iReturnValue As String
iReturnValue = Shell("c:\winnt\system32\ping " & srvname & " >c:\temp\testping10.txt&quot

I also added spaces in your commands...
Nate Gagne
ngagne@numa-inc.com

Like my post? Let me know it was helpful!