- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
我有一个 Delphi 7 项目,我使用 TAdoQuery.ParseSql(); 来加载参数。现在我在XE4中编译它,参数类型有时是错误的。它实际上是 ftInteger
,但创建为 ftSmallint
。我可以做什么来解决这个问题?我的数据库是SQL Server 2008 R2。
表定义:
CREATE TABLE [dbo].[tblTest](
[sysId] [int] IDENTITY(1,1) NOT NULL,
[Code] [nvarchar](50) NOT NULL,
[Name] [nvarchar](500) NOT NULL,
CONSTRAINT [PK_tblTest]
PRIMARY KEY CLUSTERED ( [sysId] ASC )
WITH ( PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF,
ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON )
ON [PRIMARY] )
ON [PRIMARY]
示例数据:
INSERT INTO tblTest ( Code, Name ) VALUES ( 'a1', 'name1' )
德尔福代码:
ADOQuery.SQL.Text := 'SELECT * FROM tblTest WHERE sysId = :sysId';
AdoQuery.Parameters.ParseSQL(ADOQuery.SQL.Text,True);
AdoQuery.Parameters.ParamByName('sysId').value := -1;
AdoQuery.open;
ConnectionString
(数据库:MyDb
)
Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=MyDb;Data Source=.
作为解决方案,我使用这个delphi代码
AdoQuery.Parameters.ParseSQL(ADOQuery.SQL.Text,false);
现在有人可以解释一下吗?有副作用吗?
最佳答案
首先,在我对 ParseSQL 进行任何解释之前,请检查您的连接字符串。初始值和目录之间有两个空格。当我使用该连接字符串时,打开查询时出现错误,tblTest 不存在。删除多余的空间解决了这个问题。
当我看到这个问题时,我不知道 ParseSQL 是做什么的。我多年来一直从事 Delphi/SQL Server/ADO 开发,但从未使用过它。我认为这将是一个学习新东西的机会。
请注意,我运行的所有测试在 Delphi 7 和 Delphi XE5 中都给出了相同的结果。我仍然很想看到一些在 Delphi 7 中工作但在 Delphi XE5 中不起作用的代码。
当您执行AdoQuery.SQL.Text:='...'
时,如果连接已设置并打开,您的应用程序将创建参数,并查询数据库服务器以确定它们的类型。这段代码:
AdoQuery := tAdoQuery . Create(nil);
AdoQuery . Connection := AdoConnection;
ADOQuery.SQL.Text := 'SELECT * FROM tblTest WHERE sysId = :sysId';
aDataType := AdoQuery.Parameters.ParamByName ( 'sysId' ) . DataType;
Msg ( 'Parameter type = ' + DataTypeToString ( aDataType ) );
将导致:
Parameter type = ftInteger
注意,DataTypeToString 只是我编写的用于将 tDataType 转换为字符串的例程。
function DataTypeToString ( const nDataType : tDataType ) : string;
begin
Result := GetEnumName ( TypeInfo(tDataType),
integer (nDataType) );
end;
然后执行这段代码。
AdoQuery.Parameters.ParamByName ( 'sysId' ) . Value := -1;
AdoQuery . Open;
如果您运行 SQL Profiler,您将看到发送到 SQL Server 的查询:
exec sp_executesql N'SELECT * FROM tblTest WHERE sysId = @P1
',N'@P1 int',-1
请注意,@P1 被声明为 int
。
注意:如果连接字符串中有两个空格,则参数类型将显示为 ftUnknown
,@P1 类型将为 smallint
。该答案的其余部分将假设您拥有带有一个空格的正确连接字符串。
使用 DoCreate=true
调用 ParseSQL
会做什么?
AdoQuery.Parameters.ParseSQL(ADOQuery.SQL.Text,True);
它所做的第一件事是清除参数列表。在这种情况下,这意味着我们已经拥有的正确键入的参数被破坏。 ParseSQL
然后解析 SQL 并找到参数。它创建一个名为 sysID
的新 tParameter
对象并将其添加到列表中。新参数的类型为 ftUnknown
。
为什么有人想要这样做?如果查询连接未设置或未打开,这可能非常有用。将为您构建参数列表,之后您可以显式设置它们的数据类型。
如果您使用 DoCreate=false
执行 ParseSQL
会怎样:
AdoQuery.Parameters.ParseSQL(ADOQuery.SQL.Text,false);
答案是:什么也没有。 ParseSQL 会解析 SQL,找到参数,然后返回一个像这样的字符串:
SELECT * FROM tblTest WHERE sysId = ?
用问号替换参数。它不会对参数列表进行任何更改。由于您的代码对返回的字符串不执行任何操作,因此最终结果是对 ParseSQL 的调用不会发生任何更改。
关于delphi - TAdoQuery.ParseSql 在 xe4 中不起作用,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/21194122/
今天有小伙伴给我留言问到,try{...}catch(){...}是什么意思?它用来干什么? 简单的说 他们是用来捕获异常的 下面我们通过一个例子来详细讲解下
我正在努力提高网站的可访问性,但我不知道如何在页脚中标记社交媒体链接列表。这些链接指向我在 facecook、twitter 等上的帐户。我不想用 role="navigation" 标记这些链接,因
说现在是 6 点,我有一个 Timer 并在 10 点安排了一个 TimerTask。之后,System DateTime 被其他服务(例如 ntp)调整为 9 点钟。我仍然希望我的 TimerTas
就目前而言,这个问题不适合我们的问答形式。我们希望答案得到事实、引用资料或专业知识的支持,但这个问题可能会引发辩论、争论、投票或扩展讨论。如果您觉得这个问题可以改进并可能重新打开,visit the
我就废话不多说了,大家还是直接看代码吧~ ? 1
Maven系列1 1.什么是Maven? Maven是一个项目管理工具,它包含了一个对象模型。一组标准集合,一个依赖管理系统。和用来运行定义在生命周期阶段中插件目标和逻辑。 核心功能 Mav
我是一名优秀的程序员,十分优秀!