VB ACCESS数据库清空,sql的like模糊查询

1. VB ACCESS数据库清空
2. VB+ACCESS，MSHFlexGrid表格数据修改后保存到数据库
3. sqlserver2019连接服务器出错
4. SQL使用group by语句时，如果结果为零。则select后的结果不显示。想要select后的结果出现，为0

VB ACCESS数据库清空

窗体上画一command,数据库为a ,表名为b

Private Sub Command1_Click()

Dim msgQk

msgQk = MsgBox("清空数据库将清除所有数据！", 32 + vbOKCancel, "请选择")

If msgQk = 1 Then

Dim cnDel As New ADODB.Connection

Dim rDel As New ADODB.Recordset

Dim sqlDel1 As String

cnDel.Open "DBQ=" & App.Path & "\a.mdb;Driver={Microsoft Access Driver (*.mdb)};"

sqlDel1 = "delete * from b"

VB+ACCESS，MSHFlexGrid表格数据修改后保存到数据库

Dim cnDel As New ADODB.Connection '－－－－－－－－－－－－－－－删除旧数据库1-1

Dim rDel As New ADODB.Recordset

Dim sqlDel1 As String

cnDel.Open "DBQ=" & App.Path & "\data\data.mdb;Driver={Microsoft Access Driver (*.mdb)};"

sqlDel1 = "delete * from data1"

cnDel.Execute sqlDel1

cnDel.Close '－－－－－－－－－－－－－－－删除旧数据库1-1

sqlserver2019连接服务器出错

一、首先无法登陆到服务器可以检查一下操作是否打开

1、点进服务器属性

2、然后点进安全性，看下服务器身份验证是SQL SEVER 和Windows身份验证模式，，以及登录审核是否是仅限失败的登录

二、已成功与服务器建立连接，但是在登录过程中发生错误。另一管道无进程。

解决方案：

1、ctrl+alt+del 打开任务管理器

2、进入服务属性找到SQLBrowser然后点击打开服务

3、找到SQL Server Browser右击进入属性将启动类型改为自动

4、关闭属性，返回观察SQL Server Browser有没有启动，没有启动的话右击SQL Server Browser启动一下

SQL使用group by语句时，如果结果为零。则select后的结果不显示。想要select后的结果出现，为0

你现在写的这个SQL能达到你的要求吗？下面这个可以在无数据的情况下显示一条你要求的，Oracle:selectnvl(max(type),'DLTS'),nvl(max(xtype),1),nvl(max(value),0),nvl(max(checktime),sysdate)from(select'DLTS'astype,typeasxtype,count(*)asvalue,sysdateaschecktimefromawherewhereIsDel=0groupbytype)缺点是：当查到多条时也仅显示最大的那条记录。

到此，以上就是小编对于sql的like模糊查询的问题就介绍到这了，希望介绍的4点解答对大家有用，有任何问题和不懂的，欢迎各位老师在评论区讨论，给我留言。