
*
from
B
where
id
in
(select
Max(ID)
from
B
where
B.Name
in
(select
name
from
A
where
pid='99999')
group
by
name
)
首先,你的情况是属于数据库中数据表之间的一种关联关系,不是你说的两个数据库之间的数据调用。不好意思,我看错了。
这样的方式,用存储过程处理最简单不过了,先通过查询语句,将B中的user中online的数据值提取出来,赋值给一个临时定义的变量,然后,再对这个变量的值进行判断,如果online=1了,那么执行Update User set EXP=EXP+100 WHERE online=你查询出来的变量的值。
这种方法你可以试试看的。
路过~~
Subzhantie()
Sheets(1).Range("A11:A63").Copy
Sheets(2).Range("W11:W63").PasteSpecial
Paste:=xlPasteValues
Application.CutCopyMode
=
False
End
Sub
Sheets(2)指位置排在第2位的工作表(从左往右数)
这种方式可以不用理会工作表名称的变化(比如第1张表重命名了不会影响vba的执行)
还有一种引用工作名的方法:
Sheets(“sheet1”).Range("A11:A63").Copy
Sheets(“sheet1”)指名为sheet1的工作表,跟位置无关,但一旦工作表重命名了,vba执行时找不到名叫sheet1的工作表时就会报错。
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)