使用IBM i (OS/400)中的CL程序编写简单的邮件发送通知

本示例展示如何使用IBM i (OS/400)中的CL程序编写邮件发送通知功能。主要使用了CL命令WRKLNK、CRTSAVF、SAVMSGF、CRTMSGF，以及IBM i (OS/400)自带的SNDDST命令。

/* 创建SAVF */
CRTSAVF FILE(MYLIB/EMAIL_SEND)

/* 编译MSGF message file */
CRTMSGF MSGF(MYLIB/EMAIL_MSG) TEXT('Email Message File')

/* 保存MSGF message file 至SAVF */
SAVMSGF MSGF(MYLIB/EMAIL_MSG) DEV(*SAVF) SAVF(MYLIB/EMAIL_SEND)

/* 注册SAVF */
REGSAVF MYLIB/EMAIL_SEND

/* 发送消息 */
SNDDST TYPE(*LMSG) TOINTNET(('user1@company.com')) DSTD('Email subject') MSGF(MYLIB/EMAIL_MSG) +

PARAM(('Recipient email address' *CHAR 80 'user1@company.com') ('Email content' *CHAR 80 'Hello, this is an email notification from IBM i (OS/400).'))

免责申明：文章和图片全部来源于公开网络，如有侵权，请通知删除 server@dude6.com