Foxtable(狐表) → 用户栏目 → 专家坐堂 → 自动生成表


  共有2201人关注过本帖树形打印复制链接

主题：自动生成表
帅哥哟，离线，有人找我吗？
kaituozhe
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2234 积分：15278 威望：0 精华：0 注册：2015/7/18 10:10:00 		自动生成表  发帖心情 Post By：2015/10/21 16:38:00 [只看该作者]

在表B第一列中有要生成表列标题的项目，在表A生成表，设计了一段代码一直提示错误，看一下是什么原因
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:练习.foxdb
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/10/21 16:53:00 [只看该作者]

If DataTables.Contains("资产负债表") Then
    DataTables.Unload("资产负债表")
    DataTables.Load("资产负债表")
End If

Dim Builder As New ADOXBuilder
Builder.Open() '打开ADOXBuilder
Dim Products As List(Of String)
Products = DataTables("项目列表").GetValues("资产负债表", "资产负债表 is not null")
For Each Product As String In Products
    With Builder.Tables("资产负债表")
       
        If DataTables("资产负债表").dataCols.Contains(Product) = False Then
            output.show(product)
            product = product.Replace(":", "_")
            .AddColumn( Product ,ADOXType.Double ) '增加整数型列
        End If
    End With
Next
Builder.Close() '关闭ADOXBuilder

If DataTables.Contains("资产负债表") Then
    DataTables.Unload("资产负债表")
    DataTables.Load("资产负债表")
End If
 回到顶部
帅哥哟，离线，有人找我吗？
kaituozhe
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2234 积分：15278 威望：0 精华：0 注册：2015/7/18 10:10:00 		  发帖心情 Post By：2015/10/21 16:59:00 [只看该作者]

还有一个问题，这样生成的表把顺序给打乱了，怎么能按项目原来的顺序生成表呢

 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/10/21 17:02:00 [只看该作者]

If DataTables.Contains("资产负债表") Then
    DataTables.Unload("资产负债表")
    DataTables.Load("资产负债表")
End If

Dim Builder As New ADOXBuilder
Builder.Open() '打开ADOXBuilder
Dim Products As List(Of String)
Products = DataTables("项目列表").GetValues("资产负债表", "资产负债表 is not null","_Sortkey")
For Each Product As String In Products
    With Builder.Tables("资产负债表")
       
        If DataTables("资产负债表").dataCols.Contains(Product) = False Then
            product = product.Replace(":", "_")
            .AddColumn( Product ,ADOXType.Double ) '增加整数型列
        End If
    End With
Next
Builder.Close() '关闭ADOXBuilder

If DataTables.Contains("资产负债表") Then
    DataTables.Unload("资产负债表")
    DataTables.Load("资产负债表")
End If
 回到顶部
帅哥哟，离线，有人找我吗？
kaituozhe
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2234 积分：15278 威望：0 精华：0 注册：2015/7/18 10:10:00 		  发帖心情 Post By：2015/10/21 17:38:00 [只看该作者]

奇怪呀，为什么在这个项目中可以了，我把相同的代码粘贴到另外一个项目中就不可以了呢，什么原因呀

 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/10/21 17:39:00 [只看该作者]

报什么错。

 回到顶部
帅哥哟，离线，有人找我吗？
kaituozhe
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2234 积分：15278 威望：0 精华：0 注册：2015/7/18 10:10:00 		  发帖心情 Post By：2015/10/21 17:41:00 [只看该作者]

应用程序中发生了无法处理的异常。如果单击继续，应用程序将忽略此错误并尝试继续。如果单击退出，应用程序将立即关闭，未将对象引用设置到对象的实现，
 回到顶部
帅哥哟，离线，有人找我吗？
kaituozhe
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2234 积分：15278 威望：0 精华：0 注册：2015/7/18 10:10:00 		  发帖心情 Post By：2015/10/21 17:47:00 [只看该作者]

有关调用实时(JIT)调试而不是此对话框的详细信息，
请参见此消息的结尾。

************** 异常文本 **************
System.NullReferenceException: 未将对象引用设置到对象的实例。
   在 Foxtable.frmShowErrorMessage..ctor(String msg, Exception ex)
   在 Foxtable.ooOO　　O　.o__O_0_O(Exception A_0, String A_1)
   在 Foxtable.O0　　OO　o.o　　O　O　　(Assembly A_0, String A_1, Object[] A_2, Boolean A_3, String A_4, Boolean A_5)
   在 Foxtable.WinForm.Form.o　oOo　　o(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)
   在 C1.Win.C1Input.C1Button.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.5485 (Win7SP1GDR.050727-5400)
    基本代码: file:///C:/Windows/Microsoft.NET/Framework/v2.0.50727/mscorlib.dll
