用VB创建了一个空Access表，不能添加记录
用ADO创建了一个空Access表，并添加了多个字段名。
但现在问题是，不能向空表中添加记录。
每次添加都会出现“BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录”
想完成的功能是，将EXCEL表中的数据读到recordset中，根据recordset创建Access表。
现在表创建了，字段也有了，但就是不能添加记录。
小弟初学者，请大侠指教！
向空表中添加记录 的代码贴出来看看，指出出错在哪一行
数据库用cnn已经打开
主要代码：
Dim cnnE As New ADODB.Connection
Dim rsE As New ADODB.Recordset
Dim sqlE As String
Dim i As Integer, j As Integer
'读取Excel表中的数据到rsE数据集
cnnE.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & Text1.Text & ";Extended Properties='Excel 8.0;HDR=Yes'"
rsE.Open "select * from [" & excel表 & "$]", cnnE, 3, 3
’根据rsE 创建表，并向表中添加字段
Call cnn.Execute("CREATE TABLE " & 创建的表)
For j = 0 To rsE.Fields.Count - 1
sqlE = "ALTER TABLE " & 创建的表 & " ADD _
[" & rsE.Fields(j).Name & "] " &a
相关问答：
login.aspx.vb:
Public ReadOnly Property nameT() As String
Get
Return TextBox1.Text
&nb ......
用VB中的Timer控件 可以获得时间
但是如果电脑上的时间显示不正确 那岂不是获得的时间也是不正确的
怎么获得正确的时间
连网，从别的地方获得
引用
用VB中的Timer控件 可以获得时间
但是如果电� ......
怎么点击form2上的按钮 可以结束form1上正在进行的循环
form1里面添加一个变量：
Public bEnd As Boolean
循环代码添加：
bEnd = False
Do
...
If ......
大家好，问个vb打印问题
printer.print "dsff"
.....
....
Printer.EndDoc
打印成功后我将执行
sqlstr = "update vc_yh set pr=' 已打印 ', ......
C# code:
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
Private Type GUID
Data1 As Long
......
