VFP 愛用者社區

[Jerry]

請問各位大大 , 如果在同一個資料庫(如 MYDBF.DBF)要將第5筆資料欄位的內容複製到新增一筆的資料上 , 應該如何寫會比較簡潔快速呢 ?
我目前的寫法是這樣 , 但是欄位很多且資料量很大 , 感覺很沒效率. 不知還有沒有其他寫法 ?

Exp.
Use mydbf share
Go 5
A1 = Alltrim(mydbf.data1) '提供變數給第五筆欄位內的資料
A2 = Alltrim(mydbf.data2)
Append Blank
Replace mydbf.data1 with A1;
mydbf.data2 with A2
wait "資料已新增 , 並且已複製." window nowait

請不吝指教 , 謝謝~

[bin1x]

scatter memvar
insert into table from memvar
+ replace 要改的欄位
據說想增加效率的方法是
多使用insert 來取代append
以前的某一本書說的
也不必記那麼多欄位變數
如果有*的話,我一定用*

這個東西讓我想到一個例子
之前使用者說要把一筆應收拆成兩筆應收帳
大概就是這種做法的放大版
我是用append 去做的
後來還有一個情況是使用者懶得打資料
要複製,就寫了一個複製的程序

[syntech]

try:

SCATTER & GATHER

or

copy to array & append from array

[bigear]

SELECT TMP1
SCATTER MEMVAR

SELECT TMP2
APPEND BLANK
GATHER MEMVAR

這樣雖然快速，但是有一個重點要注意
就是只有資料結構和命名一樣的欄位才會寫入

[Jerry]

嗯~ 感謝各位大大的指導 , 我想再問一下 , 使用SCATTER MEMVAR & GATHER MEMVAR 有無記憶體的限制 , 因為我的欄位每個資料量都很大 , 裡面都是DWG檔 & WORD檔 , 每個檔案資料量都有10MB左右 , 資料庫總欄位大約是75項. 這樣複製起來會出現記憶體不足的窘境嗎 ? (假設OS是Win2000, Main memory is 128MB , VFP 6.0)

[bin1x]

你有用general資料型態嗎?

[syntech]

個人意見,
把DWG等等包到TABLE去,
不管是管理或是更新都不太方便吧.

[215001]

go 5
copy next 1 to temp

APPEND from temp

[Jerry]

[Jerry]

[Jerry]

[ruby]

我記得要存入GENERAL規格的資料應該為GATHER MEMVAR MEMO,請試試