OleDbCommand执行查询无效的解决[通俗易懂]

OleDbCommand执行查询无效的解决[通俗易懂]今日连接数据库,写下以下代码  Dim conn As New OleDbConnection        Dim cmd As New OleDbCommand()        conn.ConnectionString = ConfigurationManager.ConnectionStrings(“AccessConn”).ConnectionString        cmd

大家好,又见面了,我是你们的朋友全栈君。

今日连接数据库,写下以下代码

OleDbCommand执行查询无效的解决[通俗易懂]
  
Dim
 conn 
As
 
New
 OleDbConnection
OleDbCommand执行查询无效的解决[通俗易懂]        

Dim
 cmd 
As
 
New
 OleDbCommand()
OleDbCommand执行查询无效的解决[通俗易懂]        conn.ConnectionString 

=
 ConfigurationManager.ConnectionStrings(

AccessConn

).ConnectionString
OleDbCommand执行查询无效的解决[通俗易懂]        cmd.Connection 

=
 conn
OleDbCommand执行查询无效的解决[通俗易懂]   conn.Open()
OleDbCommand执行查询无效的解决[通俗易懂]        cmd.CommandText 

=
 SQLstr       
OleDbCommand执行查询无效的解决[通俗易懂]        

Dim
 previousConnectionState 
As
 ConnectionState 
=
 conn.State
OleDbCommand执行查询无效的解决[通俗易懂]        

Try

OleDbCommand执行查询无效的解决[通俗易懂]            

If
 conn.State 
=
 ConnectionState.Closed 
Then

OleDbCommand执行查询无效的解决[通俗易懂]                conn.Open()
OleDbCommand执行查询无效的解决[通俗易懂]            

End
 
If

OleDbCommand执行查询无效的解决[通俗易懂]            cmd.ExecuteNonQuery()
OleDbCommand执行查询无效的解决[通俗易懂]            conn.Close()
OleDbCommand执行查询无效的解决[通俗易懂]            showph(PlaceHolder3)
OleDbCommand执行查询无效的解决[通俗易懂]        

Catch
 ex 
As
 Exception
OleDbCommand执行查询无效的解决[通俗易懂]            l_e.Text 

=
 

出现错误

 
&
 ex.Message
OleDbCommand执行查询无效的解决[通俗易懂]        

Finally

OleDbCommand执行查询无效的解决[通俗易懂]            

If
 previousConnectionState 
=
 ConnectionState.Closed 
Then

OleDbCommand执行查询无效的解决[通俗易懂]                conn.Close()
OleDbCommand执行查询无效的解决[通俗易懂]            

End
 
If

OleDbCommand执行查询无效的解决[通俗易懂]        

End
 
Try

OleDbCommand执行查询无效的解决[通俗易懂]
OleDbCommand执行查询无效的解决[通俗易懂]

 

发现无效,于是百端调试,未见其果

最后终于于偶然发现结症所在,上面代码conn.open过早,前半部分调整为

 

OleDbCommand执行查询无效的解决[通俗易懂]
  
Dim
 conn 
As
 
New
 OleDbConnection
OleDbCommand执行查询无效的解决[通俗易懂]        

Dim
 cmd 
As
 
New
 OleDbCommand()
OleDbCommand执行查询无效的解决[通俗易懂]        conn.ConnectionString 

=
 ConfigurationManager.ConnectionStrings(

AccessConn

).ConnectionString
OleDbCommand执行查询无效的解决[通俗易懂]   conn.Open()
OleDbCommand执行查询无效的解决[通俗易懂]        cmd.CommandText 

=
 SQLstr       
OleDbCommand执行查询无效的解决[通俗易懂]        

Dim
 previousConnectionState 
As
 ConnectionState 
=
 conn.State
OleDbCommand执行查询无效的解决[通俗易懂]        cmd.Connection 

=
 conn

即可

版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请联系我们举报,一经查实,本站将立刻删除。

发布者:全栈程序员-站长,转载请注明出处:https://javaforall.net/144295.html原文链接:https://javaforall.net

(0)
全栈程序员-站长的头像全栈程序员-站长


相关推荐

  • Vue3如何关闭eslint

    Vue3如何关闭eslintvue3

    2022年5月6日
    45
  • QQ机器人制作教程_qq群机器人如何编写

    QQ机器人制作教程_qq群机器人如何编写目录前期准备1、机器人框架的下载和配置2、python的配置和安装具体实现1、发送信息2、获取群成员列表3、接收上报的事件4、实现简单的自动回复下一篇文章介绍更多功能前期准备1、机器人框架的下载和配置首先需要一个qq机器人框架,我使用的是基于mirai以及MiraiGo开发的go-cqhttp(里面有开发文档)。框架下载地址Windows下32位文件为go-cqhttp-v*-windows-386.zipWindows下64位文件为go-cqhttp-v*-windows-amd6

    2022年8月10日
    6
  • laravel 预加载特定的列

    laravel 预加载特定的列

    2021年11月9日
    54
  • 口罩、安全帽识别比赛踩坑记(二) 比赛流程及 SSD / YOLO V3 两版本实现[通俗易懂]

    口罩、安全帽识别比赛踩坑记(二) 比赛流程及 SSD / YOLO V3 两版本实现[通俗易懂]本篇文章主要对比赛流程中的各个环节进行展开说明,并对笔者践行过的代码及更改的地方进行记录。如哪里有侵权请联系笔者进行删除。另外在这里对比赛举办方表示感谢~~其中开源代码会在整理后放在github上,并给出相应的链接,这里先留一个小尾巴~~相关有用的链接如下:口罩、安全帽识别比赛踩坑记(一)经验漫谈及随想比赛官方开发环境指导Dockerfile官方文档OpenVINO官方文档…

    2022年5月12日
    77
  • 端口详解

    端口详解

    2021年4月28日
    136
  • WinExec、ShellExecute用法详解「建议收藏」

    WinExec、ShellExecute用法详解「建议收藏」1、WinExec():  WinExec主要运行EXE文件,不能运行其他类型的文件,不用引用特别单元。原型是:UINTWinExec(exePath,ShowCmd)  参数说明:  –xePath:命令行参数。注意,要用pChar转化一下。  –ShowCmd:外部程序的运行方式。其取值如下:  —-SW_HIDE隐藏  —-SW_MAXI…

    2022年7月11日
    20

发表回复

您的邮箱地址不会被公开。 必填项已用 * 标注

关注全栈程序员社区公众号