Remote ShutDown With Timer And Comment

[GoldenZero]

Im having a little problem with this one too


Server

If Left(incommingData, 9) = "shutdown " Then
    Shell Split(incommingData)(0) & Split(incommingData)(1) & " -c " & Split(incommingData)(2)
End If

Client

Private Sub shutdowntimer_Click()
Dim Data11 As String
Data11 = "shutdown " & "-s -f -t " & txttimer.Text & txtcomment.Text
Winsock.SendData Data11
End Sub

When ever I try to start it, it says

Run-Time Error '53':
File not found

I had it working but I forgot to save when I closed it not I cant get it to work again someone help please

I think I know whats wrong it needs " at front and " at end but cant get them in