Public Conn1 As new ADODB Connection
Public Conn2 As new ADODB Connection
public Rs1 as new adodb Recordset
public Rs2 as new adodb Recordset
Conn1.open "A"
Rs1.open"select * from b",Conn1
Conn2.open "C"
Rs2.Open "D",Conn2
do while(Rs1!=null)
Rs2.addnew
Rs2(0)=Rs1(0)
Rs2(1)=Rs1(1)
Rs2.Update
Rs2.close
loop
Rs1.close
我不知道这个行不行!你试试吧!我是凭感觉写的!试吧!
Public Conn2 As new ADODB Connection
public Rs1 as new adodb Recordset
public Rs2 as new adodb Recordset
Conn1.open "A"
Rs1.open"select * from b",Conn1
Conn2.open "C"
Rs2.Open "D",Conn2
do while(Rs1!=null)
Rs2.addnew
Rs2(0)=Rs1(0)
Rs2(1)=Rs1(1)
Rs2.Update
Rs2.close
loop
Rs1.close
我不知道这个行不行!你试试吧!我是凭感觉写的!试吧!
解决方案 »
- 关于VB中DATAGRID动态隐藏列的问题
- 东方之珠!请进来
- 在VB中访问access如何使用transactions
- activereport 折行问题 急呀! 解决了分不够可再加
- 大学图书馆随书光盘下载 (完全免费)
- Printer在默认单位是缇的情况下,Height和ScaleHeight、Width和ScaleWidth怎么不等?
- 请教:如何将变量值作为表单名,以打开表单
- 为什么我vb6.0的工程菜单下的部件里找不到“状态栏”这个控件啊?
- 哪位能帮忙 解释一下 以下例程中 DocumentProperties 各个用法的作用,谢谢。
- 怎样设置文件加共享和取消共享(适用各种win平台)???
- FROM字句语法错误
- 一个关于mshflexgrid的很怪的问题?
select * from [路径名.A数据库文件名].b into [路径名.C数据库文件名].d
就可以了