Array
(
)

Consulta em banco mysql - nao estou conseguindo

Mmoreira
   - 06 out 2005

Salve,

iniciei um novo projeto asp.net com o delphi 2005, estou tentando acessar uma base de dados em mysql estou fazendo assim:


Citação:

var
Dreader : OdbcDataReader;
Comando : OdbcCommand;
Str : string;

begin

Str := ´select razao from cliente where idcliente = @idcliente´;
Comando := OdbcCommand.Create( Str, ConnLogonCliente );

Comando.Parameters.Add( ´@idcliente´, OdbcType.NVarChar, 20, ´idcliente´);
Comando.Parameters[ ´@idcliente´ ].Value := logon;

try
Comando.Connection.Open();
Dreader := Comando.ExecuteReader();
Label3.Text := Dreader.Item[ ´razao´ ].ToString;
finally
Dreader.Close();
Comando.Connection.Close();
end;

end;



minha string de conexão: DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;DATABASE=mafil;UID=root;PASSWORD=uroot;OPTION=3;

O erro que esta sendo retornado no browser: Server Error in ´/mafil´ Application.
--------------------------------------------------------------------------------

No data exists for the row/column.

esta linha vem descada de vermelho: Line 191: Label3.Text := Dreader.Item[ ´razao´ ].ToString;

alguem ai pode me dar um help?


Otto
   - 09 out 2005


Citação:
var
Dreader : OdbcDataReader;
Comando : OdbcCommand;
Str : string;

begin

Str := ´select razao from cliente where idcliente = @idcliente´;
Comando := OdbcCommand.Create( Str, ConnLogonCliente );

Comando.Parameters.Add( ´@idcliente´, OdbcType.NVarChar, 20, ´idcliente´);
Comando.Parameters[ ´@idcliente´ ].Value := logon;

try
Comando.Connection.Open();
Dreader := Comando.ExecuteReader();
Dreader.read();
Label3.Text := Dreader.Item[ ´razao´ ].ToString;
finally
Dreader.Close();
Comando.Connection.Close();
end;

end;


tenta agora :)


Mmoreira
   - 10 out 2005

valew Otto

Isso resolveu meu problema!!!