//-------------------------------------------------------------------
// ECLXfer::SendFile
//
// Send a file to a VM/CMS host with ASCII translation.
//-------------------------------------------------------------------
void Sample101() {
ECLXfer *Xfer; // Pointer to Xfer object
int Rc;
try {
Xfer = new ECLXfer('A'); // Create object for connection A
printf("Sending file...\n");
Rc = Xfer->SendFile("c:\\autoexec.bat", "autoexec bat a", "(ASCII CRLF QUIET");
switch (Rc) {
case 2:
printf("File transfer failed, error in parameters.\n", Rc);
break;
case 3:
printf("File transfer sucessfull.\n");
break;
case 4:
printf("File transfer sucessfull, some records were segmented.\n");
break;
case 5:
printf("File transfer failed, workstation file not found.\n");
break;
case 27:
printf("File transfer cancelled or timed out.\n");
break;
default:
printf("File transfer failed, code %u.\n", Rc);
break;
} // case
delete Xfer; // Delete Xfer object
}
catch (ECLErr Err) {
printf("ECL Error: %s\n", Err.GetMsgText());
}
} // end sample