在VB中,怎样对SQL数据库里面的数据进行 *** 作

在VB中,怎样对SQL数据库里面的数据进行 *** 作,第1张

方法1,

建立一个模块

将工程的启动设置为 SUB MAIN

在模块里写下面代码

Public db As Database

Public rs As Recordset

Sub main()

set db=dbopendatabase("数据库路径"<建议用相对路径--就是把数据库文件和工程文件放在同一目录下--相对路径就是APPPATH+"数据库名带后缀">)

第一启动窗体<比如:form1>show

end sub

以后在其他窗体中如果要调用数据库只用在窗体中写代码

set rs=openrecordset(<可以是数据库的表--如"student",也可以是查询语句--如"select form student">)

这时数据库的内容都存在FILE集合里

比方说set rs=openrecordset("select form student")

rsfile(0)就是SQL语句查询结果的第一列

rsfiles就是整个结果

使用text1text=rsfile(0)就可以把文本框于查询结果帮定起来

如果要对数据库进行修这时用以下代码:

dbExecute (<SQL语句--如"insert into student(sno,sname) value("","")">)

方法2,

工程--部件--选择microsoft data bound grid control 50

然后在窗体中添加左边工具栏的 DATA 和DBGRID 控件

选择DBGRID 将属性DATASOURCE 设置为DATA控件的名字(如DATA1)

然后选择DATA 将属性CONNECT设置为ACCESSS 2000

设置DATABASENAME 选择数据库的存放路径

最后设置RECORDSET 为需要连接的表的名字

运行就可以看到 DATAGRID中显示了数据库的信息

本人从来没有使用ADO对象实现过创建数据库的方法。

以前要采用代码创建数据库都是使用Microsoft的DBEngine对象。

使用ADO只进行过数据的 *** 作,最多用来进行用户的管理。

希望那位高手能解决这个问题,本人拜读一下。

这个不难

我教你怎么跨数据库(跨服务器都可以) *** 作多数据表:

新建一个ACCESS,放在VB工程目录下,什么都不要去做,就用到他的一个ODBC功能做桥接,在VB中连接ACCESS数据库照常

我就给个ADO连接ACCESS连接SQL多数据库连接表联合查询两个数据库数据表的例子:

Private Sub 控件名称_事件过程(变量)

Dim A, B as String

'-----------------定义变量来存字符串

Adodc1ConnectionString="Provider=MicrosoftJetOLEDB40;Data Source=" & Apppath & "\ACCESS数据库后缀"

'-----------------连接ACCESS数据库照常

A="Select 字段1 AS 名称1, 字段2 as 名称2 From 表1 IN [ODBC] [ODBC;Server=SQL Server;uid=用户名;PWD=密码;Server=服务器IP;DataBase=数据库名1] Where 字段3 LIKE %'5555'%"

B="Select 字段8 AS 名称1, 字段9 as 名称2 From 表2 IN [ODBC] [ODBC;Server=SQL Server;uid=2用户名;PWD=密码;Server=服务器IP;DataBase=数据库名2]"

Adodc1recordsoure= A & "Unoin" & B

Adodc1Refresh

Set 电子表格DataSource=Adodc1

End Sub

看到没有?跨了数据库,服务器都可以跨,SQL语句没多大问题吧?我相信,推荐答案那么简单的语句只能解决SQL *** 作问题。

1、打开代码窗口,添加引用:Imports SystemDataSqlClient。

2、输入以下代码:

“Public conn1  As SqlConnection = New SqlConnection _

("server=192168179; Initial Catalog= student; User ID= panqe;PWD=shentai768@")”,vb就已经成功连接sql数据库了。

3、代码详解:声明关键字Public(因为是全局变量,所以用Public 来声明)。

4、连接参数。

5、如果SQL 数据库就在本机,则用以下代码连接:

("server=; Integrated Security=False;Initial Catalog= student; User ID= panqe;PWD=shentai768@")。

6:如果代码太长,影响可读性,可以用空格加"_"后,回车换行。

1、打开代码窗口,添加引用:Imports SystemDataSqlClient。

2、输入以下代码:

“Public conn1  As SqlConnection = New SqlConnection _

("server=192168179; Initial Catalog= student; User ID= panqe;PWD=shentai768@")”,vb就已经成功连接sql数据库了。

3、代码详解:声明关键字Public(因为是全局变量,所以用Public 来声明)。

4、连接参数。

5、如果SQL 数据库就在本机,则用以下代码连接:

("server=; Integrated Security=False;Initial Catalog= student; User ID= panqe;PWD=shentai768@")。

6:如果代码太长,影响可读性,可以用空格加"_"后,回车换行。

以上就是关于在VB中,怎样对SQL数据库里面的数据进行 *** 作全部的内容,包括:在VB中,怎样对SQL数据库里面的数据进行 *** 作、vb6.0+SQL的创建数据库实例、VB *** 作两个数据库,从A数据库表中查询,然后写入B数据库表中!等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址:https://54852.com/sjk/10203465.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-05-06
下一篇2023-05-06

发表评论

登录后才能评论

评论列表(0条)

    保存