Dim bh As String = qz & rq
Dim zd As Integer = bh.Length
Dim idx As Integer
Dim max As String
max = DataTables("内包编码_明细表").Compute("max(内包编号)","内包编号 like '" & bh & "*'")
If max > "" Then
idx = cint(max.Substring(zd,jm)) + 1 'CK140611 001
Else
idx = 1
End If
以上代码运行正常,但若改成SQLCompute运行就不正常了,未取到max值,监控值为空.
Dim bh As String = qz & rq
Dim zd As Integer = bh.Length
Dim idx As Integer
Dim max As String
max = DataTables("内包编码_明细表").SQLCompute("max(内包编号)","内包编号 like '" & bh & "*'")
If max > "" Then
idx = cint(max.Substring(zd,jm)) + 1 'CK140611 001
Else
idx = 1
End If
我想从后台取最大编号,DataTables我不想加载所有数据. 如果DataTables不加载所有数据,则从DataTables取最大值是否会有逻辑错误,
到底是从DataTables取值还是要从后台取值比较纠结.(注实例为ACCESS数据库)