如何用VB实现？

Question

在VFP中的代码：
SELE 1
USE DATABASE\DB1
COPY to tmpSELE 2
USE DATABASE\DB2
ZAP
APPE from tmp
Go top
其中：DB1和DB2都是库里已存在的表。请问tmp一定是已经存在的表吗？？
请问如何将这段代码用VB 实现？？

Answer 1

在VB中好象是不能直接操作数据库的，你需要创建DAO，ADO等数据库的接口，然后就可以运用他们进行操作了，可以直接用标准的SQL语句进行操作

Answer 2

请问我如何
标志临时表tmp？？

Answer 3

在VFP中的代码：
SELE 1
USE DATABASE\DB1
COPY to tmpSELE 2
USE DATABASE\DB2
ZAP
APPE from tmp
Go top
其中：DB1和DB2都是库里已存在的表。请问tmp一定是已经存在的表吗？？
请问如何将这段代码用VB 实现？？

Answer 4

我是不是还得再用一个ADO对象来标识临时表tmp??
要不以后怎么对临时表tmp进行操作？？
请教了。

Answer 5

你是不是就是要实现表之间的复制,另一个贴子我回了.http://expert.csdn.net/Expert/topic/2321/2321076.xml?temp=.7323114

Answer 6

问题1
先看一段vb代码：
用的是ADO模型连接数据库SqlInfo = "select a,b,from db1 where a =" + "'" + va + "' and c =" + "'" + vb + "' and gauge =" + "'" + vc + "' and d <> 0"
rss.Open SqlInfo, cn, adOpenDynamic, adLockOptimistic, adCmdText其中a,b ,c是字段名，va,vb,vc是变量名
大家是不是觉得写这句SqlInfo很麻烦啊，用那么多 + 号连接变量和字符串，如果是字符串
变量还得用 ' 号，有没有简便的方法？？问题2
先看一段VFP代码：
SELE 1
USE DATABASE\DB1
LOCA  for  a = trim(field1) + trim(field2)
其中 a 是变量名，field1,field2 是字段名，
如果转化为vb代码，采用的是问题1中代码的写法，那么SqlInfo该如何写？？
有没有更好的写法，但必须是ADO模型关联Access数据库。

Answer 7

问题一、你也可以这样写
SqlInfo="select a,b,from db1 "
SqlInfo=SqlInfo+"where a ='" & va & "' and c ='" & vb & "'
SqlInfo=SqlInfo+" and gauge ='" & vc & "' and d<>0 "
这样就不用那么多+来连接了，并且能够看得更加清楚

Answer 8

问题二、SqlInfo你可以按照我上面的方式写
不清楚你的变量是什么类型的
例如：dim a as long
sqlinfo="select * from ....."
rss.Open SqlInfo, cn, adOpenDynamic, adLockOptimistic, adCmdText
if not rss.eof then a=clng(rss.Fields("field1"))+clng(rss.Fields("field2"))

Answer 9

LOCA  for  a = trim(field1) + trim(field2)
这句话的意思是查找符合条件a = trim(field1) + trim(field2)
的记录，然而
sqlinfo="select * from ....."
rss.Open SqlInfo, cn, adOpenDynamic, adLockOptimistic, adCmdText
if not rss.eof then a=clng(rss.Fields("field1"))+clng(rss.Fields("field2"))
这几句代码好像没有实现这样的功能吧？

Answer 10

http://expert.csdn.net/Expert/topic/2322/2322169.xml?temp=.7163965