Tag: logging集

导入到Excel中时,ADOlogging集在“备注”数据types上失败

我正在尝试从SQL Server中检索数据,以用于某些Excel 2003macros。 我想避免使用QueryTables,因为我不希望从实际工作表中读取和读取这个中间步骤。 这似乎很费时间和毫无意义。 我设法得到logging集,但它包含数据types是“备忘录”,在服务器上的空数据。 此外,程序崩溃的地方,它试图将数据存储到一个范围。 它似乎使它成为第一个“空”字段,然后它给了我一个1004错误代码。 显然备忘录字段给了我悲伤。 任何人都可以提出如何解决这个问题的build议,或者我应该采取什么不同的方式? objMyConn.connectionString = "ODBC;" _ & "Provider=SQLOLEDB;DRIVER={SQL Server};SERVER=VANDB;" _ & "APP=Microsoft Office 2003;DATABASE=WPDB_BE;Trusted_Connection=Yes;" objMyConn.Open 我一直在网上search的年龄,但这个Access / ADO / Excel的东西是非常痛苦的。 请帮忙。 编辑1:我后来用“TOP 1”(SQL版本的“LIMIT 1”)修改了SQL查询,发现使用该logging集备份字段被正确地返回。 同样,我可以select一个有问题的领域,并获得更多的行,例如“SELECT TOP 52 bad_field FROM …” 所以我怀疑这个问题是某种ADO连接数据大小的限制? 看来Access的“备忘录”types就像是一个“MEDIUMTEXT”MySQLtypes,那么我该如何绕过这个限制呢? 这是一个单独的问题,但是ADO连接有哪些替代scheme?

从Excel中获取数据并导入访问

我正在使用vba导入一些logging集中的一些excel行。 我使用下面的连接string "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=\\vmware-host\Shared Folders\Luca\Desktop\barcode ean.xlsx;" & _ "Extended Properties=""Excel 12.0 Xml;HDR=YES;""" 与ADODB.Command和我用这个查询来获取数据 Select * from [Foglio1$] 现在我应该在我的logging集中看到1500行,但它只包含88行 我如何获得所有logging?

将连接设置为空时,断开logging集失败

我在Windows 7(ADO 6.1)的Excel 2010中使用VBA。 我试图执行下面的代码从SQL存储过程抓取断开的logging集。 没有参数,如果我试图执行这个连接的logging集(服务器端游标),代码执行得很好。 问题发生在我尝试将activeconnection属性设置为空的最后一行。 Excelpopup一个空白的错误消息框,没有错误信息或错误号,只是vbCritical图标。 有谁知道为什么会发生错误,试图清除活动连接? Dim SQLConnectionString as String SQLConnectionString = "Driver={SQL Server};Server=SERVERNAME\INSTANCE;Database=Database;UID=user;PWD=password;" Dim cn As ADODB.Connection Dim cmd As ADODB.Command Dim rs As ADODB.recordset Set cn = New ADODB.Connection cn.Open SQLConnectionString Set cmd = New ADODB.Command Set rs = New ADODB.recordset With cmd .ActiveConnection = cn .CommandText = sp .CommandType […]

RecordCount属性不起作用

这是我的代码: Dim conServer As ADODB.Connection Dim rstResult As ADODB.Recordset Dim strSQL As String Set conServer = New ADODB.Connection conServer.ConnectionString = "PROVIDER=SQLOLEDB; " _ & "DATA SOURCE=192.168.0.204; " _ & "INITIAL CATALOG=REPORTDB2; " _ & "User ID=sa;" _ & "Password=" conServer.Open Set rstResult = New ADODB.Recordset strSQL = "set nocount on; " strSQL = strSQL & […]

传递logging集types错误

试图将Recordset传递给我的某个类的某个方法时出现types错误。 我的代码如下所示: Dim rs As ADODB.recordset Set rs = New ADODB.recordset 'do some connection stuff 'create command rs.Open cmd dataWriter.write(rs) 该方法如下所示: sub write(byRef record as ADODB.recordset) range("A1").CopyFromRecordset record end sub 一切工作,除了types错误时,我试图将logging传递给write子(例如,如果我打电话range("A1").copyfromrecordset rs在第一个代码块工作正常)。 有什么想法吗? 谢谢。

将数据值通过Vb.Net实时logging到Excel

