因为需联网操作，将之前一直用得好好的局域网存放ACCESS数据改为SQL2008，但是所有通过窗口录入的动作，录完后都无法在TABLE上显示数据，也没有存在服务器上，是不是代码出了什么问题？求帮忙。

原来的代码如下：在单机或局域网上都可以的，但改为SQL2008，选了外部数据源和外部数据表后就不行了

Dim T_BZ As WinForm.TextBox = e.Form.Controls("T_备注")
Dim T_FP As WinForm.TextBox = e.Form.Controls("T_发票")
Dim T_HJDZ As WinForm.TextBox = e.Form.Controls("T_回寄地址")
Dim T_HJGS As WinForm.TextBox = e.Form.Controls("T_回寄公司")
Dim T_LXDH As WinForm.TextBox = e.Form.Controls("T_联系电话")
Dim T_LXR As WinForm.TextBox = e.Form.Controls("T_联系人")
Dim T_MC As WinForm.TextBox = e.Form.Controls("T_名称")
Dim QY As WinForm.ComboBox = e.Form.Controls("T_区域")

With Tables("供应商")
    .Current("备注")=T_BZ.TEXT
    .Current("发票抬头")=T_FP.TEXT
    .Current("回寄地址")=T_HJDZ.TEXT
    .Current("回寄公司名称")=T_HJGS.TEXT
    .Current("联系电话")=T_LXDH.TEXT
    .Current("联系人")=T_LXR.TEXT
    .Current("区域")= QY.TEXT
    .Current("名称")=T_mc.text
    .Current("添加时间")=now()
.Current("录入者")=User.Name
   
End With
Tables("供应商").Current.Save()
DataTables("供应商").Save()
Forms("供应商_录入").close()

代码很简单，是不应该有问题的，你说没有保存，很可能是你查看的数据库和实际的数据库不是同一个。

你先检查一下，搞不定联系客服QQ: 800014337

发给客服了，在线等解答。