home *** CD-ROM | disk | FTP | other *** search
/ PC Direkt 1995 #3 / PCD_395.iso / kommunik / wintelix / disk2 / tfw.5 / PASSWORD.SLT < prev    next >
Encoding:
Text File  |  1994-09-14  |  601 b   |  18 lines
  1. // PASSWORD.SLT
  2. // 
  3. // Demo script to send the currently connected dialing
  4. // directory entry's password to the remote.
  5.  
  6. main()
  7. {
  8.     if (_entry_pass)         // make sure password has been
  9.                              // defined for this entry and
  10.                              // that an entry has been 
  11.     {                        // connected to.
  12.         cPutS(_entry_pass);  // send the password
  13.         cNewLine;            // and a carriage return
  14.     }    
  15.     else                     // else show error box for 4 seconds
  16.         status_wind("No password available!",40); 
  17. }
  18.