在开一贴送分， 只要告诉明白我就行

Question

怎么样用代码执行sql脚本？？

Answer 1

脚本文件其实就是文本文件，用String把文件读进来再赋给TQUERY下的SQL，执行，OK

Answer 2

建成一个bat批处理文件，然后执行这个bat文件就可以执行SQL脚本了
附上SQL SERVER脚本的格式：isqlw /S (local) /d 数据库名称 /U 用户名 /P 密码 /i .\sql.sql /o .\s.txt其中.\sql.sql是输入文件
s.txt为输出文件
把该文件保存为一个bat文件，

Answer 3

先把数据库中导出脚本为.sql的文件
用osql来执行，在delphi中用winexe函数来调用
winexe('osql …………‘，1)；
就ok了

Answer 4

讲明白一点啊.CSDN是找一下吧.说不定都有了

Answer 5

讲明白一点啊
是不是说嵌入式SQL语句啊

Answer 6

isqlw /S (local) /d 数据库名称 /U 用户名 /P 密码 /i .\sql.sql /o .\s.txtbee2518(迷茫ing)说的对！！用WINEXEC来调用上述代码，，其实是在DOS下调用SQL SERVER的“查询分析器”来装载sql脚本

Answer 7

只要你愿意，你可以：
从网页上输入一条SQL语句，然后执行它；
从应用程序的界面接受SQL语句的输入然后执行它；
从应用程序打开一个脚本然后执行它；
创建一个任务让SQLServer自己执行它；
关键在于，你想干什么？

Answer 8

ADOQuery1.SQL.Add('Select * from 表1');
ADOQuery1.Open ;

Answer 9

ADOQuery1.SQL.Add('Select * from 表1');
ADOQuery1.Open ;

Answer 10

读出批处理中的内容，传给AdoQuery.Sql

Answer 11

ADOQuery1.close
ADOQuery1.sql.clear
ADOQuery1.SQL.Add('Select * from 表1');
ADOQuery1.Open ;

Answer 12

哈哈，什么样的答案都有啊，我想做年度结转，当结转的时候生成个新数据库和原来数据库有一样的表结构，所以我把原来数据库做了个sql脚本，这个脚本一执行就可以生成新的表结构而没有记录了，然后在考虑往这个新库的表中添加符合条件的记录，也不知道这个思路对不对，昨天遇到的问题我就是不会用代码执行sql脚本文件，呵呵， 大家在看看我的思路对不对，欢迎讨论，然后我结帖。

Answer 13

  exec select ....

Answer 14

我找到执行sql脚本的代码了， 就象firec说的，其实也没什么难度，就是以前没见过，我贴上来先。
在处理MSDE一些操作中。需要执行一些SQL脚本。有的是从
SQLServer 2000中生成的SQL为后缀的脚本。在MSDE中没有企业管理器，
操作都是在程序中完成的。所以用以下函数来执行SQL脚本。//执行一个SQL角本文件，文件只能是ANSI编码的。
//如果文件是UNICODE编码的话，则会乱码。
var
  s:string;
  sqltext : string;
  sqlfile : TextFile;
begin
  if OpenDialog1.Execute then
  begin
    AssignFile(sqlfile, OpenDialog1.FileName);
    FileMode := 0;
    Reset(sqlfile);
    try
      ADOConnection1.BeginTrans;
      while not eof(sqlfile) do
      begin
        Readln(sqlfile, s);
        sqltext:=s;
        while (not eof(sqlfile)) and 
        (uppercase(trim(s))<>'GO') do
        begin
          Readln(sqlfile, s);
          if (uppercase(trim(s))<>'GO') then
            sqltext:=sqltext+' '+s;
        end;
        adoquery1.Close;
        adoquery1.SQL.Clear;
        adoquery1.SQL.Add(sqltext);
        adoquery1.ExecSQL;
      end;
      CloseFile(sqlfile);
      ADOConnection1.CommitTrans;
      application.MessageBox('SQL角本完成！',
        '提示',MB_OK+MB_ICONINFORMATION);
    except
      raise exception.Create('SQL角本执行失败!');
      ADOConnection1.RollbackTrans;
    end;
  end;
end;其中：ADOConnection1,adoquery1,OpenDialog1都是窗口中放置的控件。可以将之设为局部变量，在本函数内创建和消毁。20:03:52