关于用Delphi把指定文件夹下的jpg图片存储到Oracle中（在线等候）！

用Delphi把指定文件夹下的jpg图片存储到Oracle中
比如：
     jpg图片存储在\\user1\views下；
     Oracle中的表为TableName=View  字段为PiuctureFile
然后还要用Delphi把图片取出显示！

解决方案 »

  1.   

    请教 dickeybird888(于伟刚) 
    用Delphi把指定文件夹下的jpg图片存储到Oracle中
    比如：
         jpg图片存储在\\user1\views目录下；
         Oracle中的表为TableName=View  字段为id，filename，PiuctureFile，bh(编号)
    这样怎么去做？！
      

  2.   

    各位大侠请指点下，如何将dbf文件转成txt文件？
    谢谢!
      [email protected]
      

  3.   

    To dickeybird888(于伟刚) 我的语句是这样写的：
    INSERT View (BH,filename,PiuctureFile) VALUES (:BH,:filename,EMPTY_BLOB())；
    dmApplogin.OraYsxx.Params[0].AsInteger:= StrToInt(SField);
    dmApplogin.OraYsxx.Params[1].AsString:= StrXFieldName;
    ExecSQL;
    然后执行到ExecSQL时报错！说缺少INTO关键字！！！是何原因？谢谢！
      

  4.   

    ///语句应该为insert into view而不是insert view...........//我之前的写错了
    INSERT into View (BH,filename,PiuctureFile) VALUES (:BH,:filename,EMPTY_BLOB())；
    dmApplogin.OraYsxx.Params[0].AsInteger:= StrToInt(SField);
    dmApplogin.OraYsxx.Params[1].AsString:= StrXFieldName;
    ExecSQL;
      

  5.   

    To dickeybird888(于伟刚) 
    我刚才也写错了，我原来也有into的！
    我的语句和你写的一样没有一般性的语法错误：
    INSERT Into View (BH,filename,PiuctureFile) VALUES (:BH,:filename,EMPTY_BLOB())；
    dmApplogin.OraYsxx.Params[0].AsInteger:= StrToInt(SField);
    dmApplogin.OraYsxx.Params[1].AsString:= StrXFieldName;
    ExecSQL;
    然后执行到ExecSQL时报错！说缺少INTO关键字！！！是何原因？谢谢！
      

  6.   

    To dickeybird888(于伟刚) 
    我看过一篇文章说应该这样写：create or replace directory utllobdir as 'e:\';
    create table utl_lob_test (blob_column BLOB);declare
      a_blob  BLOB;
    begin
      insert into utl_lob_test values (empty_blob())
        returning blob_column into a_blob;
      dbms_lob.fileopen(a_bfile);
      dbms_lob.loadfromfile(a_blob, a_bfile, dbms_lob.getlength(a_bfile));
      dbms_lob.fileclose(a_bfile);
      commit;
    end;
    /
    但不是太明白？？？？
      

  7.   

    你看看这篇文章：http://expert.csdn.net/Expert/topic/2624/2624946.xml?temp=.83836
      

  8.   

    dataset1.edit;
    (Dataset1.FieldByName('BlobField') as TBlobField).LoadFromFile('E:\xxx.bmp');
    dataset1.post;
      

  9.   

    menggirl(看天上浮云，胜似闲庭信步)
    还是不行呀！
      

  10.   

    你的insert into view....
    view是不是用到关键字了？？？
    816以上的都可以INSERT了的，805 BLOE不能直接INSERT
      

  11.   

    ----Oracle中的表为TableName=View  字段真是怪了，你的表怎么建起来的
    我想用VIEW做表名看是不是关键字的问题
    提示说：无效的表名！
    你换个表名字看看吧
      

  12.   

    cxreal(转身离开的是你) :谢谢您！我只是举个例子！
    dickeybird888(于伟刚) ：
    现在我按照您所说的全部重写代码！但是还是报错说没有我的字段（我要插入的“Blob”字段）！好象是不接受我的blob字段！
      

  13.   

    误会了，
    如果你的问题解决了，
    能不能把源程序给偶一份，偶想看看
    [email protected]
    谢谢
      

  14.   

    提示大家！！
    我用的是ODAC控件呀！
      

  15.   

    问题还是自己解决的呀！！！！
    用的是ODAC呀！！！不过也很感谢大家！！