vba odbc 3704 mysql_VBA / ADODB运行时错误：3704

冷不防 2023-01-11 13:22 130阅读 0赞

![bd96500e110b49cbb3cd949968f18be7.png][]

The following VBA subroutine will run most queries just fine. (ie: SELECT \* FROM DUAL)

Sub DisplayQuery(QueryString As String)

Dim rs As New ADODB.Recordset

Dim connStr As String

connStr = \_

"Provider=MSDAORA.1;" \_

& "User ID=abc;Password=123;" \_

& "Data Source=xxx/xxx;"

out QueryString

rs.Open QueryString, connStr, adOpenStatic, adLockOptimistic

Range("DataTable").Clear

Cells(1, 1).CopyFromRecordset rs

End Sub

However, when I run the query below, the following error message immediately pops up: Run-time error '3704':Operation is not allowed when the object is closed.

with all\_hours as

( select to\_date('2009-11-03 05:00 PM','yyyy-mm-dd hh:mi PM') + numtodsinterval(level-1,'hour') hour

from dual

connect by level <= 4 /\*hours\*/

)

select h.hour

, count(case when h.hour = trunc(s.sampled\_on,'hh24') then 1 end) sampled

, count(case when h.hour = trunc(s.received\_on,'hh24') then 1 end) received

, count(case when h.hour = trunc(s.completed\_on,'hh24') then 1 end) completed

, count(case when h.hour = trunc(s.authorized\_on,'hh24') then 1 end) authorized

from all\_hours h cross join sample s

group by h.hour

Why?

解决方案

I just restructured my query (link), so that I could put it into a view. I then created a connection in Excel to view name.

[bd96500e110b49cbb3cd949968f18be7.png]: /images/20221119/815e1e5ea0804548a1bc63d01a081514.png

发表评论取消回复

表情：

评论列表（有 0 条评论，130人围观）

还没有评论，来说两句吧...

相关阅读

相关 golang：处理运行时错误

Go语言的错误处理思想及设计包含以下特征： //一个可能造成错误的函数，需要返回值中返回一个错误接口(error)，如果调用是成功的，错误接口将返回nil，否则返回错误

矫情吗；*/ 2023年06月25日 03:19/ 0 赞/ 127 阅读

相关 VBA编程之ODBC连接数据库

下面的例子展示了在VBA中使用ODBC连接数据库并获取数据，填充工作表内容。使用前要先在sheet名字上点右键，选择查看代码，进入VBA编辑模式： ![在这里插入图片

快来打我*/ 2023年02月08日 15:49/ 0 赞/ 6 阅读

相关 vba odbc 3704 mysql_VBA / ADODB运行时错误：3704

![bd96500e110b49cbb3cd949968f18be7.png][] The following VBA subroutine will run most qu

冷不防/ 2023年01月11日 13:22/ 0 赞/ 131 阅读

相关 VBA 学习笔记错误处理

一下代码实现用户输入判断，出错可以一直重试。 Sub demo() Dim birthday As Date On Error Resume Ne

分手后的思念是犯贱/ 2022年10月19日 14:00/ 0 赞/ 140 阅读

相关 0706运行时错误

为啥有`运行时`错误,就是新写函数`逻辑`有问题. 为啥是`新函数`有问题,因为还没用过他们,这些`函数`还没经过考验.所以,新写`函数`一定要经过`考验`才能加以使用,否

桃扇骨/ 2022年10月13日 05:18/ 0 赞/ 205 阅读

相关 0630编译运行时错误

写好一个程序`不容易`:先要找`材料,资源`.再`安排`程序`思路`结构,再`写代码`,最后`编译时/运行时`错误查找. 1,`d=看();i=一符型(d);`,这里只记得

素颜马尾好姑娘i/ 2022年10月11日 12:25/ 0 赞/ 228 阅读

相关 vba调用计算机,运行到错误462：通过Excel VBA使用WORD时,远程服务器计算机不存在...

我一直试图在excel vba中以编程方式打开一个word文件,并使用书签在其中添加/编辑内容.但是,我发现在备用运行中,我得到’错误462：远程服务器不存在“错误.我研究了很

小灰灰/ 2022年10月09日 13:30/ 0 赞/ 233 阅读

相关常见Python运行时错误

当初学 Python 时，想要弄懂 Python 的错误信息的含义可能有点复杂。这里列出了常见的的一些让你程序 crash 的运行时错误。 1）忘记在 if , elif ,

淩亂°似流年/ 2022年06月03日 05:37/ 0 赞/ 267 阅读

相关 P3704 [SDOI2017]数字表格

\\(\\color\{\0066ff\}\{ 题目描述 \}\\) Doris刚刚学习了fibonacci数列。用\\(f\[i\]\\)表示数列的第\\(i\\)项，

- 日理万妓/ 2021年09月29日 15:34/ 0 赞/ 304 阅读

相关 excel运行vba_运行VBA功能时如何限制Microsoft Excel的CPU使用率？

![excel运行vba][excel_vba] excel运行vba ![how-do-you-limit-microsoft-excels-cpu-usage-when

末蓝、/ 2021年07月26日 12:59/ 0 赞/ 412 阅读