VB   发布时间:2022-04-03  发布网站:大佬教程  code.js-code.com
大佬教程收集整理的这篇文章主要介绍了VB执行SQL2000数据库脚本程序大佬教程大佬觉得挺不错的,现在分享给大家,也给大家做个参考。

前不久做一个VB执行sql2000数据库脚本程序,本打算先读取脚本文件,再一条条执行,但这样效率太低,于是采取下面这种方法:
1.新建脚本文件,保存在C:/下面,如C:/Test.sql,文件如下:
USE master
GO
CREATE DATABASE Test
GO
USE Test
GO
create table [dbo].[students] (
[ID] [int] IDENTITY (1,1) NOT NULL,
[Name] [nvarchar] (6) COLLATE Chinese_PRC_CI_AS NULL
) ON [PRIMary]
GO
alter table [dbo].[students] WITH NOchecK ADD
CONSTraiNT [PK_students] PRIMary KEYCLUSTERED
(

)ON [PRIMary]
GO
INSERT INTO students(Name) VALUES('古月轩')
GO
2.新建VB工程文件Test.vbp,保存在C:/Test目录下面,如C:/Test/Test.vbp,在该工程下新建窗体frmTest.frm并保存;
3.编写代码并执行,代码如下:
Option Explicit
Dim strServer,strUid,strPwd,strFile As String
Private Sub CmdExec_Click()
strServer = txtServer.Text '数据库服务器名
strUid = txtUser.Text'数据库用户名
strPwd = txtPwd.Text '数据库用户密码
strFile = txtfile.Text '需执行脚本文件名
SHell "osql -U" & strUid & " -P " & strPwd & " -S " & strServer & " -i " & chr(34) & strFile & chr(34),vbHide
@H_576_2@msgBox "successful",vbInformation,"提示"

End Sub
Private Sub cmdExit_Click()
Unload Me
End Sub

大佬总结

以上是大佬教程为你收集整理的VB执行SQL2000数据库脚本程序全部内容,希望文章能够帮你解决VB执行SQL2000数据库脚本程序所遇到的程序开发问题。

如果觉得大佬教程网站内容还不错,欢迎将大佬教程推荐给程序员好友。

本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。