在VB执行一段SQL文本文件
编号：QA002410
建立日期: 2000年1月9日 最后修改日期：2000年1月9日
所属类别：
Ｑ
NJK:
编程工具: Vb 6.0
操作系统: Win 9x,Sql Server 7.0
我在编写程序时,常想如果能够在VB执行一段T_Sql 语句就好了。
如:
use master
go
sp_addlogin 'njk','111','pubs'
go
exec sp_addumpdevice 'pubs_bak' to 'c:\pubs\pubs_bak.bak'
backup database pubs to pubs_bak
go
这一段语句如何在VB中调用执行。或者如果我将这段语句存为pub_bak.sql这个文件,我在VB中如何执行?
小弟我,刚接触Sql Server不久,请各位大侠赐教,多谢!
Ａ回答:
方法:
1.定义一个字符串: Dim sSQL As String
Dim NextLine As String
Dim FileNum As integer
2.用顺序文件打开:
FileNum=FreeFile
Open SQL文件 For input As FileNum
Do Until Eof(FileNum)
Line Input FileNum,NextLine
sSQL=sSQL +NextLine+Chr(13)+Chr(10)
Loop
Close FileNum
3.执行SQL 语句:
db.Execute sSQL
此问题由Frank回答。
| |
|
|
| |
|
|
