我想给表2001中加入一个字段“test”;用以下的代码出错,请问怎么可以解决呢?
Dim adoCon As New ADODB.Connection
Dim adoRec As New ADODB.Recordset
Dim strSQL As String
Private Sub Form_Load()
adoCon.Open "Provider=MSDASQL.1;Persist Security Info=False;Data Source=ToDBF;Initial Catalog=C:\"
adoRec.Open "select * from 2001", adoCon, adOpenDynamic, adLockOptimistic, 1
adoRec.Fields.Append "test", adChar
End Sub
Dim adoCon As New ADODB.Connection
Dim adoRec As New ADODB.Recordset
Dim strSQL As String
Private Sub Form_Load()
adoCon.Open "Provider=MSDASQL.1;Persist Security Info=False;Data Source=ToDBF;Initial Catalog=C:\"
adoRec.Open "select * from 2001", adoCon, adOpenDynamic, adLockOptimistic, 1
adoRec.Fields.Append "test", adChar
End Sub
解决方案 »
- msgbox中如何加使用title标题?有例!
- MshFlexGrid提取.row对应列的数据.
- 如何用VB实现根据用户名和密码读写FTP服务器上的TXT文件?
- active report2.0 打印有错误
- 如何用vb6.0打开.dbf数据库
- 如何显示“更多”按钮??实现就揭帖!
- 请教如何在VB程序中获得指定文件的属性(如建立时间,最后修改时间,文件大小等)
- ADO问题征解!谢谢大家,我都没治了!
- 《Visual Basic 6 编程技术大全》求购
- 如何使运行的程序在进程中无法监视到?百分请教!
- 各位老大,在mshflexgrid里如何得下列操作的行值?100分送
- 我是新来的,请教各位:如果将VB前台Grid中的数据导入EXCEL中?望赐教,谢谢
将对象追加到集合中。如果集合是 Fields,可以先创建新的 Field 对象然后再将其追加到集合中。语法collection.Append objectfields.Append Name, Type, DefinedSize, Attrib参数collection 集合对象。fields Fields 集合。object 对象变量,代表所要追加对象。Name 字符串,新 Field 对象的名称,不得与 fields 中的任何其他对象同名。 Type DataTypeEnum 类型,其默认值为 adEmpty。新字段的数据类型。 DefinedSize 可选,长整型,指示新字段的定义大小(以字符或字节为单位)。该参数的默认值源于 Type (默认的 Type 为 adEmpty,默认的 DefinedSize 未指定)。Attrib 可选,FieldAttributeEnum,其默认值是 adFldDefault。指定新字段的属性。如果该值未指定,字段将包含源于 Type 的属性。参数在集合上使用 Append 方法可将对象添加到该集合,此方法仅在 Command 对象的 Parameters 集合上有效。在将 Parameter 对象追加到 Parameters 集合中之前必须设置其 Type 属性。如果选定了变长数据类型,则必须将 Size 属性设置为大于零的值。通过对参数作出说明,可以最大程度地减少对提供者的调用,进而在使用存储过程或参数化查询时提高性能,但必须了解与所要调用的存储过程或参数化查询相关联的参数属性。使用 CreateParameter 方法可创建具有适当属性设置的 Parameter 对象,而使用 Append 方法则可将它们添加到 Parameters 集合。这样可以不必调用参数信息的提供者而设置和返回参数值。如果写到不提供参数信息的提供者,则必须使用该方法手工填写 Parameters 集合以便能够完全使用参数。字段如果在调用 fields.Append 方法前您没有设置 CursorLocation 属性,当使用 Open 方法打开 Recordset 时,CursorLocation 将被自动设置为 adUseClient。对打开的 Recordset 或已设置 ActiveConnection 属性的 Recordset,调用其 fields.Append 方法将引发运行时错误。只能将字段追加到没有打开并且尚未连接到数据源的 Recordset。一般地,通过 CreateRecordset 方法或通过将新 Recordset 对象显式赋给对象变量所创建的都是新 Recordset 对象。
试一试看.