ado

0热度

2回答

VBA使用ListColumns将Excel从SQL更新到MS SQL Server 2008

我正在使用Excel 2010 Workboox，其中宏从数据库表中提取数据。然后用户可以根据需要将Column06的值更新为特定值。完成后，他们可以运行一个宏来运行SQL更新，以便更新数据库中的Column06，其中COLUMN01和COLUMN02位于数据库表中。我知道ADO连接正在工作，因为我尝试了一个非常通用的SQL，它工作正常。我知道桌子的长度可能有所不同，所以我知道我可能需要循环行，这

0热度

1回答

ADO记录集在16个创建之后开始建立新连接

这可能是我遇到过的一个bug最困惑的地方。下面是一些会产生错误的VB代码。我不关心这个事实，我不必创建新的记录集，这是故意触发该错误的。 Public Module ConnectionSetup Public ActiveTDConnection As ADODB.Connection Public Sub ConnectToTD(ByVal userName As String, B

0热度

1回答

将ADODB.Recordset从ReST Call中作为ADODB.Recordset

我正在尝试逐步将遗留应用程序引入当前技术。我有一个在服务器上使用ADO的C++ COM +库。 VB6应用程序正在使用基于上述库的COM +对象中的Recordset。我想删除COM +层，因此我使用ASP.NET Web API项目类型创建了ReST Web服务。我似乎无法像使用内置于C＃中的HTTP结果（即Ok和BadRequest）的其他数据类型那样返回Recordset。我一直试图通过Re

-2热度

1回答

如何将字符串转换为日期以便操纵数据库

我是新来编码和有一个学校项目。我想将字符串转换为日期以更新/删除数据库中的记录，但它不断给我一个Data type mismatch in criteria expression错误。数据库中的字段（预订日期）被验证为日期，我试图将我的字符串输入转换为日期格式，然后从我的数据库中删除它的整个记录。 sdelete:= combobox.text; //shows options of dat

0热度

1回答

VBA ADODB交易

在Access 2010中开发的应用程序已通过ODBC连接到MySQL服务器。我有2个表 ContactDetails的列： ID, FirstName, LastName, TelNo, MobileNo, EmailAddress, PrimaryContact, TimeStamp 和ReportingType与列： ID, ReportType, ContactID, TimeSta

5热度

9回答

ODBC Excel驱动程序：来自外部数据库驱动程序的意外错误

自10月10日的Windows更新以来，ODBC Excel驱动程序已停止工作。我们在尝试读取文件时出现以下错误：使用与下面的连接字符串的ADO连接“从外部数据库驱动程序意外的错误（1）” 我们在Delphi中打开Excel文件： Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\MyExcel.xls;Extended Properties="Exc

1热度

1回答

异常调用“的ExecuteNonQuery”和“0”的说法（S）：“参数化查询

我使用ADO连接到从一个API输出的PowerShell中插入数据的MS SQL Server 2016 我下面的脚本： $conn = New-Object System.Data.SqlClient.SqlConnection("Data Source=XYZ; Initial Catalog=Z; Integrated Security=SSPI") $conn.Open() $cmd

0热度

1回答

VBA ADO查询中的OPENROWSET

我正在尝试在VBA程序中配置SQL UPDATE查询。基本上，我从一个关闭的工作簿中的表中更新当前工作簿中的一个表。这个伟大的工程使用下面的查询只，如果源工作簿是一个.xls文件： Sub UPDATEQUERY(SourcePath As String, SourceSheet As String, TargetSheet As String, _ Columns As String, Fi

0热度

1回答

ADO - 如何编写两个cnn.execute命令同时运行？

我有这两个工作命令，我希望他们一起工作，因为现在IdTask被粘贴到，例如，第1行和日期第2行。我希望他们在同一行。我正在使用ADO。 cnn.Execute "INSERT INTO dane([IdTask]) SELECT (qqq.[IdTask]) FROM qqq_ WHERE Line= '" & Me.ListBox1.List(lItem, 0) & "' And Task =

0热度

1回答

做新的ADODB记录集创建一个新的连接？

我想避免创建多个并发连接，我无法弄清楚如何知道幕后发生了什么。 Ex。 Sub TestConnections() Dim conn As ADODB.Connection Dim qry1 As String Dim qry2 As String Dim rs1 As New ADODB.RecordSet Dim rs2 As New ADOD