- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- MailSsender怎么提取子表中的信息，最好可以像表格一样展示出来 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=21630)
-- 发布时间：2012/7/19 11:30:00
-- MailSsender怎么提取子表中的信息，最好可以像表格一样展示出来
父表提取子天的信息，通过邮件发送出去，最好能像表格一样展示。请各位仁兄指导。
-- 发布时间：2012/7/19 14:43:00
--
用GetChildRows可以取得父表某行数据在子表对应的行。
你要有具体的问题，别人才能具体的答案，泛泛而问，也只能泛泛而答。
-- 发布时间：2013/1/11 2:15:00
--
你好，主要就是想实现这个功能，父表一行发一封邮件，邮件内容中有一个表，把子表中的所有行的数据选取其中几列放入邮件中，然后发出去。
-- 发布时间：2013/1/11 8:53:00
--
mailSender不是可以发送任意内容么？
你自己去获取子表的内容，然后合并成一个文本内容，然后发送不就行了？
-- 发布时间：2013/1/11 10:22:00
--
还是简单弄一个。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.table |
-- 发布时间：2013/1/11 13:16:00
--
感谢你的指导，但我想问下，这个只能弄成一个防表格，如果表格内容中有些长有些短会变得很乱，没有办法弄成标准的表格吗
-- 发布时间：2013/1/11 14:32:00
--
发送html格式的邮件代码。你需要在 管理项目 -> 添加引用 那里引用一下System.Net.Dll
代码
Dim client As New System.Net.Mail.SmtpClient()
client.Host = "smtp.126.com"
client.Credentials = New System.Net.NetworkCredential("lin_hailun@126.com", "6849338.")
client.DeliveryMethod = System.Net.Mail.SmtpDeliveryMethod.Network
Dim message As New System.Net.Mail.MailMessage("lin_hailun@126.com", "spring.me@qq.com")
message.Subject = "主题测试"
message.BodyEncoding = System.Text.Encoding.UTF8
message.IsBodyHtml = True
Dim body As String = "<html><body><table border=\'1\'>单元格内容</table></body></html>"
Dim content As String = "<tr><th>第一列</th><th>第二列</th></tr>"
For Each dr As DataRow In Tables("表A").Current.DataRow.GetChildRows("表B")
content &= "<tr><td>" & dr("第二列") & "</td><td>" & dr("第三列") & "</td></tr>"
Next
message.Body = body.Replace("单元格内容", content)
Try
client.Send(message)
msgbox("发送成功")
Catch ex As Exception
msgbox("发送失败:" & ex.message)
End Try
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:邮件_发送html.zip |