Ver Mensaje Individual
  #1  
Antiguo 20-04-2009
peripla peripla is offline
Miembro
 
Registrado: abr 2006
Posts: 54
Reputación: 19
peripla Va por buen camino
Necesito traer todas las tablas de una base

Para ello utilizo lo siguiente :

Código:
  With frmRegistro do begin
    cmbtabla.Clear;
    st := 'SELECT nameas a FROM sysobjects WHERE (xtype = ' + QuotedStr('U') + ') ORDER BY name ';
    AbreQuery(st,rs);
    While not rs.Eof do begin
      cmbtabla.items.Add(rs.fieldbyname('a').AsString);
     rs.Next;
    end;

  end;
El tema es que no encuentra el campo name, por ello me devuelve un error.
Cuando listo "select * from sysobjects......" Tampoco me trae el campo name, alguien me puede ayudar ? Muchas gracias, utilizo delphi 6 y sql server 2000.
Responder Con Cita