Foxtable(狐表) → 用户栏目 → 专家坐堂 → 导入出错：增加行失败，父表无有效行！


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

主题：导入出错：增加行失败，父表无有效行！
帅哥哟，离线，有人找我吗？
sbfqpidt
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：128 积分：1592 威望：0 精华：0 注册：2013/7/8 11:51:00 		导入出错：增加行失败，父表无有效行！  发帖心情 Post By：2013/10/16 20:02:00 [显示全部帖子]

请教高手：
     导入出错：增加行失败，父表无有效行！
     帮忙指点，我的错在哪儿？
     谢谢！
 回到顶部
帅哥哟，离线，有人找我吗？
sbfqpidt
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：128 积分：1592 威望：0 精华：0 注册：2013/7/8 11:51:00 		  发帖心情 Post By：2013/10/16 20:05:00 [显示全部帖子]

请教高手：
     导入出错：增加行失败，父表无有效行！
     帮忙指点，我的错在哪儿？
     谢谢！
 回到顶部
帅哥哟，离线，有人找我吗？
sbfqpidt
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：128 积分：1592 威望：0 精华：0 注册：2013/7/8 11:51:00 		  发帖心情 Post By：2013/10/16 20:12:00 [显示全部帖子]

For Each r1 As Row In Tables("出库导入_订单明细表").GetCheckedRows
    Dim r2 As Row = Tables("出库主表.出库明细表").AddNew
    r2("订单号") = r1("订单号")
    r2("物料编号") = r1("物料编号")
   r2("未交数量") = r1("未交数量")
    r2("实交数量") = r1("未交数量")
 
Next

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


加好友 发短信
等级：幼狐 帖子：128 积分：1592 威望：0 精华：0 注册：2013/7/8 11:51:00 		我上传的附件，怎么看不到？  发帖心情 Post By：2013/10/16 20:13:00 [显示全部帖子]

我上传的附件，怎么看不到？

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


加好友 发短信
等级：幼狐 帖子：128 积分：1592 威望：0 精华：0 注册：2013/7/8 11:51:00 		  发帖心情 Post By：2013/10/16 20:51:00 [显示全部帖子]

确实是父表没有数据，增加了，就没事了!谢谢！

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


加好友 发短信
等级：幼狐 帖子：128 积分：1592 威望：0 精华：0 注册：2013/7/8 11:51:00 		  发帖心情 Post By：2013/10/16 21:19:00 [显示全部帖子]


增加一个判断，就会避免报错了：


If Tables("出库主表").Rows.Count <= 0 Then
    MessageBox.Show("出库主表无数据!请增加出库主表内容!")
    Return
    
Else
    Forms("出库导入").Open
    
    
    
End If
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05273 秒, 5 次数据查询