----------------------------------------
Foxtable
    程序集版本: 2014.11.11.1
    Win32 版本: 2014.11.11.1
    基本代码: file:///E:/foxtable/开发版/foxtable.exe
----------------------------------------
Foxtable.Lib
    程序集版本: 2014.10.23.1
    Win32 版本: 2014.10.23.1
    基本代码: file:///E:/foxtable/开发版/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.5485 (Win7SP1GDR.050727-5400)
    基本代码: file:///C:/Windows/assembly/GAC_MSIL/System/2.0.0.0__b77a5c561934e089/System.dll
----------------------------------------
System.Drawing
    程序集版本: 2.0.0.0
    Win32 版本: 2.0.50727.5492 (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.5483 (Win7SP1GDR.050727-5400)
    基本代码: 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.5485 (Win7SP1GDR.050727-5400)
    基本代码: file:///C:/Windows/assembly/GAC_MSIL/System.Xml/2.0.0.0__b77a5c561934e089/System.Xml.dll
----------------------------------------
System.Management
    程序集版本: 2.0.0.0
    Win32 版本: 2.0.50727.5483 (Win7SP1GDR.050727-5400)
    基本代码: file:///C:/Windows/assembly/GAC_MSIL/System.Management/2.0.0.0__b03f5f7f11d50a3a/System.Management.dll
----------------------------------------
C1.Win.C1Ribbon.2
    程序集版本: 2.0.20102.279
    Win32 版本: 2.0.20102.279
    基本代码: file:///E:/foxtable/开发版/C1.Win.C1Ribbon.2.DLL
----------------------------------------
mscorlib.resources
    程序集版本: 2.0.0.0
    Win32 版本: 2.0.50727.5485 (Win7SP1GDR.050727-5400)
    基本代码: file:///C:/Windows/Microsoft.NET/Framework/v2.0.50727/mscorlib.dll
----------------------------------------
Interop.JinDI_SmsComLib
    程序集版本: 1.0.0.0
    Win32 版本: 1.0.0.0
    基本代码: file:///E:/foxtable/开发版/Interop.JinDI_SmsComLib.DLL
----------------------------------------
C1.Win.C1Command.2
    程序集版本: 2.0.20102.19458
    Win32 版本: 2.0.20102.19458
    基本代码: file:///E:/foxtable/开发版/C1.Win.C1Command.2.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.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
----------------------------------------
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.6.20102.554
    Win32 版本: 2.6.20102.554
    基本代码: file:///E:/foxtable/开发版/C1.Win.C1FlexGrid.2.DLL
----------------------------------------
Microsoft.VisualBasic.resources
    程序集版本: 8.0.0.0
    Win32 版本: 8.0.50727.5420 (Win7SP1.050727-5400)
    基本代码: file:///C:/Windows/assembly/GAC_MSIL/Microsoft.VisualBasic.resources/8.0.0.0_zh-CHS_b03f5f7f11d50a3a/Microsoft.VisualBasic.resources.dll
----------------------------------------
Foxtable.Blank
    程序集版本: 0.0.0.0
    Win32 版本: 2014.11.11.1
    基本代码: file:///E:/foxtable/开发版/foxtable.exe
----------------------------------------
Interop.MSScriptControl
    程序集版本: 1.0.0.0
    Win32 版本: 1.0.0.0
    基本代码: file:///E:/foxtable/开发版/Interop.MSScriptControl.DLL
----------------------------------------
C1.Win.C1Input.2
    程序集版本: 2.0.20102.33248
    Win32 版本: 2.0.20102.33248
    基本代码: file:///E:/foxtable/开发版/C1.Win.C1Input.2.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
----------------------------------------
Foxtable.Ribbon
    程序集版本: 0.0.0.0
    Win32 版本: 2014.11.11.1
    基本代码: file:///E:/foxtable/开发版/foxtable.exe
----------------------------------------
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
----------------------------------------
System.Web
    程序集版本: 2.0.0.0
    Win32 版本: 2.0.50727.5483 (Win7SP1GDR.050727-5400)
    基本代码: file:///C:/Windows/assembly/GAC_32/System.Web/2.0.0.0__b03f5f7f11d50a3a/System.Web.dll
----------------------------------------
Foxtable.Blank
    程序集版本: 0.0.0.0
    Win32 版本: 2014.11.11.1
    基本代码: file:///E:/foxtable/开发版/foxtable.exe
----------------------------------------
预算管理.DataTable.Ar8xsYDSUI3NU7Mso
    程序集版本: 0.0.0.0
    Win32 版本: 2014.11.11.1
    基本代码: file:///E:/foxtable/开发版/foxtable.exe
----------------------------------------
预算管理.DataTable.AVpWiP9K3EBVYZCtp
    程序集版本: 0.0.0.0
    Win32 版本: 2014.11.11.1
    基本代码: file:///E:/foxtable/开发版/foxtable.exe
----------------------------------------
预算管理.DataTable.AmFEhUxEIg8ILY7Hb
    程序集版本: 0.0.0.0
    Win32 版本: 2014.11.11.1
    基本代码: file:///E:/foxtable/开发版/foxtable.exe
----------------------------------------
预算管理.DataTable.A5UglCdI00zZKOlYG
    程序集版本: 0.0.0.0
    Win32 版本: 2014.11.11.1
    基本代码: file:///E:/foxtable/开发版/foxtable.exe
----------------------------------------
预算管理.DataTable.AR7EklX4xWWIHCCVB
    程序集版本: 0.0.0.0
    Win32 版本: 2014.11.11.1
    基本代码: file:///E:/foxtable/开发版/foxtable.exe
----------------------------------------
预算管理.DataTable.AxHVMMmW3hGTlB6MY
    程序集版本: 0.0.0.0
    Win32 版本: 2014.11.11.1
    基本代码: file:///E:/foxtable/开发版/foxtable.exe
----------------------------------------
预算管理.DataTable.Ac82GhFZ3R1xBgFzE
    程序集版本: 0.0.0.0
    Win32 版本: 2014.11.11.1
    基本代码: file:///E:/foxtable/开发版/foxtable.exe
----------------------------------------
预算管理.DataTable.Aqk7PO9mHB88Ww4xq
    程序集版本: 0.0.0.0
    Win32 版本: 2014.11.11.1
    基本代码: file:///E:/foxtable/开发版/foxtable.exe
----------------------------------------
预算管理.Ribbon
    程序集版本: 0.0.0.0
    Win32 版本: 2014.11.11.1
    基本代码: file:///E:/foxtable/开发版/foxtable.exe
----------------------------------------
Neodynamic.WinControls.BarcodeProfessional
    程序集版本: 6.0.2000.0
    Win32 版本: 6.0.2000.15
    基本代码: file:///E:/foxtable/开发版/Neodynamic.WinControls.BarcodeProfessional.DLL
----------------------------------------
System.resources
    程序集版本: 2.0.0.0
    Win32 版本: 2.0.50727.5420 (Win7SP1.050727-5400)
    基本代码: file:///C:/Windows/assembly/GAC_MSIL/System.resources/2.0.0.0_zh-CHS_b77a5c561934e089/System.resources.dll
----------------------------------------
预算管理.Form.f4e0feb6
    程序集版本: 0.0.0.0
    Win32 版本: 2014.11.11.1
    基本代码: file:///E:/foxtable/开发版/foxtable.exe
----------------------------------------
C1.Win.C1Chart.2
    程序集版本: 2.0.20102.20187
    Win32 版本: 2.0.20102.20187
    基本代码: file:///E:/foxtable/开发版/C1.Win.C1Chart.2.DLL
----------------------------------------

************** JIT 调试 **************
要启用实时(JIT)调试，
该应用程序或计算机的 .config 文件(machine.config)的 system.windows.forms 节中必须设置
jitDebugging 值。
编译应用程序时还必须启用
调试。

例如:

<configuration>
    <system.windows.forms jitDebugging="true" />
</configuration>

启用 JIT 调试后，任何无法处理的异常
都将被发送到在此计算机上注册的 JIT 调试器，
而不是由此对话框处理。

这是详细信息中显示的内容

 

 
 回到顶部
帅哥哟，离线，有人找我吗？
kaituozhe
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2234 积分：15278 威望：0 精华：0 注册：2015/7/18 10:10:00 		  发帖心情 Post By：2015/10/21 17:50:00 [只看该作者]

在我上传的例子中试了四个表，没有什么问题，把相同的格式、相同代码复制到另外一个项目中就不行了
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/10/21 17:52:00 [只看该作者]

外部数据源要加上数据源名字

 

Dim Builder As New ADOXBuilder("产品")
 回到顶部
总数 13 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04199 秒, 5 次数据查询