救命啊!100分,在线等~~急!

lovegun 2002-09-30 02:07:46
我想在一个VB程序中实现以下功能:
1:我用SQL SERVER的DTS向导保存了一个BAS文件,请问如何在程序中调用?需要连数据库吗?还是直接把BAS文件代码贴到程序里就可以了?
2:完了后我想执行一段SQL代码。c:\data.sql这个文件,我在VB中如何执行? ,请各位大侠赐教,多谢!
...全文
16 10 打赏 收藏 转发到动态 举报
写回复
用AI写文章
10 条回复
切换为时间正序
请发表友善的回复…
发表回复
lovegun 2002-09-30
  • 打赏
  • 举报
回复
谢谢楼上的星星我来了!!谢谢~!!问题已解决,请收分~
antshome 2002-09-30
  • 打赏
  • 举报
回复
bas里的sub main你可以改成你自己的函数名,在程序里调用可以执行DTS任务
antshome 2002-09-30
  • 打赏
  • 举报
回复
这个应该直接加入工程就可以用了,要引用一下Microsoft DTSPackage Object Library
lovegun 2002-09-30
  • 打赏
  • 举报
回复
第二个问题解决了,请帮忙解决第一个问题啊~:我用SQL SERVER的DTS向导保存了一个BAS文件,请问如何在程序中调用?需要连数据库吗?还是直接把BAS文件代码贴到程序里就可以了?
lovegun 2002-09-30
  • 打赏
  • 举报
回复
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这个表。 应该没有错啊`
lovegun 2002-09-30
  • 打赏
  • 举报
回复
请问你的那个conn.open"" '打开数据库里要输入什么内容?我的数据源名称为VFP。

还有这个
1:我用SQL SERVER的DTS向导保存了一个BAS文件,请问如何在程序中调用?需要连数据库吗?还是直接把BAS文件代码贴到程序里就可以了?
这个是怎么搞的?
antshome 2002-09-30
  • 打赏
  • 举报
回复
没关系啊,可以一起执行的

引用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=nothing

dim conn as new adodb.connection
conn.open "" '打开数据库
conn.execute szsql
mouseanAnya 2002-09-30
  • 打赏
  • 举报
回复
使用事务处理,一次处理多条语句
lovegun 2002-09-30
  • 打赏
  • 举报
回复
能不能说清楚一点啊!我不是很懂的,data.sql里的不止一条语句的。
antshome 2002-09-30
  • 打赏
  • 举报
回复
2.用fso把data.sql读入变量szSQL,然后用ado里的connection对象conn.execute szSQL执行

7,759

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