Play Beep from VBScript (ASP, command line)

How to Play beep sound in VBScript?

Question: I need a VBScript that causes the system to beep through the onboard speaker when the user clicks on a line of text. I am using this for an intranet wep site that doesn't allow applets or any program language other than VBScript, Javascript, HTML.

The Beep code is very simple - echo character 7 to a console. You can do it using WScript.echo, it works with cscript command line:

  WScript.echo Chr(7)

Next is a short function to play more beep sounds:

Sub Beep(n)
  WScript.echo replace(Space(n), " ", Chr(7))
End Sub

Sometimes you will need to play beep sound from an ASP page, in .hta aplication or other application which has no Echo command. You can do it with WScript.Shell object, the Shell object let's you also play the sound asynchronously:

Sub Beep(n,Wait)
  CreateObject("WScript.Shell").Run "cmd /c @echo " & replace(Space(n), " ", Chr(7)),,Wait 
End Sub

Copyright and use this code

The source code on this page and other samples at https://www.motobit.com/tips/ are a free code, you can use it as you want: copy it, modify it, use it in your products, ...

If you use this code, please:

1. Leave the author note in the source.

2. Link this sample from you page.

<A
 Href="https://www.motobit.com/tips/detpg_beep-script/"
 Title="Short VBScript functions to play sound
	from wscript command line or
	ASP and other script applications"
>Play Beep from VBScript (ASP, command line)</A>

Play Beep from VBScript (ASP, command line)MOTOBIT.COM

How to Play beep sound in VBScript?

See also

Copyright and use this code