没关系啊,可以一起执行的引用Microsoft Script库dim fso as new filesystemobject dim szSQL as string dim f set f=fso.opentextfile("c:\data.sql") szsql=f.readall f.close set fso=nothingdim conn as new adodb.connection conn.open "" '打开数据库 conn.execute szsql
data.sql的内容。。YL99这个表在LIX这个库里。 VFP数据源连的是LIX库。 update yl99 set fd06=cbld.fd06 from yl99,cbld where yl99.[fd01]=cbld.[fd01] and yl99.[fd03]=cbld.[fd03] and yl99.[fd02]=cbld.[fd02] and yl99.[fd04]=cbld.[fd04] and yl99.[fd05]=cbld.[fd05]但是问题又来了他报告找不到YL99这个表。 应该没有错啊`
dim szSQL as string
dim f
set f=fso.opentextfile("c:\data.sql")
szsql=f.readall
f.close
set fso=nothingdim conn as new adodb.connection
conn.open "" '打开数据库
conn.execute szsql
1:我用SQL SERVER的DTS向导保存了一个BAS文件,请问如何在程序中调用?需要连数据库吗?还是直接把BAS文件代码贴到程序里就可以了?
这个是怎么搞的?
update yl99
set fd06=cbld.fd06
from yl99,cbld
where yl99.[fd01]=cbld.[fd01]
and yl99.[fd03]=cbld.[fd03]
and yl99.[fd02]=cbld.[fd02]
and yl99.[fd04]=cbld.[fd04]
and yl99.[fd05]=cbld.[fd05]但是问题又来了他报告找不到YL99这个表。 应该没有错啊`