标签: ado

我目前正在为可再发行的应用程序使用MSAccess mdb文件.

前段时间我发现了SQLite,作为我的解决方案的替代品,但是他们提供的二进制文件并没有提供将它们用作VB6中的对象的可能性.(或者至少我无法弄清楚如何).

有没有人有链接,或者可以写一些关于从VB6连接到SQLite DB,以及它与使用ADO的区别？

在VBScript(ASP环境)中,是否可以将带有null值的参数传递给存储过程？

我是一个完全的初学者.有人可以发一些Delphi代码

• 创建一个数据库
• 添加一个简单的表
• 关闭数据库

然后,以后

• 打开一个数据库
• 阅读每张桌子
• 读取给定表的每个字段
• 执行简单的搜索

对不起,这么无能为力.我做谷歌,但没有找到有用的教程......

另外,如果底层数据库是MySql(5.1.36)(我甚至不知道这是否有任何区别)会很有用

我们一直在我们的程序中使用旧的msado15.dll.我们曾经导入它#import"msado15.dll".现在几天前我们升级到Windows 8.唉,我们的软件停止在没有安装Service Pack 1的Windows 7上运行.早些时候,当我们使用Windows 7时,我们已升级到Service Pack 1,同样的问题发生了,所以我们从所有机器上卸载了Windows 7的Service Pack 1,一切正常.

但是对于Windows 8,我认为他们已经改变了msado15.dll.我在网上进行了一些研究,他们说我们应该用msado60.tlb替换导入,但这对我们的编译破坏也没有用.

这就是我们过去在C++环境中引用的方式

import "c:\program Files\Common Files\system\ado\msado15.dll" rename_namespace("ADOCG") rename("EOF","EndofFile") 

我把它改成了

import "c:\program Files\Common Files\system\ado\msado28.tlb" rename_namespace("ADOCG") rename("EOF","EndofFile")

并尝试过

import "c:\program Files\Common Files\system\ado\msado60.tlb" rename_namespace("ADOCG") rename("EOF","EndofFile")

正如Microsoft Link所建议的那样.但它仍然适用于没有安装Service Pack 1的XP机器和Windows 7机器.

任何人都可以建议我们可以遵循的正确步骤,以使我们的程序在没有Service Pack 1的Windows 7上运行,也可以在Windows 8上运行.

几天来一直坚持这个问题.帮助将不胜感激.

问候,Saurabh

我的一些MS SQL存储过程使用'print'命令生成消息.在我的Delphi 2007应用程序中,它使用TADOConnection连接到MS SQL,如何查看这些'print'命令的输出？

关键要求:1)我不能多次运行查询; 它可能正在更新事物.2)即使返回数据集,我也需要查看"打印"结果.

这应该非常简单,但我无法使用Windows身份验证为SQL Server 2008的本地副本提供有效的连接字符串.我已经尝试使用数据链接属性工具来创建连接字符串,它没有连接问题,但当我复制粘贴生成的字符串到我的ADODB.Connection对象的ConnectionString属性时,我得到各种有趣和不同的错误.

Set conn = Server.CreateObject("ADODB.Connection")
conn.ConnectionString = "SQLNCLI10.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=climb4acure;Data Source=(local);"

Microsoft OLE DB Service Components (0x80040E21) Multiple-step OLE DB operation generated errors. Check each OLE DB status value, if available. No work was done.

我尝试了各种类似的连接字符串,但我找不到一个可以使用Windows身份验证的连接字符串.有人能指出我正确的方向吗？

谢谢!

使用SQL Server 2005和VB6

当我执行年度数据或超过3个月的数据时,它显示"Timeout Expired"错误.它没有完全执行.

我的连接字符串

ConnectionString = "Provider=SQLOLEDB.1;" & _
    "Persist Security Info=False; " & _
    "User ID=" & Settings.SQL_Username & _
    "; Password = " & Settings.SQL_Password & "; " & _
    "Initial Catalog=" & Settings.SQL_DatabaseName & ";" & _
    "Data Source=" & Settings.SQL_ServerAddress

我该如何解决这个问题？

PLZ ...

在MSDN网站上,它说:" 不支持使用OLE DB连接到SQL Azure. "

在网络上还有其他地方人们报告说,在调整连接字符串中的服务器名称后,它可以正常工作,例如此处和此处.甚至SQL Server的Analysis Services也使用OLE DB连接到SQL Azure!

我在Delphi中开发了一个本机/非托管应用程序,它通过SQL Server的OLE DB提供程序使用ADO连接到SQL Server.我正在考虑添加SQL Azure支持.如果我可以重用我的大部分代码而不需要太多改变,那将非常有用.否则我可能不会考虑这个方向.

如果微软更清楚"不支持OLE DB"的原因,将会很有帮助.如果在使用OLE DB时存在某些限制,它们是什么？也许我可以解决它们,或者它可能不会影响我.

Microsoft还提到支持ODBC.那么我可以使用"OLE DB提供程序到ODBC"并以这种方式连接？或者是包含OLE DB"不支持"的任何组合？

我正在尝试使用ADO(2.8)和没有TNS将各种VBA项目连接到Oracle 10g后端.经过各种尝试,我们认为最简单的一系列安装步骤包括:

1. 设置Oracle Instant Client
2. 安装随附的ODBC驱动程序
3. (通过SQL Plus使用EZCONNECT测试连接)
4. (通过创建Windows DSN测试连接)

到这里的一切都很好.问题是,我无法弄清楚告诉ADO使用即时客户端 ODBC驱动程序的语法,该驱动程序在我的ODBC驱动程序列表中显示为"Oracle in MyTest"(无引号).使用MSFT ODBC驱动程序和EZConnect作为这篇文章建议不会比在设置即时客户端之前更好地工作(也就是说,根本不是).但这篇文章似乎表明它是可能的,没有说明具体如何,并且connectionstrings.com只告诉你字符串的数据源部分是什么样的,即SomeUser/SomePassword @ AServer:PortNumber/InstanceName

简短版本:引用即时客户端ODBC驱动程序的经典ADO连接字符串的确切语法是什么？

在此先感谢您的帮助.给我一个愚蠢的长时间与SO ...

我想从MS Access文件中读取整个表,我正在尝试尽快完成.在测试大样本时,我发现循环计数器在读取与表的最后记录相比的最高记录时增加得更快.这是一个演示此示例的示例代码:

procedure TForm1.Button1Click(Sender: TObject);
const
  MaxRecords = 40000;
  Step = 5000;
var
  I, J: Integer;
  Table: TADOTable;
  T: Cardinal;
  Ts: TCardinalDynArray;
begin
  Table := TADOTable.Create(nil);
  Table.ConnectionString :=
    'Provider=Microsoft.ACE.OLEDB.12.0;'+
    'Data Source=BigMDB.accdb;'+
    'Mode=Read|Share Deny Read|Share Deny Write;'+
    'Persist Security Info=False';
  Table.TableName := 'Table1';
  Table.Open;

  J := 0;
  SetLength(Ts, MaxRecords div Step);
  T := GetTickCount;
  for I := 1 to MaxRecords do
  begin
    Table.Next;
    if ((I mod Step) = 0) then
    begin
      T := GetTickCount - T;
      Ts[J] := T;
      Inc(J);
      T …