title: How to make vbs message box "always on top"
body: <p>I came across one or two posts on this topic, such as:</p>
  
  <p><a href="https://stackoverflow.com/questions/11394432/create-vbscript-messagebox-that-stays-on-top-and-blocks-other-windows">Create vbscript messagebox that stays on top and blocks other windows</a></p>
  
  <p>but this doesn't seem to work with an 'if.. else' argument. Whenever I try to add anything of the like to the second line of my script, I get WSH VBScript compilation error messages.</p>
  
  <p>This is the script, and I am trying to make it remain visible above all other windows which open on the screen after it has appeared. Would appreciate help. Thanks,</p>
  
  <p>Martin</p>
  
  <pre><code>intAnswer = _
  Msgbox("           Do you want to run FS Earth?", _
      vbYesNo, " ")
  
  If intAnswer = vbYes Then
  
  Dim objShell
  Set objShell = WScript.CreateObject( "WScript.Shell" )
  objShell.Run("""D:\FS9\FS_Earth\fs_earth_link.exe""")
  Set objShell = Nothing
  
  Else    
  
  End If   
  </code></pre>