Public Function license() As String
Dim rst As New ADODB.Recordset
Dim slicense As String
sql = "select max(license) from tbcustomer "
rst.Open sql, cnn, adOpenForwardOnly, adLockReadOnly
Set slicense = rst
编译到此时提示 slicense
compile error:
object required
Dim rst As New ADODB.Recordset
Dim slicense As String
sql = "select max(license) from tbcustomer "
rst.Open sql, cnn, adOpenForwardOnly, adLockReadOnly
Set slicense = rst
编译到此时提示 slicense
compile error:
object required
slicense=rst.fields(0).value即可
一个字符串
不能如此操作
slicense=rst.fields(0).value对了
获取最大值
楼上就对了
slicense = rst.field(0)