| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 增加表后的错误 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=135718) |
|
| -- 作者：mxl810823 -- 发布时间：2019/6/1 16:03:00 -- 增加表后的错误 我用的是高级开发版2018，一直用没有问题，在给后台增加表后运行会出现如下错误，删除表后又不会出现了 .NET Framework 版本：2.0.50727.8806 Foxtable 版本：2018.10.9.1 错误所在事件： 详细错误信息： 至少一个参数没有被指定值。 现在找不到原因啊，为什么？？是后台表太多了吗？？？还是？？？ |
|
| -- 作者：有点蓝 -- 发布时间：2019/6/1 16:30:00 -- 增加表的时候有问题？还是增加表后使用有问题？ 项目事件都写了什么代码？
|
|
| -- 作者：mxl810823 -- 发布时间：2019/6/1 17:32:00 -- 增加表后使用有问题 项目事件我也查了，我就在项目“加载“ 里设有事件。 没发现问题。好像跟项目事件也没关系吧 因为我是自己做的登录窗口，密码与用户全对了，再进入一个“欢迎窗口”。 到这里所有项目事件都完成了呀 ”欢迎窗口“里有一个按钮如下代码 MainTable = Tables("出勤表") forms("出勤表").show() forms("欢迎").close() 增加表前运行正常，增加表后再打开然后按这个按钮就会出现错误 删除新增的表后再运行又正常了 |
|
| -- 作者：有点蓝 -- 发布时间：2019/6/1 17:42:00 -- 1、把所有项目事件贴出来 99.9%的程序员都不会认为自己的代码有问题的，所以还是贴出来给别人看吧 2、"出勤表"和"欢迎"窗口afterload有什么代码？
|
|
| -- 作者：mxl810823 -- 发布时间：2019/6/1 18:24:00 -- 项目事件 1、beforeloadoutertable Select Case e.DataTableName Case "FTYNG项","PPMNG项" e.Cancel = True \'打开项目的时候不加载此表 End Select 2、initialize For Each dt As DataTable In DataTables dt.GlobalHandler.drawcell = True dt.GlobalHandler.afterload = True dt.GlobalHandler.keydownedit = True Next vars("dljs") = 0 \'用户登录记数 3、afteropenproject Dim MainTab As C1Command.C1DockingTab = BaseMainform.Controls("MainPages") For Each p As object In MainTab.TabPages Dim FormTab As C1Command.C1DockingTab = p.controls(0) AddHandler Formtab.SelectedIndexChanging, AddressOf C1DockingTab2_SelectedIndexChanging Next LockBaseMainForm() \'锁定主界面 vars("uadd") = 0 \'清除增加用户标记 vars("tyh") = 0 \'标志要添加用户 vars("urea") = 0 \'标志用户更改 vars("doux") = 0 \'标志出勤表双击更改 vars("xgg") = 0 \'标志出勤表更改 \'Tablecaptionvisible = False \'隐藏表标题 Forms("用户登录窗口").open() Tables("出勤表").Sort = "日期 desc" Dim t As Date = Date.now Dim n As Integer = DataTables("出勤表").DataRows.count Dim cr As DataRow Dim nas As String() = {"工号","姓名","一级部门","二级部门","三级部门","班别"} If n < 1 Then For Each yr As DataRow In DataTables("员工信息表").DataRows cr = DataTables("出勤表").addnew() For Each na As String In nas cr(na) = yr(na) cr("日期") = Date.Today Next Next DataTables("出勤表").Save() DataTables("出勤表").Save() With DataTables("出勤表") .LoadFilter = "[日期] > #" & Date.Today.adddays(-2) & "# and [日期] <= #" & Date.Today & "#" .Load() End With If t > Date.Today.addhours(10) Then Tables("出勤表").Sort = "日期 desc,工号" Else Tables("出勤表").Sort = "日期,工号" End If With Tables("出勤表") Dim qjn As Integer = Tables("出勤表").Rows.count .position = 0 For qji As Integer = 0 To qjn - 1 .Rows(qji).locked = True Next End With Else Dim nr As Row = Tables("出勤表").Rows(0) If nr("日期") < Date.Today Then For Each yr As DataRow In DataTables("员工信息表").DataRows cr = DataTables("出勤表").addnew() For Each na As String In nas cr(na) = yr(na) cr("日期") = Date.Today Next Next DataTables("出勤表").Save() DataTables("出勤表").Save() End If With DataTables("出勤表") .LoadFilter = "[日期] > #" & Date.Today.adddays(-2) & "# and [日期] <= #" & Date.Today & "#" .Load() End With If t > Date.Today.addhours(10) Then Tables("出勤表").Sort = "日期 desc,工号" Else Tables("出勤表").Sort = "日期,工号" End If With Tables("出勤表") Dim qjn As Integer = Tables("出勤表").Rows.count If qjn > 1 Then .position = 0 For qji As Integer = 0 To qjn - 1 .Rows(qji).locked = True Next End If End With End If UnLockBaseMainForm() \'解锁主界面 4、beforecloseproject Dim r As DataRow = DataTables("user").sqlfind("工号 = \'" & uid & "\'") If r IsNot Nothing Then r("已登录") = "" r.save() End If |
|
| -- 作者：mxl810823 -- 发布时间：2019/6/1 18:25:00 -- 全局表事件 1、keydownedit If e.Col.IsDate Then If e.KeyCode = Keys.enter Then Dim s As String = e.text If s.length = 2 Then Dim y As Integer = Date.Today.year Dim m As Integer = Date.Today.month Dim d As Integer = val(s) Dim ds As Integer = Date.daysinmonth(y,m) If d > ds OrElse d = 0 Then MessageBox.Show("当前输入天数大于本月最大天数或为零,输入无效") Return Else Dim de As Date = new Date(y,m,d) e.text = "" & de & "" End If End If If s.length = 5 Then Dim y As Integer = Date.Today.year Dim m As Integer = val(s.Substring(0,2)) Dim d As Integer = val(s.Substring(2,2)) If m > 12 OrElse m = 0 Then MessageBox.Show("当前输入月份不是有效月份,输入无效") Return Else Dim ds As Integer = Date.daysinmonth(y,m) If d > ds OrElse d = 0 Then MessageBox.Show("当前输入天数大于月份最大天数或为零,输入无效") Return Else Dim de As Date = new Date(y,m,d) e.text = "" & de & "" End If End If End If End If End If 2、drawcell Select Case e.Table.name Case "质量异常报告","品质反馈" If e.Row.locked = False Then e.style = "n" If e.Row(e.Col.Name) <> e.Row.DataRow.OriginalValue(e.Col.Name) Then e.Style = "m" End If End If Case Else If e.Row.locked = False Then If e.Col.allowedit = True Then e.style = "n" End If If e.Row(e.Col.Name) <> e.Row.DataRow.OriginalValue(e.Col.Name) Then e.Style = "m" End If End If If val(e.Row(e.Col.Name)) < 0 Then e.Style = "b" End If End Select 3、afterload For Each r As Row In Tables("" & e.DataTable.name & "").Rows r.locked = True Next ”出勤表“ afterload 事件 If Forms("出勤表").opened Then Forms("出勤表").Controls("hs").value = Tables("出勤表").rows.count For i As Integer = 0 To Tables("" & e.DataTable.name & "").Cols.count-1 Dim c As String = Tables("" & e.DataTable.name & "").Cols(i).name Select Case c Case "班次","正常出勤","有薪假","事假","平时加班","周末加班","法定加班","班别","补差项" Tables("" & e.DataTable.name & "").Cols(c).allowedit = True Case Else Tables("" & e.DataTable.name & "").Cols(c).allowedit = False End Select Next End If |
|
| -- 作者：mxl810823 -- 发布时间：2019/6/1 22:32:00 -- 现在试了，如果把事件改为如下，即初始不加载表“bbb”,也不会报错 “bbb”为新增加的表
|
|
| -- 作者：有点甜 -- 发布时间：2019/6/3 9:38:00 --
你删除【bbb】表，然后重新引入bbb表测试
http://www.foxtable.com/webhelp/scr/1820.htm
|
|
| -- 作者：mxl810823 -- 发布时间：2019/6/3 10:30:00 -- 在外部表设置中删除表“bbb”是不再有错误提示了，但是在外部表设置中再增加表“bbb”再打开项目就会有同样错误提示 而且在删除表时还会有如下错误提示 应该还是我的程序有问题吧，因为现在我把十多天前的备份提出来进行同样的操作“增加欢迎窗口，增加表bbb，重新打开项目，没有错误”，“在外部表设置中删除表“bbb”也没有错误”，只是从何查起啊？？十几天新增的程序有几百页了。 有关调用实时(JIT)调试而不是此对话框的详细信息， 请参见此消息的结尾。 ************** 异常文本 ************** System.Data.DeletedRowInaccessibleException: 不能通过已删除的行访问该行的信息。 在 System.Data.DataRow.GetDefaultRecord() 在 System.Data.DataRow.get_Item(String columnName) 在 Foxtable.DataTableCollection.o0_0__0_(String A_0) 在 Foxtable.DataTableCollection.o0_0__0_(String A_0, Boolean A_1) 在 Foxtable.o0O_0___.OO_o_0O_(Object A_0, EventArgs A_1) 在 System.Windows.Forms.Control.OnClick(EventArgs e) 在 System.Windows.Forms.Button.OnClick(EventArgs e) 在 System.Windows.Forms.Button.OnMouseUp(MouseEventArgs mevent) 在 System.Windows.Forms.Control.WmMouseUp(Message& m, MouseButtons button, Int32 clicks) 在 System.Windows.Forms.Control.WndProc(Message& m) 在 System.Windows.Forms.ButtonBase.WndProc(Message& m) 在 System.Windows.Forms.Button.WndProc(Message& m) 在 System.Windows.Forms.Control.ControlNativeWindow.OnMessage(Message& m) 在 System.Windows.Forms.Control.ControlNativeWindow.WndProc(Message& m) 在 System.Windows.Forms.NativeWindow.Callback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam) ************** 已加载的程序集 ************** mscorlib 程序集版本: 2.0.0.0 Win32 版本: 2.0.50727.8806 (QFE.050727-8800) 基本代码: file:///C:/Windows/Microsoft.NET/Framework/v2.0.50727/mscorlib.dll ---------------------------------------- Foxtable 程序集版本: 2018.10.9.1 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- Foxtable.Lib 程序集版本: 2018.2.18.1 Win32 版本: 2018.02.18.1 基本代码: file:///C:/foxtable/Development/Foxtable.Lib.DLL ---------------------------------------- System.Windows.Forms 程序集版本: 2.0.0.0 Win32 版本: 2.0.50727.5491 (Win7SP1GDR.050727-5400) 基本代码: file:///C:/Windows/assembly/GAC_MSIL/System.Windows.Forms/2.0.0.0__b77a5c561934e089/System.Windows.Forms.dll ---------------------------------------- System 程序集版本: 2.0.0.0 Win32 版本: 2.0.50727.8806 (QFE.050727-8800) 基本代码: file:///C:/Windows/assembly/GAC_MSIL/System/2.0.0.0__b77a5c561934e089/System.dll ---------------------------------------- System.Drawing 程序集版本: 2.0.0.0 Win32 版本: 2.0.50727.5495 (Win7SP1GDR.050727-5400) 基本代码: file:///C:/Windows/assembly/GAC_MSIL/System.Drawing/2.0.0.0__b03f5f7f11d50a3a/System.Drawing.dll ---------------------------------------- Microsoft.VisualBasic 程序集版本: 8.0.0.0 Win32 版本: 8.0.50727.5483 (Win7SP1GDR.050727-5400) 基本代码: file:///C:/Windows/assembly/GAC_MSIL/Microsoft.VisualBasic/8.0.0.0__b03f5f7f11d50a3a/Microsoft.VisualBasic.dll ---------------------------------------- System.Data 程序集版本: 2.0.0.0 Win32 版本: 2.0.50727.8762 (QFE.050727-8700) 基本代码: file:///C:/Windows/assembly/GAC_32/System.Data/2.0.0.0__b77a5c561934e089/System.Data.dll ---------------------------------------- System.Xml 程序集版本: 2.0.0.0 Win32 版本: 2.0.50727.8773 (QFE.050727-8700) 基本代码: file:///C:/Windows/assembly/GAC_MSIL/System.Xml/2.0.0.0__b77a5c561934e089/System.Xml.dll ---------------------------------------- System.Configuration 程序集版本: 2.0.0.0 Win32 版本: 2.0.50727.5483 (Win7SP1GDR.050727-5400) 基本代码: file:///C:/Windows/assembly/GAC_MSIL/System.Configuration/2.0.0.0__b03f5f7f11d50a3a/System.Configuration.dll ---------------------------------------- System.Management 程序集版本: 2.0.0.0 Win32 版本: 2.0.50727.8766 (QFE.050727-8700) 基本代码: file:///C:/Windows/assembly/GAC_MSIL/System.Management/2.0.0.0__b03f5f7f11d50a3a/System.Management.dll ---------------------------------------- C1.Win.C1Ribbon.2 程序集版本: 2.0.20161.147 Win32 版本: 2.0.20161.147 基本代码: file:///C:/foxtable/Development/C1.Win.C1Ribbon.2.DLL ---------------------------------------- Interop.JinDI_SmsComLib 程序集版本: 1.0.0.0 Win32 版本: 1.0.0.0 基本代码: file:///C:/foxtable/Development/Interop.JinDI_SmsComLib.DLL ---------------------------------------- C1.Win.C1Command.2 程序集版本: 2.0.20161.147 Win32 版本: 2.0.20161.147 基本代码: file:///C:/foxtable/Development/C1.Win.C1Command.2.DLL ---------------------------------------- mscorlib.resources 程序集版本: 2.0.0.0 Win32 版本: 2.0.50727.8806 (QFE.050727-8800) 基本代码: file:///C:/Windows/Microsoft.NET/Framework/v2.0.50727/mscorlib.dll ---------------------------------------- System.Transactions 程序集版本: 2.0.0.0 Win32 版本: 2.0.50727.5483 (Win7SP1GDR.050727-5400) 基本代码: file:///C:/Windows/assembly/GAC_32/System.Transactions/2.0.0.0__b77a5c561934e089/System.Transactions.dll ---------------------------------------- System.EnterpriseServices 程序集版本: 2.0.0.0 Win32 版本: 2.0.50727.5483 (Win7SP1GDR.050727-5400) 基本代码: file:///C:/Windows/assembly/GAC_32/System.EnterpriseServices/2.0.0.0__b03f5f7f11d50a3a/System.EnterpriseServices.dll ---------------------------------------- System.Design 程序集版本: 2.0.0.0 Win32 版本: 2.0.50727.5491 (Win7SP1GDR.050727-5400) 基本代码: file:///C:/Windows/assembly/GAC_MSIL/System.Design/2.0.0.0__b03f5f7f11d50a3a/System.Design.dll ---------------------------------------- Accessibility 程序集版本: 2.0.0.0 Win32 版本: 2.0.50727.5483 (Win7SP1GDR.050727-5400) 基本代码: file:///C:/Windows/assembly/GAC_MSIL/Accessibility/2.0.0.0__b03f5f7f11d50a3a/Accessibility.dll ---------------------------------------- C1.Win.C1FlexGrid.2 程序集版本: 2.0.20161.147 Win32 版本: 2.0.20161.147 基本代码: file:///C:/foxtable/Development/C1.Win.C1FlexGrid.2.DLL ---------------------------------------- TMS.Project 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- TMS.DataTable.AMVg4yziUIp3OZfj7 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- TMS.DataTable.A0Ai5oFPIHHyMZSJg 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- TMS.DataTable.AVK0RhfVjtOF2jcBK 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- TMS.DataTable.ABLV9LSUKGJBCB2li 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- TMS.DataTable.AFHvbbuUlQ7pUO4a6 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- TMS.DataTable.A15aU7PDlKqfVTuHv 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- TMS.DataTable.AhZHKSIDOIZvOcdZE 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- TMS.DataTable.A6HW511qILs325oBG 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- TMS.DataTable.AexjRyMPxRixjBAvI 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- TMS.DataTable.APm9jVK2vgFsSJgqE 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- TMS.DataTable.AxCtDSNubq4wJUmSr 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- TMS.DataTable.AkIjJlpckJ8p1KnRu 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- TMS.DataTable.A49FUm10gJvibGKW3 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- TMS.DataTable.Ao1eT8oJVpCAbYPqX 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- TMS.DataTable.AYBgCNchQWRj89dNr 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- TMS.DataTable.ALA9KIhBgEUrmrXZW 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- TMS.DataTable.Afv79WUkmTN29vCw7 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- TMS.DataTable.A20PyxI7g0TXjqSOp 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- Interop.MSScriptControl 程序集版本: 1.0.0.0 Win32 版本: 1.0.0.0 基本代码: file:///C:/foxtable/Development/Interop.MSScriptControl.DLL ---------------------------------------- TMS.Function 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- C1.Win.C1Input.2 程序集版本: 2.0.20161.147 Win32 版本: 2.0.20161.147 基本代码: file:///C:/foxtable/Development/C1.Win.C1Input.2.DLL ---------------------------------------- TMS.Ribbon 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- TMS.Public 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- TMS.Form.599a85cf 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- Neodynamic.WinControls.BarcodeProfessional 程序集版本: 6.0.2000.0 Win32 版本: 6.0.2000.15 基本代码: file:///C:/foxtable/Development/Neodynamic.WinControls.BarcodeProfessional.DLL ---------------------------------------- C1.Win.C1Chart.2 程序集版本: 2.0.20161.147 Win32 版本: 2.0.20161.147 基本代码: file:///C:/foxtable/Development/C1.Win.C1Chart.2.DLL ---------------------------------------- TMS.Form.576b0f21 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- TMS.Form.a4e7bbbc 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- System.Web 程序集版本: 2.0.0.0 Win32 版本: 2.0.50727.8762 (QFE.050727-8700) 基本代码: file:///C:/Windows/assembly/GAC_32/System.Web/2.0.0.0__b03f5f7f11d50a3a/System.Web.dll ---------------------------------------- Foxtable.Ribbon 程序集版本: 0.0.0.0 Win32 版本: 2018.10.09.1 基本代码: file:///C:/foxtable/Development/foxtable.exe ---------------------------------------- System.Data.resources 程序集版本: 2.0.0.0 Win32 版本: 2.0.50727.5459 (Win7SP1GDR.050727-5400) 基本代码: file:///C:/Windows/assembly/GAC_MSIL/System.Data.resources/2.0.0.0_zh-CHS_b77a5c561934e089/System.Data.resources.dll ---------------------------------------- System.Windows.Forms.resources 程序集版本: 2.0.0.0 Win32 版本: 2.0.50727.5420 (Win7SP1.050727-5400) 基本代码: file:///C:/Windows/assembly/GAC_MSIL/System.Windows.Forms.resources/2.0.0.0_zh-CHS_b77a5c561934e089/System.Windows.Forms.resources.dll ---------------------------------------- ************** JIT 调试 ************** 要启用实时(JIT)调试， 该应用程序或计算机的 .config 文件(machine.config)的 system.windows.forms 节中必须设置 jitDebugging 值。 编译应用程序时还必须启用 调试。 例如: <configuration> <system.windows.forms jitDebugging="true" /> </configuration> 启用 JIT 调试后，任何无法处理的异常 都将被发送到在此计算机上注册的 JIT 调试器， 而不是由此对话框处理。 |
|
| -- 作者：有点甜 -- 发布时间：2019/6/3 10:58:00 --
如果提示这个【至少一个参数没有被指定值】，就是说你查询的列不在你的表格里面。看看你执行的sql语句。
|