关于操作SQL Server的几个问题

Question

要求实现对SQL Server的几个操作
1、在程序中自动建立数据库，能判断是否重复
2、在程序中自动建立表，能判断是否重复
3、在程序中实现备份和恢复功能
能否提供详细的源代码。

Answer 1

simonzone(病毒)
我有急用，贴出代码来吧

Answer 2

完全可以查帮助的，无非就是几个SQL语句。
create database 数据库名
create table （字段列表）
可以用try except

Answer 3

好好看看create database，create table的帮助就ok了！
贴出来也只是帮助的那些内容

Answer 4

判断数据库是否存在：看连不连的上数据库不就行了。判断表是否存在select * from dbo.sysobjects where id = object_id(N'[dbo].[' + m_TableName + ]') and OBJECTPROPERTY(id, N'IsUserTable') = 1

Answer 5

3 是否指数据库数据的导入导出？VB的话我用DTS，想Delphi也可以用其他方法吧，没试过不知道速度怎样。

Answer 6

大家帮帮忙呀，我有急用
在Delphi实现以上功能

Answer 7

1、创建数据库可以这样：
IF EXISTS (SELECT *
                FROM sysdatabases
                WHERE name = '数据库名称') 
BEGIN
  DROP database 数据库名称
END;
CREATE database 数据库名称;2、创建表：
IF EXISTS (SELECT *
                FROM sysobjects
                WHERE name = '表名') 
BEGIN
  DROP TABLE 表名
END;
CREATE TABLE 表名
(
  字段ID          int not null IDENTITY,
  字段1            varchar(16) primary key,
  字段2            varchar(100) not null,
  ......
  字段n            varchar(100) not null /*注意这里没有逗号*/
) /修复Access数据库
function DaoRepairDB(const FileName:string):Boolean;
var
  db:OleVariant;
begin
  Result:=False;
  try
    if not DaoActive(db) then
      Exit;
    try
      db.RepairDatabase(FileName);
      Result:=True;
    except
      on E:EOleException do
        ShowMessage(E.Message);
    end
  finally
    db:=Unassigned;
  end;
end;

Answer 8

to bee2518(真棒):
那是在SQL中的，在DELPHI中怎么写呀

Answer 9

用一個ADOCommand1傳送bee2518(真棒)的代碼.

Answer 10

SQL自带HELP 挺好,看一下 吧