各位大虾们:    
    我在VB里通过Recordset对象往数据库表里插入记录下面是我的代码:
dim adoRs as New ADODB.Recordset
dim adoCn as New ADODB.Connection'注:程序中我已将其连接到数据库上了
dim sql as String
dim i as IntegerFor i = 0 To adoRs.RecordCount - 1
On Error Resume Next
sql = "insert into SubFieldTable ( AutoID,ID,FieldName,FidldAlias,VisibleSign) values
(" & i + 1 & "," & i & "," & "'AAAAA,BBBBB," & 0 & ")"
    
    adoCn.Execute sqlNext问题是:当For 循环到i=1时就出下面错误提示:服务器: 消息 8152,级别 16,状态 9,行 1
将截断字符串或二进制数据。
语句已终止。这是怎么一回事啊,急等解决,菜鸟在这先谢谢各位了