我用ADO连接,怎样清空SQLsever数据库?

解决方案 »

  1.   

    先找出所有用户表,用DELETE不就可以了
      

  2.   

    query1.sql.clear;
    query1.sql.add('select * from sysobjects where type=''u''');
    query1.open;
    while not query1.eof do 
    begin
      table1.tablename:=query1.fieldvalues['name'];
      table1.emptytable;
      query1.next;
    end;-----------
    其中query1.fieldvalues['name'];
    的name字段好象不是这个名字可能要调试一下,笨办法一个,应该还有好一点的
      

  3.   

    with adoquery1 do
    begin
     clear;
     sql.add('delete from table1');
     open;
    end;
    table1是你要删除数据的表名!
      

  4.   

    你是要删除表吗?
    如果是
    drop table tablename
    如果是删除表记录则:
    delete table where......
      

  5.   

    with ADOQuery1 do
    begin
      close;
      sql.clear;
      sql.add('select name from sysobjects');
      sql.add('where type='''+'u'+'''');
      Open;
    endwhile not ADOQuery.Eof do
    begin
    with ADOQuery2 do
    begin
      Close;
      SQL.clear;
      SQL.Add('delete '''+ADOQuery.FieldByName('name').asstring+'''');
      ExecSQL;
    end;
    ADOquery1.next;
    end;
    try it,good luck!