为 了 得 到 反 馈, 我 们 在 设 计 主 页 时 经 常 将 自 己 的email 地 址 嵌 在 主 页 上 以 便 读 者 与 我 们 联 系。 其 中 最 普 遍 的 作 法 是 利 用Html 语 言 加 上: Feedback to Author! 这 样 作 的 缺 点 是 无 论 读 者 使 用 的 是Internet EXPlorer 还 是Netscape Navigator, 在 点 击 作 者 地 址 时 都 需 另 打 开 一 个 写 作 窗 口, 使 主 页 窗 口 被 覆 盖。 这 样 读 者 在 写 信 时 看 不 到 原 文 的 内 容 也 不 易 进 行 引 用。 笔 者 设 计 了 一 个Java APPLET 可 嵌 在 主 页 上, 解 决 了 这 个 问 题, 同 时 使 没 有email 地 址 的 人 也 可 反 馈 信 息。 源 程 序 如 下: import java.awt.*; import java.applet.*; import java.net.*; import java.io.*; public class Javamail extends Applet { private int SMTP_PORT = 25; //邮件服务器缺省端口号 private String appletSource = "202.99.96.140"; //作者邮件服务器IP private TextArea MsgArea; private TextField senderField, recipientField, hostField; public void init() { setLayout(new BorderLayout()); Panel fields = new Panel(); fields.setLayout(new GridLayout(3, 1)); Panel recPanel = new Panel(); recPanel.setLayout(new GridLayout(2, 1)); recPanel.add(new Label("Recipient")); recipientField = new TextField("zffan"); // 作 者 邮 件 服 务 器 用 户 名 recPanel.add(recipientField); fields.add(recPanel); Panel sendPanel = new Panel(); sendPanel.setLayout(new GridLayout(2, 1)); sendPanel.add(new Label("Sender")); senderField = new TextField("Your Name"); // 由 读 者 填 其 用 户 名 sendPanel.add(senderField); fields.add(sendPanel); Panel hostPanel = new Panel(); hostPanel.setLayout(new GridLayout(2, 1)); hostPanel.add(new Label("Host")); hostField = new TextField("YourCompany.com"); // 由 读 者 填 其 邮 件 服 务 器IP hostPanel.add(hostField); fields.add(hostPanel); add("North", fields); MsgArea = new TextArea(); add("Center", MsgArea); add("South", new Button("SEND")); } public boolean handleEvent(Event e) { if (e.id == Event.WINDOW_DESTROY) System.exit(0); return super.handleEvent(e); } public boolean action(Event e, Object arg) { if (arg.equals("SEND")) sendMsg(senderField.getText(), recipientField.getText(), hostField.getText()); else return super.action(e, arg); return true; } private void sendMsg(String sender, String recipient, String senderHost) { try { // 与 邮 件 服 务 器 通 信 Socket s = new Socket(appletSource, SMTP_PORT); PrintStream out = new PrintStream(s.getOutputStream()); MsgArea.selectAll(); out.println("HELO " + senderHost); //邮件服务器不认证读者所输SMTP是否正确 out.println("MAIL FROM: " + sender); out.println("RCPT TO: " + recipient); out.println("DATA"); out.println(MsgArea.getSelectedText()); out.println("."); out.println("QUIT"); } catch(Exception e) { System.out.println("Error " + e); } } } //Javamail 以 上 程 序 在Win95, JDK1.1.2, Hotjava Browser 1.0 环 境 下 调 试 通 过。 有 兴 趣 的 读 者 还 可 加 上 与SMTP 服 务 器 通 信 时 的 出 错 例 程。
|