数据库结构
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
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
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货