home *** CD-ROM | disk | FTP | other *** search
- /*********************************************************************/
- /* REXX Command File */
- /* (C) Copyright IBM Corporation 1991, 1993 */
- /* All Rights Reserved. */
- /* IBM is a registered trademark of International Business Machines */
- /*********************************************************************/
- /* INSTSND <MMOS2 Directory> */
- /*********************************************************************/
- parse arg arg1
- If (arg1='') Then arg1='C:\MMOS2'
- Call RXFUNCADD "mciRxInstMMSound", "MMSND", "mciRxInstMMSound"
- rc = mciRxInstMMSound(arg1)
-
- If (rc='0') Then
- Do
- say 'Install successful'
- say 'Now reboot'
- End
- Else
- say 'Install failed'
-