VS 的VB语言怎么执行SQL语句?还有怎么输出表里的内容? 求解答!谢谢! 连接数据库已经会了!

Posted

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了VS 的VB语言怎么执行SQL语句?还有怎么输出表里的内容? 求解答!谢谢! 连接数据库已经会了!相关的知识,希望对你有一定的参考价值。

以RS 为例,该怎么写代码?

VB使用ADO数据库可以分为有源数据库和无源数据库,即是否使用了DSN数据源,如下例:
1、在连接数据库前首先要在VB菜单中“工程”-“引用”从中选择 microsoft activeX Data objects 2.6 library和 microsoft activeX Data objects recordset 2.6两个组件,这是在连接数据前所必做的工作。
2、接下来定义ADO的连接对象,如下所示:
Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset
第一种方法采用的是无源的数据库连接方法
conn.ConnectionString = "Driver=sql server;server=JSZX3-11;uid=sa;pwd=;database=wzc"
conn.ConnectionTimeout = 30
conn.Open
rs.Open "select 用户名,密码 from login where 用户名='" & Trim(Combo1.Text) & "' And 密码='" & Trim(Text1.Text) & "'", conn, adOpenStatic, adLockReadOnly, adCmdText
If rs.EOF = True And rs.BOF Then
m = MsgBox("请重新登录", vbExclamation)
Text1.Text = ""
Text1.SetFocus
Else
Form1.Hide
End If
rs.Close
这是第二种方法连接数据库的方法,这一种方法是采用有源的方法与数据库连接的方法,代码如下所示:
Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset
conn.ConnectionString = "DSN=login;uid=sa;pwd=;"
conn.ConnectionTimeout = 30
conn.Open
rs.Open "select 用户名 from login", conn, adOpenStatic, adLockReadOnly, adCmdText
Dim i As String
For t = 0 To Val(rs.RecordCount) - 1
i = Trim(rs.Fields("用户名").Value)
rs.MoveNext
Combo1.AddItem i
Next t
rs.Close

参考资料:http://www.programfan.com/article/2246.html

参考技术A 数据库的程序里的,如果要用双引号,在SQL里要加个',要是要加单引号也一样前面加个'所以就变成''',''了

如何跟踪SQL SERVER 正在执行的语句

打开Microsoft SQL Server Management Studio , 在菜单栏有个工具(Tool), 里面有个事件追踪(SQL Server Profiler)。
打开sql server profiler, 连接数据库。弹出Trace Properties(跟踪属性), 选择事件(Events Selection),右下角选择Show All Columns(选择所有列), 点击列过滤(Columns Filters)按钮。在里面就有HostName 设置电脑的主机名.
参考技术A 连sql语句都不懂当啥产品?

以上是关于VS 的VB语言怎么执行SQL语句?还有怎么输出表里的内容? 求解答!谢谢! 连接数据库已经会了!的主要内容,如果未能解决你的问题,请参考以下文章

如何直接执行SQL语句

SQL 语句执行感觉很慢,怎么回事?

VB调用SQL存储过程异步执行问题

在SQL语句里怎么转换数据类型?

VS2013 VB.NET窗口控件怎么做自适应

vs2010怎么生成exe文件