Foxtable(狐表)用户栏目专家坐堂 → [原创]发送邮件按钮代码问题,提示空值?


  共有5261人关注过本帖平板打印复制链接

主题:[原创]发送邮件按钮代码问题,提示空值?

帅哥哟,离线,有人找我吗?
fszyhzg
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:161 积分:1298 威望:0 精华:0 注册:2010/10/5 13:54:00
[原创]发送邮件按钮代码问题,提示空值?  发帖心情 Post By:2015/11/26 16:12:00 [只看该作者]

狐友们,我设计了一个发送邮件窗口(如图)

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20151126155203.png
图片点击可在新窗口打开查看
窗口中的发送按钮代码如下:
Dim cb1 As String = e.Form.Controls("combobox1").value
Dim cb2 As String = e.Form.Controls("combobox2").value
Dim tb2 As String = e.Form.Controls("textbox2").value
Dim tb3 As String = e.Form.Controls("textbox3").value
Dim tb4 As String = e.Form.Controls("textbox4").value
Dim m As New MailSender
m.Host = "mail.btte.net"
m.Account = "fsxmtidc"
m.Password = "*******"
m.From = "fsxmtidc@btte.net"
m.To = cb1
m.To = cb2
m.Title = tb2
m.Content = tb3
m.AddAttachments(tb4)
m.SendAsync()
请问如何防止提示空值,例如抄送文本框为空就提示了或者附件为空也提示空值错误,请问如何解决??

 回到顶部