我遇到了困难,从Excel文件中logging文本框中的所有数据值。 我只想知道如何在Excel中logging不同单元格中的数据? 它就像我需要做的一个监控系统。 有人可以帮助我如何在Excel中loggingdate和时间的值? 谢谢 :) 这里是我的示例代码: Dim OpenExcelFile As String =("C:\Users\RoseAnnMarey\Documents\TRYMUNA.xlsx") Dim oExcel As Object oExcel = CreateObject("Excel.Application") oExcel.workbooks.open(OpenExcelFile) Dim oBook As Excel.Workbook Dim oSheet As Excel.Worksheet oBook = oExcel.ActiveWorkbook oSheet = oExcel.worksheets(1) ' update the value oSheet.Range("c5:c15").Value = TextBox1.Text oSheet.Range("d5:d15").Value = TextBox2.Text oSheet.Range("b5:b15").Value = Label4.Text 'save oExcel.DisplayAlerts = True oBook.SaveAs(OpenExcelFile, 51) '51 == […]

基于编程生成的logging集的数据透视表缺less刷新button

Excel 2016。 我有我在透视表中分析的内存数据通过将透视caching设置为以编程方式创build的logging集。 这很好用! 唯一缺less的是右键点击数据透视表时通常在上下文菜单中获得的刷新选项是灰显的。 除了这个小麻烦之外,Pivot表的所有function都在那里。 今天,我通过向我的Excel加载项的自定义菜单中添加“刷新数据透视表”命令来解决刷新问题。 它有效,但我不认为这是正确的做法。 刷新数据透视表应通过上下文菜单中的常规“刷新”命令完成。 我的问题是:1)如何在使用编程生成的logging集时启用数据透视表的上下文菜单刷新命令? 2)如何捕获由于select刷新命令而导致的刷新事件? 给你更多的细节: logging集由类似于此的代码(为了方便而缩短) Public Function GetAllDataAsRecordSet() As Recordset Dim record As CSummaryDatabaseRecord Dim rst As Recordset 'Create the recordset Set rst = New Recordset 'Prepare fields With rst.fields .Append "Type", adVarChar, 25 .Append "Project Number", adInteger 'More fields here in the real application End With […]

ADOlogging集返回旧(陈旧)数据

我写了使用ADODBlogging集的VBA代码从Excel工作表中检索数据以填充用户表单。 每次运行代码时,工作表被replace为新数据。 就在几个星期前,我开始有一个问题,即logging集对象不会返回正确的数据,而是返回以前会话中使用的数据。 即使在closuresExcel文件并重新打开之后,也会发生这种情况。 例如,我将运行数据集A的代码,然后closuresExcel文件。 我重新打开Excel文件,用数据集Breplace工作表,然后运行代码。 而不是返回数据集B,它将返回数据集A.发生这种情况时,我已经确认工作表实际上包含数据集B,而不是A.为了提供更多的背景信息,我相信这是从我使用ACE连接string,而不是JET。 我被迫做这个转换,因为我开始得到JET连接string的错误。 我使用的连接string可以在下面find。 我将不胜感激任何有关这个问题的反馈。 如果需要更多信息,请告诉我。 strConnString = "Provider=Microsoft.ACE.OLEDB.12.0; Data Source=" & mstrFile & ";Extended Properties=""Excel 12.0 Macro;HDR=YES;IMEX=1"""

ADOlogging集 – 文本字段返回为双

即使数据源包含文本,我的logging集对象也会将字段作为Double数据types返回。 由于此转换,logging集对象返回该字段的空值。 数据源是一个包含静态数据的Excel工作表。 该字段中的所有logging都包含文本数据,但长度不等(3-800个字符),并且不能为空。 我随机注意到,当我在这个字段的右侧插入一个空列时,SQL查询正确地将该字段识别为文本字段(更具体地,是adLongVarWChar / Memo字段)。 这非常棒,但是如果有人能帮我弄清楚发生了什么,并且有更好的解决scheme,我将不胜感激。 我在Microsoft Excel 2016中使用以下连接string: strConnString = "Provider=Microsoft.ACE.OLEDB.12.0; Data Source=" & mstrFile & ";Extended Properties=""Excel 12.0 Macro;HDR=YES;IMEX=1"""

部分缺失Excel 2007中日志比例图表上的网格线

我使用Excel 2007创build一个数字(特别是津巴布韦美元汇率)的日志规模图表。 我使用xy散点图,注意到一个奇怪的怪癖。 y值(数字)的范围跨度约10 ^ 30的因子。 在使用这些数据的每张图表上,有一半网格线丢失。 具体来说,只有对应于最大值的网格线出现。 实际上,不pipe总的范围只有10 ^ 13左右的顶部因子有网格线。 这不依赖于日志基础。 难道我做错了什么? 这是一个已知的错误? 谷歌或微软的错误报告,我找不到任何这个问题的参考。