Office中国论坛/Access中国论坛

标题: 关于“选择唯一的记录标识符”的问题 [打印本页]
作者: 真主    时间: 2013-2-19 10:33
标题: 关于“选择唯一的记录标识符”的问题
我在SQL中建了一些视图，在access通过VBA重链接表时，系统会跳出选择唯一的记录标识符的窗体让手工选择，请问能不能通过代码自动选择第一个，我的重链接代码如下（因为有些表的特殊性，所以视图无法建索引视图）：
  1. Dim i As Integer
  2. Dim j As String
  3. Dim k As Integer
  4. k = DFirst("[A001_ZJLX]", "A_AA_A006")
  5. For i = 1 To k
  6. j = DLookup("BM", "A_AA_A001", "BMNO =" & i)
  7.     On Error GoTo fb:
  8.    DoCmd.DeleteObject acTable, j
  9.     On Error GoTo fb:
  10. fb:
  11. DoCmd.TransferDatabase acLink, "ODBC", _
  12.     "ODBC;DRIVER=SQL Server;SERVER=" & E_Co_ServerIP & ";UID=" & E_Co_user & ";PWD=" & E_Co_password & ";LANGUAGE=us_english;" & "DATABASE=" & E_Co_KM & "", acTable, j, j, True
  13. Next i

  15.     MsgBox "数据表更新成功,系统将进入登录画面!", vbInformation + vbOKOnly, Erp_提示
  16.     DoCmd.OpenForm "C_AA_Login"
  17.     'DoCmd.Close acForm, Me.Name


  20. On Error GoTo Err_CmdLink_Click_Click
  21. Exit_CmdLink_Click_Click:
  22.     Exit Sub
  23. Err_CmdLink_Click_Click:
  24.     MsgBox Err.Description
  25.     Resume Exit_CmdLink_Click_Click
复制代码
作者: tmtony    时间: 2013-2-19 10:39
所有表建立主键即可. 有主键即不会提示
作者: 真主    时间: 2013-2-19 10:41
本帖最后由 真主 于 2013-2-19 10:44 编辑
tmtony 发表于 2013-2-19 10:39
所有表建立主键即可. 有主键即不会提示


视图无法建立主键
作者: tmtony    时间: 2013-2-19 11:01
表有主键, 相关的视图就有主键了
作者: 真主    时间: 2013-2-19 11:31
本帖最后由 真主 于 2013-2-19 11:38 编辑
tmtony 发表于 2013-2-19 11:01
表有主键, 相关的视图就有主键了


不行，表有主键，建的视图也还是会没有，要手工选择
作者: tmtony    时间: 2013-2-19 12:27
你的视图有否包含这个表的主键字段 ,把它加进去
作者: 真主    时间: 2013-2-19 12:50
tmtony 发表于 2013-2-19 12:27
你的视图有否包含这个表的主键字段 ,把它加进去

包含了，但链接时还是提示
作者: tmtony    时间: 2013-2-20 12:34
应该不会啊.



欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3