请教如何在access的ole字段中插入一个可执行文件,然后通过数据库组件取了出来保存为可执行文件

解决方案 »

  1.   

    我的取出代码如下:可不知道为什么不能执行,而通过access手工取出来并保存后,可以执行的,不知道是为什么,我的代码有什么问题吗?请指教!var  sqlStr:String;
    begin
      if FileExists('c:\rctax.exe') then
        DeleteFile('c:\rctax.exe');
      sqlStr:='select appname from upapp';
      ClientDataSet1.Close;
      ClientDataSet1.CommandText:=sqlStr;
      ClientDataSet1.Open;
      with ClientDataSet1 do
      begin
        FieldByName('appname').SetFieldType(ftBlob);
        TBlobField(ClientDataSet1.Fields.FieldByName('appname')).SaveToFile('c:\rctax.exe');
      end;
    end;
      

  2.   

    发现取出的文件头上含有如下字符:        包 Package         Package         Z?  Rctax.exe D:\MYPROG~1\rc7\rctax\rctax.exe        D:\MYPROG~1\rc7\rctax\rctax.exe  ? 我手工删除这些字符后,软件可以运行了
    请教如何使文件取出时,就不包含这些字符或者在取出后删除这些字符呀