主题：[求助]foxtable已停止工作

各位前辈好！开发时，用的access03版的数据库挺好的。

 不可能把低版本的另存为高版本的access的。你是怎么做到的？

见笑了~

还有个问题，以前的试用版里有些有用的东西（代码以外的），现在反复插拔狗不好。用了虚拟机打开试用版也没解决，能顺便指点下吗？

Dim dr As Datarow = 你查到的user的那一行

If dr.IsNull("E") Then

    DataTables("表A").LoadFilter = "项目 in ('" & dr("D").Replace("|", "','") & "')"

    DataTables("表A").Load

Else

    DataTables("表A").LoadFilter = "项目 = '" & dr("E") & "'"

    DataTables("表A").Load

End If

此主题相关图片如下：13.png

打开项目的时候，登陆的时候，你肯定要查到对应的那一个用户的那一行数据啊。

 

Dim dr As Datarow = 你查到的user的那一行

Dim dr As DataRow=DataTables("用户").Find("name = " & "'" & username & "'")

msgbox(username) '看弹出的名字是否正确

Dim dr As DataRow=DataTables("用户").Find("name = '" & username & "'")

If dr Is Nothing Then

    msgbox("没有找到对应的行")

    return

End If