主题：[求助]字段转换名称

Dim dr As DataRow = DataTables("厂家发货通知").addnew
Dim r As DataRow = e.DataRow
Dim s As String() = r("规格").split("*","/")
If s.Contains("*") Then
End If
If s.Contains("/") Then
End If
dr("材质")=strs(0)
dr("规格")=strs(1)
dr("长度")=strs(2)
dr("车皮号")=r("车号")
dr("厂发数量")=r("件数")
dr("厂发重量")=r("吨位")
Dim nma() As String = {"到站","车号","件数","吨位"}
Dim nmb() As String = {"到站","车皮号","厂发数量","厂发重量"}

For i As Integer = 0 To nma.Length - 1
    dr(nmb(i)) = e.DataRow(nma(i))
Next

此主题相关图片如下：qq图片20140113162744.jpg

你这是连基础的IF判断都不会啊,衷心建议楼主先去看一下帮助,学习一下基础知识,你这样开发是搞不下去的.

谢谢！

请看12楼我给你发的代码.

.NET Framework 版本：2.0.50727.3053
Foxtable 版本：2013.10.14.1
错误所在事件：表，厂发货数量，BeforeSaveDataRow
详细错误信息：
调用的目标发生了异常。
试图用不正确的维数对数组操作。

此主题相关图片如下：qq图片20140113170413111.jpg

1、显示详细信息

2、详细信息会告诉你出错的事件代码，可以先用这个方法分析一下：

http://www.foxtable.com/help/topics/1485.htm

 

找出出错的代码是哪一行，基本上就知道原因了

如果还是搞不定，可以在论坛发帖，贴出代码，告诉我们是哪一行出错，错误提示是什么。

 

 

或者直接做个简单的例子发上来测试，告诉大家如何操作出错。

此主题相关图片如下：qq图片20140114095224.jpg

Dim dr As DataRow = DataTables("厂家发货通知").addnew
Dim r As DataRow = e.DataRow  '变量r为发生变化的行
Dim strs As String() = r("规格").split("*","/") '变量strs为行规格分割字符串的字符
If  r("规格").Contains("*") Then                 '行规格是*的字符串为真
    strs=r("规格").split("*")               'strs为行规格用*分割字符
End If
If  r("规格").Contains("/") Then      '行规格是一个/的字符串为真
    strs=r("规格").split("/")        'strs为行规格用 / 分割字符
End If
dr("材质")=strs(0)
dr("规格")=strs(1)
dr("长度")=strs(2)
dr("车皮号")=r("车号")
dr("厂发数量")=r("件数")
dr("厂发重量")=r("吨位")
Dim nma() As String = {"到站","车号","件数","吨位"}
Dim nmb() As String = {"到站","车皮号","厂发数量","厂发重量"}

For i As Integer = 0 To nma.Length - 1
    dr(nmb(i)) = e.DataRow(nma(i))
Next

 导入数据后保存出错，请帮助看看，谢谢！

e.datarow 要在指定的表事件里面才有的.  你连这些基础知识都没搞懂,别人怎么帮助你也是白搭. 你开发不下去的.

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:cs2.rar

小白改了半天没改好，请求帮改下，看到例子学习可少走弯路。谢谢！

.

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:cs22.rar