線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:2098
推到 Plurk!
推到 Facebook!

如何從Blob field 轉至 String field

尚未結案
h5rong
一般會員


發表:32
回覆:44
積分:15
註冊:2003-08-27

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-04-14 07:47:45 IP:61.221.xxx.xxx 未訂閱
請問: 今有 dbf 檔 TABLE A 檔 及 MS SQL TABLE C , TABLE A 有 Blob field,欄位名稱為 note TABLE C 有 string field,欄位名稱為 memo 如何從TABLE A 之 Blob field 轉移至 TABLE C 之 STRING 型態的欄位? MS:TMemoryStream; TBlobField(C.fieldbyname('note')).SavetoString(MS); MS.Position:=0; 不知如何 load 至 TABLE C 之 string field :memo 感恩.. 發表人 - h5rong 於 2005/04/14 07:58:24
Chance36
版主


發表:31
回覆:1033
積分:792
註冊:2002-12-31

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-04-15 02:53:31 IP:203.204.xxx.xxx 未訂閱
C.fieldbyname('memoe').AsString := A.FieldByName('note').AsString;    直接當成String來處理,只是memo的欄位長度是否足够?    _______________________________________ 深藍的魚,祝您好運..........連連
h5rong
一般會員


發表:32
回覆:44
積分:15
註冊:2003-08-27

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-04-15 09:09:54 IP:61.221.xxx.xxx 未訂閱
引言: C.fieldbyname('memoe').AsString := A.FieldByName('note').AsString; 直接當成String來處理,只是memo的欄位長度是否足够? _______________________________________ 深藍的魚,祝您好運..........連連
謝謝! 可是若用 BDE 連線 如 query or table ,來源 TABLE A 之 BLOB 一欄無法顯示原先的值,而是空的,所以用上述方式,帶入 TABLE C 也是空的.不曉得應如何調整. 發表人 - h5rong 於 2005/04/15 10:33:03
Mickey
版主


發表:77
回覆:1882
積分:1390
註冊:2002-12-11

發送簡訊給我
#4 引用回覆 回覆 發表時間:2005-04-15 19:40:50 IP:218.32.xxx.xxx 未訂閱
MS 改用 TStringStream , C.fieldbyname('memoe').AsString := MS.Datastring; 試試看.
h5rong
一般會員


發表:32
回覆:44
積分:15
註冊:2003-08-27

發送簡訊給我
#5 引用回覆 回覆 發表時間:2005-04-15 21:21:16 IP:61.221.xxx.xxx 未訂閱
引言: MS 改用 TStringStream , C.fieldbyname('memo').AsString := MS.Datastring; 試試看.
謝謝 大家的回答,嘗試用 MS:TStringStream; TBlobField(A.FieldByName('note')).SaveToStream(MS); C.fieldbyname('memo').AsString := MS.Datastring; 但系統出現 access violation XXXXXXX....之錯誤訊息,還望大家集思廣益 謝謝...
Mickey
版主


發表:77
回覆:1882
積分:1390
註冊:2002-12-11

發送簡訊給我
#6 引用回覆 回覆 發表時間:2005-04-15 21:34:15 IP:218.32.xxx.xxx 未訂閱
access violation .... MS 有 Create 嗎 ?
h5rong
一般會員


發表:32
回覆:44
積分:15
註冊:2003-08-27

發送簡訊給我
#7 引用回覆 回覆 發表時間:2005-04-15 22:17:57 IP:61.221.xxx.xxx 未訂閱
再次謝謝版主的提醒 ; 程式修改如下: MS:TStringStream; findstr:String MS:=TStringStream.Create(findstr); TBlobField(A.FieldByName('note')).SaveToStream(MS); C.fieldbyname('memo').AsString := MS.Datastring; MS.Datastring 還是空的...... 發表人 - h5rong 於 2005/04/15 22:42:39
h5rong
一般會員


發表:32
回覆:44
積分:15
註冊:2003-08-27

發送簡訊給我
#8 引用回覆 回覆 發表時間:2005-04-17 22:04:45 IP:61.221.xxx.xxx 未訂閱
Sorry!我忘了加上*.FPT 檔,問題已解決,謝謝大家的回答
系統時間:2024-07-04 15:01:22
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!