挂单表gd_struct中三个字段 ID integer,file_name varchar(100),file_excel blob。
file_name 存放EXCEL文件名;file_excel 存放EXCEL文件。点击 显示 按钮后,如何以EXCEL文件显示出来?

解决方案 »

  1.   


    procedure   TForm1.Button1Click(Sender:   TObject);//保存文件   
      var   str:Tmemorystream;   
      begin   
      str:=Tmemorystream.Create;   
      str.LoadFromFile('c:\1.xls');   
      str.Position:=0;   
      adoquery1.Append;   
      Tblobfield(adoquery1.FieldByName('fieldname')).loadfromstream(str);   
      try   
      adoquery1.Post;   
      finally   
      str.Free;   
      end;   
      end;   
        
      procedure   TForm1.Button2Click(Sender:   TObject);//读取文件   
      var   str:Tmemorystream;   
      begin   
      str:=Tmemorystream.Create;   
      str.Position:=0;   
      Tblobfield(adoquery1.FieldByName('fieldname')).savetostream(str);   
      str.SaveToFile('c:\2.xls');   
      str.Free;   
      end;
      

  2.   

    兄弟,它怎么全是乱码;
    ?鸡峻貮糀o{怇購謡[駇披}&桡t┥1鮲;跸v鷊Rw鑮^啄C截7|.藇?:臊做﹜泾O鹎(/e髂D骩京司齝U呔\R/?銀"蘽T零o8_WL篞糰紀伎暬?风莀E~黆x歐眪
      

  3.   

    step1:把blob的存成文件 or stream
    setp2:文件 or stream 插入到excel裡問一下你blob字段裡的內容是什麼啊?是不是圖片啊?
      

  4.   

    特殊要求 GW TH MC SL LX 装配工 检验员
    6*4 11.00R20车轮与轮胎(横,F2000)M5.920双级双桥180端1860四片1040铸S悬
    BY DZ1600840122 干燥罐总成 1
    BY DZ13241930141 "陕汽重卡"装饰字 1
    G1 DZ11241180017 高顶驾驶室本体 1
    G2 DZ1660690011 发动机罩下隔音板 1
    G2 DZ1660690061 通道隔音垫 1
    G4 DZ91189230068 离合器总泵总成 1
    G4 DZ9100360462 行车制动阀 1
    G4 DZ91189230010 离合器踏板臂总成 1
    2 DZ9100770155 驾驶室顶盖电线束(新内饰) 1
    2 DZ9100570020 手油门操纵杆总成 1
    14 DZ1692570200 窗帘导轨总成 1
    17 DZ12241710102 左侧窗不透光玻璃 1
    17 DZ12241710103 右侧窗不透光玻璃 1
    17 DZ12241710101 左侧窗玻璃密封条 1
    谁有完整代码,帮帮忙啊!!oracle blob 以excel存放的数据,点击显示 按钮后,调用EXCEL文件显示出来?