inputbox.ws

来自「javascript source code part2」· WS 代码 · 共 18 行

<?xml version="1.0" standalone="yes"?>
<job>
   <script language="VBScript">
      <![CDATA[
         Function ShowInputBox(str)
            ShowInputBox = InputBox(str)
         End Function
      ]]>
   </script>
   <script language="JScript">
      <![CDATA[
         var sMsg = "hello from a VBS InputBox";
         var sInput = ShowInputBox(sMsg);
         WScript.Echo(sInput);
      ]]>
   </script>
</job>