Re: [PerlChina] 有用过DBD::ADO的?

我这个是指变为SQL语句时的转义，常见的是'可能转为\'或者''这样呢。

今天用下面的脚本测试了一下，才大概知道问题出在哪里了。

#!/usr/bin/perl

use DBD::ADO;
use strict;

my $uid = 'sa';
my $pwd = 'pwd';
my $dsn = 'xxx';

my $dbh = DBI->connect('dbi:ADO:DSN=' . $dsn, $uid, $pwd) or die "dbi: " . $DBI::errstr;

print $dbh->quote("a'bc"), "\n";    #       ---------------> 'a''bc'
print $dbh->quote("a'bc", DBI::SQL_WVARCHAR), "\n"; # -----> N'a'bc'

$dbh->disconnect;


Haiyan Lin wrote:

perl 里面不是只对 "  " 里面的转义，不对 '  ' 里面的 转义的吗？

----- Original Message ----- From: "Beckheng Lam" <bi.ken.lam@gmail.com>
To: <perlchina@googlegroups.com>
Sent: Sunday, January 17, 2010 7:55 PM
Subject: [PerlChina] 有用过DBD::ADO的?

是不是直接用$dbh->quote('xxx', DBI::SQL_WVARCHAR)的时候，不会对内容的'
（单引号）进行转义？
 

--  Perl乐事 -- http://www.perlersh.org 我的博客 -- http://www.perlersh.org/blog.html 揭谛揭谛，波罗揭谛，波罗僧揭谛，菩提萨婆诃。