zoukankan      html  css  js  c++  java
  • Smail邮件客户端脚本源码-按键精灵源码








    这么多代码,直接附上按键精灵源码例程吧
    点击此处下载Smail邮件客户端脚本源码例程 //初始化 Dim 你的邮箱帐号 Dim 你的邮箱密码 Dim 发送邮件地址 Dim 邮件主题 Dim 邮件内容 Dim 邮件附件 //发送按钮 Event Smail.Button_send.Click 你的邮箱帐号 = Smail.InputBox_user.Text 你的邮箱密码 = Smail.InputBox_password.Text 发送邮件地址 = Smail.InputBox_to.Text 邮件主题 = Smail.InputBox_q.Text 邮件内容 = Smail.InputBox_body.Text 邮件附件 = Smail.BrowseBox_f.Path If 你的邮箱帐号 = "" or 你的邮箱密码 = "" or 发送邮件地址 = "" Then MsgBox "请将邮件填写完整",vbExclamation Else 返回值 = Lib.网络.发送邮件(你的邮箱帐号,你的邮箱密码,发送邮件地址,邮件主题,邮件内容,邮件附件) If 返回值 = TRUE Then MsgBox "邮件发送成功",vbInformation Else MsgBox "邮件发送失败",vbQuestion End If End If End Event //重置 按钮 Event Smail.Button_reset.Click Smail.InputBox_user.Text = "邮箱账号" Smail.InputBox_password.Text = "邮箱密码" Smail.InputBox_to.Text = "" Smail.InputBox_q.Text = "" Smail.InputBox_body.Text = "" Smail.BrowseBox_f.Path = "" Smail.InputBox_password.PasswordChar = false End Event //定时器 Event Smail.Timer1.Timer Smail.Timer1.Enabled = false Smail.InputBox_time.Text = Date + Time Smail.Timer1.Enabled = True End Event //解密载入时 Event Smail.Load Smail.Timer1.Enabled = false Smail.Timer1.Interval = 1000 Smail.Timer1.Enabled = True End Event //账号 焦点 Event Smail.InputBox_user.GotFocus If Smail.InputBox_user.Text = "邮箱账号" then Smail.InputBox_user.Text = "" End If End Event Event Smail.InputBox_user.LostFocus If Smail.InputBox_user.Text = "" then Smail.InputBox_user.Text = "邮箱账号" End If End Event //密码 焦点 Event Smail.InputBox_password.GotFocus If Smail.InputBox_password.Text = "邮箱密码" then Smail.InputBox_password.Text = "" Smail.InputBox_password.PasswordChar = True End If End Event Event Smail.InputBox_password.LostFocus If Smail.InputBox_password.Text = "" then Smail.InputBox_password.Text = "邮箱密码" Smail.InputBox_password.PasswordChar = false End If End Event
  • 相关阅读:
    61. 最长不含重复字符的子字符串
    60. 礼物的最大价值 (未理解)
    59. 把数字翻译成字符串
    58. 把数组排成最小的数
    57. 数字序列中某一位的数字 (不懂)
    spring data jpa 官方文档
    idea 编译报错 源发行版 1.8 需要目标发行版 1.8
    idea maven 依赖报错 invalid classes root
    solr
    spring boot 官方文档
  • 原文地址:https://www.cnblogs.com/xiazai/p/9651999.html
Copyright © 2011-2022 走看看