home *** CD-ROM | disk | FTP | other *** search
- /* This arexx script dials a phone number if a modem is connected*/
- GETDBFORMFIELD
-
- ADDRESS twist
- PARSE ARG dbfilename,rela_x,rela_y,shiftkeys
- OPEN dbfilename
- options results
- GETDBFORMMODE
-
- GETDBFORMFIELD "telhome"
- number = "atdt" || result
- open('outfile','SER:','W')
- writeln('outfile',number)
- exit
-