*****************一个关于从一个数据库向另一个数据库导数据的小问题,请诸位大侠多多帮忙啊!小弟先谢了*****************

Question

Sorry 程序拷错了应该是
While Not RST_getdata.EOF
    RST_fetch.AddNew
    For i = 0 To RST_getdata.Fields.Count-1
        RST_fetch.Update RST_getdata.Fields(i).Name, Trim(RST_getdata.Fields(i))
    Next i
RST_getdata.MoveNext

Answer 1

表2的JYH项应该也是字符串 string 20。

Answer 2

是将ACCESS的JYH改为  文本 20  吗?

Answer 3

比如:改成  文本 50 应该也行吧?
另问一个小问题也是关于导入的:   ORACLE ->ACCESS
    这次是其它的表,一运行程序就在  RST_getdata.RecordCount报错,说RecordCount方法不存在???????
Dim cnn As New ADODB.connect
Dim rst As New ADODB.recordset
Dim cnnStr As StringcnnStr="User ID=test;Password=test;Data Source=test"
cnn.open cnnStr
rst.open "select jyh,spbm,spmc from xsgkb",cnn
其中,jyh和sxh是表的主键,但我只选了jyh.此SQL语句在SQL PLUS中正常.
               [:(

Answer 4

rushing()　先给你加上分!多谢兄台