『山东001在线-山东小熊论坛』 » 『 站务与公告 』 » 终于好拉~~原来的资料怎么没了？？

朋友万岁 发表于 2002-5-16 12:56

终于好拉~~原来的资料怎么没了？？

原来的论坛怎么样啦？

guigui 发表于 2002-5-16 13:46

努力抢修中，：）

阿贵 发表于 2002-5-16 13:50

Dim a1, a2 As String
For i = 1 To adoPrimaryRS原表.RecordCount
a1 = adoPrimaryRS原表.Fields.Item(0)           (一直到最后一个列)
a2 = adoPrimaryRS原表.Fields.Item(1)
adoPrimaryRS新表.AddNew
adoPrimaryRS新表.Fields.Item(0) = a1
adoPrimaryRS新表.Fields.Item(1) = a2
adoPrimaryRS2.Update
adoPrimaryRS原表.MoveNext
Next

搞定！

guigui 发表于 2002-5-16 13:56

wodao!:)

百事乐 发表于 2002-5-20 00:44

不是一个版本很难的

朋友万岁 发表于 2002-5-20 12:39

我倒``

阿贵 发表于 2002-5-20 12:47

数据库都是一样的，不一样的数据库也能转换.....................

F1 发表于 2008-4-29 22:42

::30::

查看完整版本: 终于好拉~~原来的资料怎么没了？？