Tag: sql

语法错误INSERT INTO语句访问数据库

不知道是否已经find这个特定的错误，但是我看不到这个INSERT INTO语句中我的语法不正确： 我已经把它分成插入和值，以便于阅读。 这是由VBA创build的string，然后传递给连接。 我得到的具体错误是-2147217900（8004e14）“INSERT INTO语句中的语法错误” INSERT INTO AS_Processing_2_2 (ImportDate, [Month], [Year], [Plant Name], [Plant Number], PDFReference, a_VAR_FIRSTPROCWOGSMH, a1_BPMH_FIRSTPROCWOGSMH, a2_EFF_ON_44FIRSTPROCWOGSMH, a3_FIRSTPROCWOGSMH_RANK, a4_WB_BPMH_FIRSTPROCWOGSMH, b_BPMH_BY_DEPT_REC_WOG_FIRSTPROCWOGSMH, b1_KILL_BPMH_BY_DEPT_FIRSTPROCWOGSMH, b2_EVISWOG_BPMH_BY_DEPT_FIRSTPROCWOGSMH, b3_WB_EVIS_BPMH_BY_DEPT_FIRSTPROCWOGSMH, c_PRCT_LINE_EFFCY_FIRSTPROCWOGSMH, d_VAR_GIB_HARV_EFFCY_FIRSTPROCWOGSMH, d1_LIVGIZ_HIS_LB_MH_FIRSTPROCWOGSMH, d2_LABORperLB_C__FIRSTPROCWOGSMH, d3_STAFF_per_LINE_FIRSTPROCWOGSMH, e_TOTAL_GIB_RECVR_FIRSTPROCWOGSMH, e1_LIVER_25_FIRSTPROCWOGSMH, e2_GIZ_HT_22_FIRSTPROCWOGSMH, f_NECKSALESnMMat64_FIRSTPROCWOGSMH, g_NBRLines_REC_FIRSTPROCWOGSMH, g1_EVIS NBR_FIRSTPROCWOGSMH, h_WKLY_RUNTIME_SHIFT_FIRSTPROCWOGSMH, i_TYPEPLANTSHIFTS_FIRSTPROCWOGSMH, j_GIBHARVPAY_DEPT_FIRSTPROCWOGSMH, k_LiveBirdWght_FIRSTPROCWOGSMH, k1_RangeLBW_FIRSTPROCWOGSMH) VALUES ('7/5/2016 4:00:43 PM', '12', '15', 'EUFAUL', '3060', '2.2', '13', '290', '-0.06', […]

如何在不知道logging数的情况下设置parsing查询结果范围？

我通过excel-vba＆ADO在excel中运行SQL查询。 我使用循环parsing结果然后，我发现我必须知道有多lessloggingsql将生成之前parsing结果。 实际上，在生成查询之前，我不知道查询结果logging的数量。 任何函数或方法都可以让我知道，所以我可以把循环语句？ （我已经洞察.Fields（）.Properties（），但不工作） Sub sbADO() Dim sSQLQry As String Dim ReturnArray Dim Conn As New ADODB.Connection Dim mrs As New ADODB.Recordset Dim DBPath As String, sconnect As String DBPath = ThisWorkbook.FullName 'You can provide the full path of your external file as shown below 'DBPath ="C:\InputData.xlsx" sconnect = "Provider=MSDASQL.1;DSN=Excel Files;DBQ=" & DBPath & […]

在date范围内select最大值

任务： 附加/编辑下面的当前工作代码，以便每个患者只返回一行， d1_10.xtransfer （datatype int）的最大值，限制为该行的d1_10.dstartdate <= glob_End_Date 。 注意事项： 在StackOverflow及其姊妹网站上也有类似的问题。 我没有发现已经成功地帮助解决了这个问题。 这是一个医疗EHR数据库，我可以共享代码，但任何结果的讨论必须是一般的，并排除患者信息。 我正在replace预先存在的Excel电子表格中的SQL查询来做一些不同的事情。 Excel使用ODBC连接从我们的数据库中获取信息。 我们的数据库使用的是Ingres SQL，它接受大多数（但不是全部）典型的SQL代码types。 有可能一段代码通常在其他types的SQL中工作，但不能与Ingres和Excel的组合工作。 我已经得到了电子表格的工作和返回结果，现在是通过编写在这个软件中运行的SQL代码来做一些修复。 迄今： 使用下面的当前工作代码（没有最大的d1_10.xtransfer限制），我们返回用户select的date范围内的所有行，并且用户select了d1_10.xinstitute 。 我们只想要最新的一个。 也就是说，病人的行在date范围内的最大值d1_10.xtransfer ，或date范围内的最大值d1_10.xtransfer （添加后的d1_10.xtransfer索引）。 目前工作代码： "SELECT " & _ "d1.xpid ""XPID"", " & _ "d0_v1.name_family ""NAME_FAMILY"", " & _ "d0_v1.name_given1 ""NAME_GIVEN1"", " & _ "d0_v1.name_given2 ""NAME_GIVEN2"", " & _ "d1.sex ""SEX"", " & _ […]

如何在EXCEL中显示PRINT结果

一个团队成员和我重写了我们在这里发布的问题， 使用从我以前的问题提供的答案的各种来源，以及检查其他解决scheme和查询现在按预期工作。 但是我们需要将这个查询embedded到EXCEL表单中，但是我们需要以某种方式将结果显示在单元格中。 查询的PRINT函数实际上在EXCEL中popup一个窗口（DUH，如预期的那样），但是我们想要做的是如何显示PRINTED结果。 由于查询是在电子表格中自动运行的选项，从SSMS导出到文件，然后从那里检索没有一个选项，因为我们的数据库是非常时髦的我们做的数据库，我们不能作为一个工作..等.. ..任何帮助，将不胜感激。 Declare @StartDate1 as DateTime Declare @StartDate2 as DateTime Declare @EndDate1 as DateTime Declare @EndDate2 as DateTime Declare @TodaysDate1 as DateTime Declare @TodaysDate2 as DateTime Declare @Yesterday as DateTime Declare @TotalRecords1 int = 7 Declare @TotalRecords2 int = 7 set @TodaysDate1 = GETDATE() set @TodaysDate2 = @TodaysDate1 set @Yesterday = […]

按列复制表中的行

我需要开发一个我在Excel中创build的报告，但是这个报告变得非常沉重，即使我的电脑也无法打开它。 现在我决定用SQL创build它。 excelinput是这样的： Service_order PENDING_DAYS SERVICE_TYPE ASC code INOUTWTY Part_code1 Part_code2 Part_code3 Part_code4 Part_code5 4182864919 18 CI 3440690 LP GH82-11218A GH96-09406A GH81-13594A GH02-11552A GH02-11553A 4182868153 18 CI 4285812 LP GH97-17670B 4182929636 17 CI 4276987 LP GH97-17260C GH02-10203A 4182953067 16 CI 3440690 LP GH97-17940C 4182954688 16 CI 6195657 LP GH82-10555A GH97-17852A GH81-13071A 4182955036 16 PS 6195657 […]

由于错误的SQLdate比较设置，SQL结果不准确

我在Excel中使用ADO在excel-VBA中运行SQL。 结果显示在Excel工作表上。 在工作表2014,2015,2016,2017中有一个名为Date的字段 数据示例：2/1 / 2014,7 / 1 / 2014,23 / 10/2014 这个字段的数据types是在日/月/年。和date合并= DATE（cell1，cell2，cell3） – 年，月，日。表中的date应该是纯粹的date，因为我把3个单元格，date）分成1个字段（date） 'Dim two date variables Dim fromDate As Date Dim toDate As Date 'Dim 4 integer variables Dim fromyear As Integer Dim toyear As Integer Dim frommonth As Integer Dim ToMonth As Integer 'add combobox value With FromYearC .AddItem 2014 […]

对象closuresVBA时不允许操作

当它到达下面的代码的第四行时，我的代码与上述错误失败。 我之前在我的程序中使用了相同的格式，它工作得很好。 如果需要更多代码来解决错误，我很乐意发布。 谢谢。 With rsTIP19 .ActiveConnection = cnTIP .Open "exec usp_Service_Data_Query_QA" ThisWorkbook.Sheets("Service_Data").Range("A" & Rows.Count).End(xlUp).Offset(1, 0).CopyFromRecordset rsTIP19 .Close End With

SSIS – 通过列循环

一段时间以来，我们一直在使用excel文件来存储我们的购买数据。 该电子表格文件具有统一的结构。 由于它具有相当多的属性，我只想列举最重要的属性。 在这个Excel文件中，我们有产品ID的列，每个产品的尺寸以及产品ID和尺寸的每个组合的数量。 问题是，我们有几家商店，他们每个产品收到不同的数量。 所以，在每一个excel中，我们都有一个每个商店的专栏，在这个专栏中我们放置了从每个复合材料订购的数量。 所以，我想要做的是循环遍历每个商店的列，以添加每个组合的相应数量到特定的商店。 例如， INSERT INTO MyTable (product_ID, size_ID, store_ID, quantity) VALUES (12345, 34, Mirkwood, 1) 然后，重复每一列。 我一直在试图find一个解决scheme，但还没有弄清楚。 我真的很感激所有的帮助或提示。

邮件合并与从Excel或SQL数据库分组键字段

我已经search了互联网find一个解决scheme，但到目前为止，没有成功。 我有VBA和SQL中的中级技能，但一直无法创build我所需要的。 我有一个数据库与以下信息。 Co.Name |Email | Product | Q | SH1 |info@sh.com | Orange | 105.566 | SH1 |info@sh.com | Berries | 200.000 | BT1 |info@bt.com | Orange | 300.000 | BT4 |info@bt.com | Apple | 101.700 | WT1 |info@wt.com | Berries | 201.040 | WT6 |info@wt.com | Apple | 204.000 | Co.Name是指Company_Name，Q是数量。 我需要一个邮件合并插入一个独占表使用键字段来形成表。 在之前的虚拟表中，关键字段可以是公司名称或公司邮件。 […]

SQL数据types对整数和date不匹配

我正在使用MSquery，并有以下的SQL查询： SELECT `Sheet1$`.colA, `Sheet1$`.colB, Switch( colA = '1.0', 'A1', colA = '2.0', 'A2', colA = '3.0', 'C1', colA = '4.0', 'C2' )AS colG FROM ( SELECT `Sheet1$`.colA, `Sheet1$`.colB FROM `Sheet1$` `Sheet1$` UNION ALL SELECT `Sheet2$`.colC, `Sheet2$`.colD FROM `Sheet2$` `Sheet2$` ) t; 我收到一条错误消息：条件expression式中的数据types不匹配。 我认为这与我在switch语句中使用单引号的事实有关。 我有两张桌子，正在追加他们。 然后添加一个额外的列，并根据列A中每行的值添加不同的消息。 此查询工作时，我有列A作为文本，但是当我尝试它的数字或date时，我收到错误消息。 我需要使用什么来代替数字和date的单引号？ 是否可以使用单引号的消息将被显示？ 非常感谢。