 |
VFP 愛用者社區
本討論區為 Visual Foxpro 愛用者經驗交流的地方, 請多多利用"搜尋"的功能, 先查看看有無前例可循, 如果還有不懂的再發問. 部份主題有附加檔案, 須先註冊成為社區居民才可以下載.
|
| 上一篇主題 :: 下一篇主題 |
| 發表人 |
內容 |
Ruey
註冊時間: 2003-03-12
文章: 1698
來自: tunglo
第 1 樓
|
 發表於: 星期二 五月 20, 2003 1:49 pm 文章主題: 如何讓Cursor可更新? |
 |
|
VFP產生CURSOR無法更新資料時,我們可以使用下列方式改變
| 代碼: | &&rptTable2為傳入的Cursor名稱
&&rptTable為轉換後的Cursor
IF USED("rptTable") &&如果已�}啟rptTable時,要先關閉
USE IN rptTable
ENDIF
SELECT 0
USE DBF("rptTable2") AGAIN ALIAS rptTable
USE IN rptTable2 &&這一行可以不用, |
_________________
#############################
快樂媽咪系列幸福宅配,喝十全雞湯~原來幸福那麼簡單!!
學會VFP使用者社區的搜尋,Code才會更有趣~
#############################
Ruey 在 星期二 九月 02, 2003 5:29 pm 作了第 2 次修改 |
|
| 回頂端 |
|
 |
Ruey
註冊時間: 2003-03-12
文章: 1698
來自: tunglo
第 2 樓
|
| 發表於: 星期二 五月 20, 2003 2:40 pm 文章主題: |
|
|
*--將一個CURSOR或TABLE變成一個可寫的CURSOR(轉貼)
| 代碼: | FUNCTION CursorWritable
PARAMETER tcAlias
LOCAL
lnOldArea,lcTcAlias,lcTableName,lcTcAlias1
IF PARAMETER()=0
tcAlias=ALIAS()
ENDIF
lnOldArea=SELECT()
lcTcAlias=sys(2015)
lcTcAlias1=sys(2015)
IF AT('.TMP',DBF(tcAlias)) # 0
USE (DBF(tcAlias)) again alias (lcTcAlias) IN 0
Select (tcAlias)
use
USE (DBF(lcT?Alias)) again alias (tcAlias)
Use in (lcTcAlias)
ELSE
Use (dbf(tcAlias)) Again alias (lcTcAlias) in 0
Select *;
from (lcT?Alias);
into Cursor (lcTcAlias1) nofilter
Use in (lcTcAlias)
Select (tcAlias)
use
USE (DBF(lcTcAlias1)) again alias (tcAlias)
Use in (lcTcAlias1)
ENDIF
Select (lnOldArea)
RETURN |
_________________
#############################
快樂媽咪系列幸福宅配,喝十全雞湯~原來幸福那麼簡單!!
學會VFP使用者社區的搜尋,Code才會更有趣~
############################# |
|
| 回頂端 |
|
|
Ruey
註冊時間: 2003-03-12
文章: 1698
來自: tunglo
第 3 樓
|
| 發表於: 星期五 二月 13, 2004 4:39 pm 文章主題: |
|
|
VFP7版後有一個屬性可直接更改cursor存取模式
READWRITE
_________________
#############################
快樂媽咪系列幸福宅配,喝十全雞湯~原來幸福那麼簡單!!
學會VFP使用者社區的搜尋,Code才會更有趣~
############################# |
|
| 回頂端 |
|
|
|
|
您 無法 在這個版面發表文章
您 無法 在這個版面回覆文章
您 無法 在這個版面編輯文章
您 無法 在這個版面刪除文章
您 無法 在這個版面進行投票
您 無法 在這個版面附加檔案
您 無法 在這個版面下載檔案
|
|
常見問題
搜尋
會員列表
會員群組
會員註冊
個人資料
登入檢查您的私人訊息
登入
