strSql = ""
strSql = strSql & " select max(number)  from dbo.#DATA" & vbCrLf
rss.Open strSql, cnn
  numb = rss.Fields(0)
rss.Close

相关文章: