如题(在线等待)

解决方案 »

  1.   

    QuotedStr(要加引号的字符串)。
      

  2.   

    这个方法试过了不行
    我的意思是说SQL Server SA的密码是'号
    用delphi连接字符串, quotedstr()函数是不行的
    不知道有另法没?
      

  3.   

    ADOConnection1.ConnectionString :='...;Password='';...';//密码为一个单引号
    这样不行吗?
      

  4.   

    不行,不行,还是提示出错
    quotedstr只是把单引号中的一个单引号将转成两个
    SQL server密码为一个单引号
    那delphi连接字符串,怎么写了:P
    以上都不行哦:P
      

  5.   

    s ;= '''';
    ADOConnection1.ConnectionString :='...;Password='+s+';...';
      

  6.   

    dulei115() .也不行,老早就试过了,不行
      

  7.   

    比如 SA 是 pw'2那字符串就是'pw''2'
      

  8.   

    'Password='+#19+'xxxxx'
     黒黒  我忘了是不是#19了  查查以前的贴
      

  9.   

    用ASC码,单引号是39,十六进制是27
      

  10.   

    你运行  ShowMessage('''');你看结果是什么,'的转意符号就是'
      

  11.   

    你用单引号的ASCII码绝对可以。我刚才试了的。
    'password ='+ #39;就表示密码是一个单引号了。
    一定可以的。
      

  12.   

    可以这样用,str := '''' + 'ssss' + '''';
    ShowMessage(str)可以得到'ssss'
      

  13.   

    #39好像就可以的吧
    同意snowredhxh(梦醒了)
      

  14.   

    我想你们都是用TADOConnection来连接吧,才不会遇到这个问题:P
    你们用ADO的原生对象来连接看看,就会出现不符合规定的提示了?
    如何解决了,等待高人~~
      

  15.   

    procedure TForm1.Button1Click(Sender: TObject);
    var
      conn: _Connection;
      wstr: WideString;
    begin
      conn := CoConnection.Create;
      try
        wstr := 'Provider=SQLOLEDB.1' +
                    ';Password=' + QuotedStr('''') +
                    ';User ID=test;' +
                    ';Initial Catalog=twshoes;' +
                    ';Data Source=HOME001\TW_51SHOES';
        conn.Open(wstr, '', '', 0);
      finally
        conn := nil;
      end;
    end;以上代码在win2000(sp4) + delphi7 + sqlserver2000 + ado2.7上测试通过。
      

  16.   

    procedure TForm1.Button1Click(Sender: TObject);
    var
      conn: _Connection;
      wstr: WideString;
    begin
      conn := CoConnection.Create;
      try
        wstr := 'Provider=SQLOLEDB.1' +
                    ';Password=''' + sPassWord +
                    ''';User ID=test;' +
                    ';Initial Catalog=twshoes;' +
                    ';Data Source=HOME001\TW_51SHOES';
        conn.Open(wstr, '', '', 0);
      finally
        conn := nil;
      end;
    end;