home *** CD-ROM | disk | FTP | other *** search
/ GCW Games & More & Wacky Windows Companion / gcw.iso / win / util / tlxwin / scripts / logoname.slt < prev    next >
Text File  |  1994-10-13  |  607b  |  18 lines

  1. // LOGONAME.SLT
  2. // 
  3. // Demo script to send the currently connected dialing
  4. // directory entry's logon name to the remote.
  5.  
  6. main()
  7. {
  8.     if (_entry_logonName)    // make sure name has been
  9.                              // defined for this entry and
  10.                              // that an entry has been 
  11.     {                        // connected to.
  12.         cPutS(_entry_logonName);  // send the name
  13.         cNewLine;                 // and a carriage return
  14.     }    
  15.     else                     // else show error box for 4 seconds
  16.         status_wind("No logon name available!",40); 
  17. }
  18.