〓〓★★★★★AdoDB连接MySQL的错误★★★★★〓〓

[ivan_oyo]

Dim adoConnection As New ADODB.Connection
Dim adoRecordset As New ADODB.Recordset
Dim constr As String
'////////////////////////////////////////////////////////////////////
constr = "DSN=dbtools"
adoConnection.Open constr
'////////////////////////////////////////////////////////////////////
adoRecordset.Open "search", adoConnection, adOpenStatic, adLockOptimistic, adCmdTable
adoRecordset.AddNew
adoRecordset.Fields("id").Value = 0
adoRecordset.Fields("webname").Value = "aaa"
adoRecordset.Fields("weburl").Value = "bbb"
adoRecordset.Fields("descr").Value = "ccc"
adoRecordset.Fields("keywords").Value = "ddd"
adoRecordset.Fields("webtype").Value = "eee"
adoRecordset.Fields("lang").Value = "fff"
adoRecordset.Update
这段代码执行到update时总是报错：[Microsoft][ODBC 驱动程序 管理器]非法的字符串或缓冲区长度
小弟连接的是MySQL数据库，我想向表中添加记录，表中除字段“id”为int型外
其它都为text型，请各位帮忙分析一下错误的原因。