当前位置: 首页 > 面试题库 >

如何从Microsoft Access VBA中的SQL查询获取数据?

何琨
2023-03-14
问题内容

嘿,我只是学习了如何将SQL语句放入VBA(或至少将它们写出),但是我不知道如何获取返回的数据?

我有一些基于查询的表格(图表形式),这些查询针对的是我定期运行的常规参数,只是更改了时间范围(例如,当月交易量排名前10位的商品)。然后,我有一些将图表对象自动传输到PowerPoint演示文稿中的过程。因此,我已经预先构建了所有这些查询(例如63),并且要匹配图表格式(嗯,是的....
63 …我知道这很不好),然后所有这些事情都在“ open /关闭”事件触发下一个事件(这就像我尽最大努力成为黑客……或多米诺骨牌;无论您喜欢哪个)。

因此,我试图学习如何在VBA中使用SQL语句,以便最终可以在其中完成所有这些操作(我可能仍需要保留所有这些图表形式,但我不知道,因为我显然缺乏理解)。

因此,除了我在顶部提出的问题之外,还有人可以提供建议吗?谢谢


问题答案:

这有点过时了,所以您可能想拿一本关于该主题的书。但是,这里有大量的访问资源以及一些教程和示例。但是,基本上…

Dim dbs As Database
Dim rs As Recordset
Dim strSQL As String
Set dbs = CurrentDb

strSQL = 'your query here

Set rs = dbs.OpenRecordset(strSQL)

If Not (rs.EOF And rs.BOF) Then
  rs.MoveFirst
  'get results using rs.Fields()
Else

'Use results

每条评论:看一下记录集类。它包含一个称为“字段”的集合,这些集合是您的查询返回的列。不知道您的模式,很难说,但是类似…

rs.MoveFirst
Do While Not rs.EOF
   'do something like rs("SomeFieldName") 
   rs.MoveNext
Loop

就像我说的,您最好的选择是读一本关于这个主题的书,其中有很多例子。



 类似资料:
  • 问题内容: 我在Oracle数据库11g中使用Pl / SQL。 我正在编写一个将select语句作为参数(varchar2)的函数。该函数使用for循环遍历行并将格式应用于特定的列,并输出整个内容。基本上,我需要某种方式来获取列名,以便可以在顶部显示它们。我知道有多种方法可以对表执行此操作,但是由于传入了此查询,因此可能未选择所有列,可能已使用别名等。 有没有一种方法可以从此查询中选择列名? 理

  • 问题内容: 我的代码有问题。 像这样的情况: 我有一个下拉列表,如果选择“个人”,则会出现新的下拉列表,其中包含从数据库查询中检索到的数据;如果选择“公开”,则该下拉列表将消失。 这样的HTML代码: 查询如下: 像这样的JavaScript代码: 我不知道如何将值/结果发送到javascript代码(选择选项中的值和名称)。 问题答案: 在javascript中,您必须对您的php文件进行操作:

  • 问题内容: 通过在页面初始化时关闭连接,然后在Dropdownlist中重新打开来修复此问题。 我一直在寻找这个问题的答案,但是没有任何运气。 我想从选定的下拉列表项到文本框获取数据。我一直在尝试执行此sql查询,但没有成功。 这是我的代码: 问题答案: “ xecuteReader”返回复数/非标量值。使用`` ExecuteScalar ‘’方法代替:

  • 问题内容: 我想知道如何检索由表适配器执行的SQL查询以进行记录。 例如: 输入: 输出: 我要记录的是insert语句,该语句由表适配器生成以执行insert命令。 我怎样才能做到这一点?有人对此有任何建议吗? 问题答案: 您可以使用此替代方法,并用其值替换ParameterName,但效果不好,因为您需要自己管理值格式,这可能很慢, 并且在执行Insert后需要获取参数。 代码:

  • 如何在Vue中获取查询参数。js? 例如,。 找不到获取的方法,或者我需要为此使用纯JS或一些库吗?

  • 我正在使用Astyanax使用CQL3查询来查询Cassandra,它工作得很好。 前面的代码是连接的一部分,现在,我想执行查询并获取数据,但我不知道我希望查询中的数据类型,因此我不知道使用什么方法来获取值,如下面所示,我不知道是否需要使用、、等。 有没有办法让我知道这件事?使用这个API,或者使用不同的API。 谢谢你。