Foxtable(狐表)用户栏目专家坐堂 → 高速合并更新同主键记录无法更新?


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

主题:高速合并更新同主键记录无法更新?

帅哥哟,离线,有人找我吗?
weibu
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:641 积分:5194 威望:0 精华:0 注册:2018/5/19 22:27:00
高速合并更新同主键记录无法更新?  发帖心情 Post By:2018/8/2 11:09:00 [显示全部帖子]

做法如下:
1.在“外部数据表”定义外部数据并定义了主键序列名称
2.在SQLserver2008r2数据库中定义了主键序列名称与1相同;
3。执行此表高速合并,选择“更新同主键记录”,但导入后却没有比较主键,请问原因???

 回到顶部
帅哥哟,离线,有人找我吗?
weibu
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:641 积分:5194 威望:0 精华:0 注册:2018/5/19 22:27:00
  发帖心情 Post By:2018/8/2 11:26:00 [显示全部帖子]

只有数据库文件才行对吧。那如果是EXCL是否通过自己写代码可用实现比较主键?


 回到顶部
帅哥哟,离线,有人找我吗?
weibu
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:641 积分:5194 威望:0 精华:0 注册:2018/5/19 22:27:00
  发帖心情 Post By:2018/8/2 15:03:00 [显示全部帖子]

感谢超级版主!!!
刚刚我导入数据100万条的时候狐表直接崩溃了。有没有解决方案?

 回到顶部
帅哥哟,离线,有人找我吗?
weibu
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:641 积分:5194 威望:0 精华:0 注册:2018/5/19 22:27:00
  发帖心情 Post By:2018/8/2 18:10:00 [显示全部帖子]

真好,就是这个。
但是里面
“导出”:Dim ccbCols As WinForm.CheckedComboBox = e.Form.Controls("ccbCols")
If ccbCols.Text > "" Then
    Functions.Execute("ImportFromExecl",0,e.Form.Controls("ncbIndex").Value,e.Form.Controls("ncbLength").Value,ccbCols.Text.Split(","),False)
Else
    Functions.Execute("ImportFromExecl",0,e.Form.Controls("ncbIndex").Value,e.Form.Controls("ncbLength").Value,Nothing)
End If
writer导出”:Dim ccbCols As WinForm.CheckedComboBox = e.Form.Controls("ccbCols")
If ccbCols.Text > "" Then
    Functions.Execute("ExportToExecl",1,ccbCols.Text.Split(","),False)
Else
    Functions.Execute("ExportToExecl",1,Nothing)
End If
实际的功能区别是什么????
还有导入也一样,能否科普下

 回到顶部
帅哥哟,离线,有人找我吗?
weibu
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:641 积分:5194 威望:0 精华:0 注册:2018/5/19 22:27:00
  发帖心情 Post By:2018/8/2 21:25:00 [显示全部帖子]

“导出”与“writer导出”的区别?  “导入”与“Reader导入”的区别?
“导出”:Dim ccbCols As WinForm.CheckedComboBox = e.Form.Controls("ccbCols")
If ccbCols.Text > "" Then
    Functions.Execute("ImportFromExecl",0,e.Form.Controls("ncbIndex").Value,e.Form.Controls("ncbLength").Value,ccbCols.Text.Split(","),False)
Else
    Functions.Execute("ImportFromExecl",0,e.Form.Controls("ncbIndex").Value,e.Form.Controls("ncbLength").Value,Nothing)
End If
writer导出”:Dim ccbCols As WinForm.CheckedComboBox = e.Form.Controls("ccbCols")
If ccbCols.Text > "" Then
    Functions.Execute("ExportToExecl",1,ccbCols.Text.Split(","),False)
Else
    Functions.Execute("ExportToExecl",1,Nothing)
End If

 回到顶部
帅哥哟,离线,有人找我吗?
weibu
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:641 积分:5194 威望:0 精华:0 注册:2018/5/19 22:27:00
  发帖心情 Post By:2018/8/2 22:04:00 [显示全部帖子]

Dim ccbCols As WinForm.CheckedComboBox = e.Form.Controls("ccbCols")
If ccbCols.Text > "" Then
    Functions.Execute("ImportFromExecl",0,e.Form.Controls("ncbIndex").Value,e.Form.Controls("ncbLength").Value,ccbCols.Text.Split(","),False)
Else
    Functions.Execute("ImportFromExecl",0,e.Form.Controls("ncbIndex").Value,e.Form.Controls("ncbLength").Value,Nothing)
End If

这个里面的0变成1,功能上有什么区别?

 回到顶部
帅哥哟,离线,有人找我吗?
weibu
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:641 积分:5194 威望:0 精华:0 注册:2018/5/19 22:27:00
  发帖心情 Post By:2018/8/2 22:42:00 [显示全部帖子]

万分感谢!!
[此贴子已经被作者于2018/8/2 22:44:05编辑过]

 回到顶部