救命啊！100分，在线等~~急！

2002-09-30 02:07:46 41 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

华为OD机试_2025 B卷_模拟消息队列（Python，100分）（附详细解题思路）时间排序：确保事件处理顺序正确消费者管理：集合操作高效维护状态优先级实现：利用消费者ID自然排序边界处理：正确处理空消费者情况。阅读详情

我想在一个VB程序中实现以下功能：
1：我用SQL SERVER的DTS向导保存了一个BAS文件，请问如何在程序中调用？需要连数据库吗？还是直接把BAS文件代码贴到程序里就可以了？
2：完了后我想执行一段SQL代码。c:\data.sql这个文件,我在VB中如何执行? ,请各位大侠赐教,多谢!

...全文

单精度浮点数存储、双精度浮点数存储单精度浮点数存储、双精度浮点数存储阅读详情

lovegun

VB基础类 7,788 成员 197,583 内容

+ 关注 + 加入社区

切换为时间正序

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执行

救命啊！100分，在线等~~急！

相关推荐