- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 错误提示，怎么回事？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=141392)
-- 发布时间：2019/9/28 9:43:00
-- 错误提示，怎么回事？
.NET Framework 版本：4.0.30319.1
Foxtable 版本：2019.9.20.1
错误所在事件：窗口,登陆,TextBox2,KeyDown
详细错误信息：
This row has been removed from a table and does not have any data. BeginEdit() will allow creation of new data in this row.
TextBox2,KeyDown：
If e.KeyCode = Keys.Enter Then
Dim btt As WinForm.Button = e.Form.Controls("Button1")
btt.PerformClick()
e.Cancel = True
End If
Dim tx1 As WinForm.ComboBox = e.Form.Controls("ComboBox1")
Dim user As String=tx1.text
Dim sss As String=e.Form.Controls("ComboBox2").text
Dim dept As String=e.Form.Controls("ComboBox3").text
Dim tx2 As WinForm.TextBox = e.Form.Controls("TextBox2")
Dim pows As String=tx2.text
Dim dl As WinForm.Button = e.Form.Controls("Button1")
Dim dt As DataTable=DataTables("用户表")
Dim dr As DataRow
Button1：
此主题相关图片如下：qq图片20190928093928.png
此主题相关图片如下：qq图片20190928093928.pngIf user="" Then
MessageBox.show("请输入用户名称!","提示",MessageBoxButtons.OK,MessageBoxIcon.Error)
Return
Else
dr=dt.find("用户名称=\'" & user & "\'")
If dr IsNot Nothing Then
If pows=dr("密码") Then
PopMessage("登陆成功","提示",PopIconEnum.Infomation,1)
e.Form.Close
dr("登陆时间")=Date.Now
dr("登陆账套")=sss
dr.Save()
usna=user
pwsd = pows
dpt = dept
syscmd.project.open(ProjectFile,sss)
Return
Else
MessageBox.show("密码错误","提示")
Return
End If
Else
MessageBox.show("用户不存在!","提示")
Return
End If
End If
-- 发布时间：2019/9/28 9:58:00
--
1、更新到最新版本的Foxtable
2、上传具体实例测试