数据库结构
rstSplineFields = Array(Array("ObjectName", adBSTR), _
     Array("FitPoints", adBSTR))
  Set rstFieldsSpline = CreateRstFields(rstSplineFields)
End Function
--
rst.Fields(1) = tt ---len(tt)可存到excel中,这个字段可存800左右字符(具体多少不知道)。
如51.40741071,-403.15834632,
---
而用sql从excel中,再将这个数据提取到rst中,只有100个左右。
问:
一个字段最大存诸字节数??
rst字段的建立方式不同,存取字符串的字节数有什么有关??excel与数据连接程序
Function ConnectRst(Sql As String) As ADODB.Recordset
    Dim Cnn As New ADODB.Connection
    Dim rst As New ADODB.Recordset
    Cnn.Open "provider=microsoft.jet.oledb.4.0;extended properties='excel 8.0;imex=1';data source=" & ThisWorkbook.FullName
    rst.Open Sql, Cnn, adOpenStatic
    Set ConnectRst = rst
End Function