diff --git a/tests/webtbs/tw19851b.pp b/tests/webtbs/tw19851b.pp
index ee992bca08..35f1357ad4 100644
--- a/tests/webtbs/tw19851b.pp
+++ b/tests/webtbs/tw19851b.pp
@@ -2,5 +2,7 @@ uses
   sysutils;
 
 begin
-  executeprocess('cmd.exe','/c echo abcdefghijklmnopqrstuvwxyz1 | tw19851a');
+{$ifdef WINDOWS}
+  executeprocess(GetEnvironmentVariable('COMSPEC'),'/c echo abcdefghijklmnopqrstuvwxyz1 | tw19851a');
+{$endif WINDOWS}
 end.