1、内容列,如果扩展成文件列,那一定要设置它的存储路径(如果是局域网,必须设置在共享文件夹那里;如果是ftp,就必须设置成远程的方式)
2、代码这样写
Dim re As String = e.Form.Controls("CheckedComboBox1").Value '获得接收用户名
Dim cn As String = Tables("某表").Current("绑定FileManager的列")
If re = "" OrElse cn = "" Then
Return
End If
If re = User.Name Then
MessageBox.Show("不能给自己发信息!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
Return
End If
Dim r As Row = Tables("信息表").AddNew()
r("发送者") = User.Name
r("发送时间") = Date.Now
r("接收者") = re
r("内容") = cn
r.Save()