[求助]关于数据库前后台

sbsfhgl

我把数据库拆分了前后台，把前后复制到各相关电脑上，刷新了数据库链接器，找以相关后台，但问题来了

1。各相关电脑上分别显示，当前数据集不可更新，登录时无法选择相应的登录用户名。

2。我自己也无法查看自己的数据库属性，

请各位告知这是为什么，谢谢！

JimmyOu0707

兄台我还不知道这样拆分前后台啊，你可以教一下吗？

感激不尽啊。。。。

sbsfhgl

晕呀，我自己都没搞好，现在全国人民都看着我呀，我还不知道为什么呀

andymark

重新链接表

sbsfhgl

谢谢各位，解决这个问题了，原来是共享权限设为只读了。

告知各位新学者以自勉：一个字段名、一个字母都会给你带来很大的麻烦，所以得仔细，条理性、逻辑性都得注意

tz-chf

共享文件夹的设置为可修改的

poly

学习了

wu8313

以下是引用sbsfhgl在2007-6-22 12:51:00的发言：


谢谢各位，解决这个问题了，原来是共享权限设为只读了。

告知各位新学者以自勉：一个字段名、一个字母都会给你带来很大的麻烦，所以得仔细，条理性、逻辑性都得注意

是的。在链接后台表成功后，对后台某个表进行一个操作的是否，使用如下代码可以拦截错误代号和消息来提醒用户。供参考。

Select Case Err.Number

  Case 3044 '网络不通等原因导致远程连接失败，属于 操作链接表 错误报告
  MsgBox "系统提示" & Err.Number & "/" & Err.Description + vbNewLine + _
  "网络故障：可能的原因是" + vbNewLine + "1/" & backdata_hostname & "没有开启" + vbNewLine + _
"2/网络电缆被拔出" + vbNewLine + "3/网络服务被终止", vbInformation, "请检查网络状态"
   
  Case 3078 '后台表或者链接表不存在或者被重新命名，属于 操作链接表 错误报告
  MsgBox "系统提示" & Err.Number & "/" & Err.Description + vbNewLine + _
   "自定义提示：后台表或者链接表不存在或者被重新命名"
  Call delete_alltables
' DoCmd.Quit
  
  Case 3024 '后台文件不存在或者被重新命名 ，属于 操作链接表 错误报告
  MsgBox "系统提示" & Err.Number & "/" & Err.Description + vbNewLine + _
   "自定义提示：后台文件'back.mdb'不存在或者被重新命名"
  Call delete_alltables
'DoCmd.Quit
  
  Case 3051
  MsgBox "系统提示" & Err.Number & "/" & Err.Description + vbNewLine + _
  "自定义提示：对存放后台'back.mdb'的网络磁盘没有读取权限"
  'DoCmd.Quit
  
  Case 3086
  MsgBox "系统提示" & Err.Number & "/" & Err.Description + vbNewLine + _
  "自定义提示：对存放后台'back.mdb'的网络磁盘没有更改权限"
  'DoCmd.Quit
  
  Case 0
  'Exit Function
  
  Case Else   '显示未知错误
  MsgBox Err.Number & "/" & Err.Description
  'DoCmd.Quit
  
End Select

[此贴子已经被作者于2007-6-22 18:50:02编辑过]

wu8313

Select Case Err.Number

  Case 3044 '网络不通等原因导致远程连接失败，属于 操作链接表 错误报告
  MsgBox "系统提示" & Err.Number & "/" & Err.Description + vbNewLine + _
  "网络故障：可能的原因是" + vbNewLine + "1/" & backdata_hostname & "没有开启" + vbNewLine + _
"2/网络电缆被拔出" + vbNewLine + "3/网络服务被终止", vbInformation, "请检查网络状态"


   
  Case 3078 '后台表或者链接表不存在或者被重新命名，属于 操作链接表 错误报告
  MsgBox "系统提示" & Err.Number & "/" & Err.Description + vbNewLine + _
   "自定义提示：后台表或者链接表不存在或者被重新命名"
  Call delete_alltables
' DoCmd.Quit
  
  Case 3024 '后台文件不存在或者被重新命名 ，属于 操作链接表 错误报告
  MsgBox "系统提示" & Err.Number & "/" & Err.Description + vbNewLine + _
   "自定义提示：后台文件'back.mdb'不存在或者被重新命名"
  Call delete_alltables
'DoCmd.Quit
  
  Case 3051
  MsgBox "系统提示" & Err.Number & "/" & Err.Description + vbNewLine + _
  "自定义提示：对存放后台'back.mdb'的网络磁盘没有读取权限"
  'DoCmd.Quit
  
  Case 3086
  MsgBox "系统提示" & Err.Number & "/" & Err.Description + vbNewLine + _
  "自定义提示：对存放后台'back.mdb'的网络磁盘没有更改权限"
  'DoCmd.Quit
  
  Case 0
  'Exit Function
  
  Case Else   '显示未知错误
  MsgBox Err.Number & "/" & Err.Description
  'DoCmd.Quit
  
End Select

sbsfhgl

以下是引用wu8313在2007-6-22 18:47:00的发言：





是的。在链接后台表成功后，对后台某个表进行一个操作的是否，使用如下代码可以拦截错误代号和消息来提醒用户。供参考。

Select Case Err.Number

  Case 3044 '网络不通等原因导致远程连接失败，属于 操作链接表 错误报告
  MsgBox "系统提示" & Err.Number & "/" & Err.Description + vbNewLine + _
  "网络故障：可能的原因是" + vbNewLine + "1/" & backdata_hostname & "没有开启" + vbNewLine + _
"2/网络电缆被拔出" + vbNewLine + "3/网络服务被终止", vbInformation, "请检查网络状态"
   
  Case 3078 '后台表或者链接表不存在或者被重新命名，属于 操作链接表 错误报告
  MsgBox "系统提示" & Err.Number & "/" & Err.Description + vbNewLine + _
   "自定义提示：后台表或者链接表不存在或者被重新命名"
  Call delete_alltables
' DoCmd.Quit
  
  Case 3024 '后台文件不存在或者被重新命名 ，属于 操作链接表 错误报告
  MsgBox "系统提示" & Err.Number & "/" & Err.Description + vbNewLine + _
   "自定义提示：后台文件'back.mdb'不存在或者被重新命名"
  Call delete_alltables
'DoCmd.Quit
  
  Case 3051
  MsgBox "系统提示" & Err.Number & "/" & Err.Description + vbNewLine + _
  "自定义提示：对存放后台'back.mdb'的网络磁盘没有读取权限"
  'DoCmd.Quit
  
  Case 3086
  MsgBox "系统提示" & Err.Number & "/" & Err.Description + vbNewLine + _
  "自定义提示：对存放后台'back.mdb'的网络磁盘没有更改权限"
  'DoCmd.Quit
  
  Case 0
  'Exit Function
  
  Case Else   '显示未知错误
  MsgBox Err.Number & "/" & Err.Description
  'DoCmd.Quit
  
End Select

神奇，还可以这样，不过这个代码加到哪里呢/