在xp和access03运行没问题,换到win10和access2016就出错Publicmrc1AsADODB.RecordsetPublicmsgtextAsStringPublicfindstr1AsStringPublicmrc11AsADODB.RecordsetPublicmsgtext1AsStr...

在xp和access03运行没问题,换到win10和access2016就出错

Public mrc1 As ADODB.Recordset

Public msgtext As String

Public findstr1 As String

Public mrc11 As ADODB.Recordset

Public msgtext1 As String

Public FindStr11 As String

Public temp1 As String

Public num1, num2, num3 As Integer

Public fff, fff1 As Integer

Public max1, hmax1 As Single

Public Function ExecuteSQL(ByVal SQL As String, Msgstring As String) As ADODB.Recordset

Dim cnn As ADODB.Connection

Dim rst As ADODB.Recordset

Dim sTokens() As String

sTokens = Split(SQL)

Set cnn = New ADODB.Connection

cnn.Open Connectstring

If InStr("insert,delete,updata", UCase$(sTokens(0))) Then

cnn.Execute SQL

Msgstring = sTokens(0) & "query successful"

Else

Set rst = New ADODB.Recordset

rst.Open Trim$(SQL), cnn, adOpenKeyset, adLockOptimistic

Set ExecuteSQL = rst

End If

ExecuteSQL_Exit:

Set rst = Nothing

Set cnn = Nothing

Exit Function

End Function

Public Function Connectstring() As String

Connectstring = "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=" & App.Path & "\data\yzcl.mdb"

End Function

(把3.51换成4.0也不行)

展开

access2016访问mysql_关于VB连接access2016数据库相关推荐

  1. VB连接SQL数据库的方法

    VB使用ADO数据库可以分为有源数据库和无源数据库,即是否使用了DSN数据源,如下例: 1.在连接数据库前首先要在VB菜单中"工程"-"引用"从中选择 micr ...

  2. 组态王如何连接mysql_组态王连接SQL数据库操作步骤

    组态王连接SQL数据库操作步骤 1.建立 ODBC 连接配置:(1)开始--设置--控制面板--管理工具--数据源:(2)双击"数据源" ,选择"用户 DSN" ...

  3. sqlalchemy 使用mysql_使用SQLALchemy连接MySql数据库并进行操作

    "导语:这期主要学一下利用SQLALchemy连接MySql数据库以及对数据库的增删改查的操作,可能代码部分很多还不能理解,我觉得像一些固定写法先用着(比如引入的类等),再慢慢体会缘由&qu ...

  4. idbconnection mysql_继承IDbConnection连接不同数据库

    本方案可实现仅修改app.config即可连接不同数据库,但是设计数据库时需要注意各种数据库的数据类型是不一样的. 各种不同数据库的Connection.Command.DataAdapter.Tra ...

  5. 不能连接到 mysql_怎么无法连接到数据库?

    它提示:Warning:mysqli_connect():(HY000/1045):Accessdeniedforuser'root'@'我是初学者,想做一个注册页面,用的xmapp搭建的环境,网页代 ...

  6. python数据库连接mysql_使用Python连接MySQL数据库

    本篇文章使用python中的pymysql库连接MySQL数据库,并完成建表,数据写入和查询的过程.为了保证内容的完整性,我们将内容分为两个 阶段,***阶段简单介绍数据的爬取过程.看过之前爬虫文章的 ...

  7. cas mysql_使用CAS连接Mysql数据库

    CAS安装好默认使用的是静态用户和密码,但实际使用中,我们可能连接LDAP.数据库等其他情况.接下来,我们看一下如何使用CAS连接Mysql数据库. 创建数据库1 2 3 4 5 6 7 8DROP ...

  8. access前端连接mysql_用javascript连接access数据库的方法

    刚看到一个朋友写的用javascript连接excel数据库的程序,想把它改成access数据库的,就找到了这两篇文章 ---------------------------------------- ...

  9. spring无法连接mysql_初学Spring——连接MySQL数据库的问题和解决

    零:前言 初学Spring + Angular才不到一周时间,刚打开第一个Spring的示例项目,在运行时就出现了错误. 代码如下: *************************** APPLI ...

  10. 使用jdbc驱动连接mysql_使用jdbc连接mysql数据库

    1.提供mysql的jdbc驱动(我的博客文件里提供了驱动jar包) 2.使用IDEA工具,把jar包添加到项目里(具体步骤如下) 1)打开模块设置 2)选择libraries功能,点击+号,选择ja ...

最新文章

  1. matlab实现瑞利信道需要的步骤,基于Matlab的瑞利信道仿真.docx
  2. Excel 公式(细节若干)
  3. 自定义异常类RRException
  4. 使用neo4j_知识图谱Task00:Neo4j安装配置
  5. CSS从大图中抠取小图完整教程(background-position应用)
  6. 人工智能的搭便车指南
  7. Java异常详解及如何处理
  8. Linux下Tomcat设置自动启动
  9. 关于模型转向自然化思考
  10. java 与 c# 3des 加解密
  11. oracle 定时任务
  12. verilog符号 与或非 异或_与非门、或非门、异或门、同或门的逻辑表达式和逻辑符号怎么写...
  13. saas系统和php mysql的区别_saas模式与传统软件的区别
  14. Mysql高阶sql语句
  15. 阻止switch开关的事件冒泡
  16. ECB oracle——attack
  17. matlab特征值是空集,MATLAB中矩阵方程求解的实现
  18. Xcode真机设备无线调试
  19. 微信小程序--引用第三方组件
  20. 手把手教你使用Python抓取QQ音乐数据!

热门文章

  1. Innosetup 多种安装 vc_redist 运行库方式
  2. 学画画软件app推荐_【画画必备】让你成为大触的6款APP
  3. 中点画线算法画直线----计算机图形学
  4. 《啊哈算法》的Java实现| 第五章:图
  5. ISO12233:2014 eSFR分辨率测试卡使用方法
  6. windows+Ubuntu双系统引导修复(终极版)
  7. CentOS部署JavaWeb项目
  8. 视频人像磨皮插件:Beauty Box 4.2
  9. 遗传算法小结及算法实例(附Matlab代码)
  10. activitymq 登录界面地址