下面腳本是向資料庫中的表contract輸入資料，但是輸入資料后，只顯示原來就有的資料，無法顯示新輸入的內容，請各位看看，有沒有地方不對？
另外：我的另一個表staff，用了同樣的腳本，輸入資料，是可以顯示新輸入的內容，為什么contract表就不行呢？很是奇怪啊？？？
long ll_id,ll_i
date ld_open,ld_end
string ls_name,ls_sex,ls_tel,ls_idno,ls_company,ls_type,ls_city,ls_home
//資料格式檢驗
if sle_id.text="" or isnull(sle_id.text) then
messagebox("缺少資料","請輸入號碼")
sle_id.setfocus()
return
elseif sle_name.text="" or isnull(sle_name.text) then
messagebox("缺少資料","請輸入號碼")
sle_name.setfocus()
return
end if
ll_id=long(sle_id.text)
//取出性別選擇
if rb_man.checked=true then
ls_sex=rb_man.text
elseif rb_woman.checked=true then
ls_sex=rb_woman.text
end if
//檢查號碼是否重號
SELECT contract.sta_id
INTO:ll_i
FROM contract
WHERE contract.sta_id=:ll_id;
if ll_i<>0 then
messagebox("錯誤資訊","編號第"+string(ll_i)+"號重號！請改正。")
sle_id.setfocus()
return
end if
ls_name=trim(sle_name.text)
ls_idno=trim(sle_idno.text)
ls_tel=trim(sle_tel.text)
ls_company=trim(sle_company.text)
ls_type=trim(sle_type.text)
ls_city=trim(sle_city.text)
ls_home=trim(sle_home.text)
ld_open=date((sle_open.text))
ld_end=date((sle_end.text))
//向資料庫表contract輸入資料
INSERT INTO "contract"
("sta_id",
"name",
"idno",
"sex",
"home",
"city",
"type",
"tel",
"open",
"end",
"company",
"remark")
VALUES
(:ll_id,
:ls_name,
:ls_idno,
:ls_sex,
:ls_home,
:ls_city,
:ls_type,
:ls_company,
:ls_tel,
:ld_open,
:ld_end,
:mle_remark.text);
//資料寫入后，將輸入控制元件全部置空
sle_id.text=""
sle_name.text=""
sle_idno.text=""
sle_type.text=""
sle_company.text=""
sle_tel.text=""
sle_city.text=""
sle_home.text=""
sle_open.text=""
sle_end.text=""
mle_remark.text=""
sle_id.setfocus() //將游標放到“號碼”輸入欄
uj5u.com熱心網友回復：
INSERT INTO "contract" 后判斷有沒有成功，成功后資料視窗檢索下資料uj5u.com熱心網友回復：
查下你插入的欄位是否對應，型別是否一致。uj5u.com熱心網友回復：
能不能把contract表的結構也貼出來一下，看看插入的型別是不是和表結構定義的一致。另外，你插入后有沒有做commit？commit之后有沒有跟蹤查看一下sqlca里面的sqlcode或者sqlnrows？
uj5u.com熱心網友回復：
en enuj5u.com熱心網友回復：
沒有操作成功。uj5u.com熱心網友回復：
db操作的sql陳述句之后要判斷sqlcode是否成功,以便回滾或提交(前提是不自動提交).轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/87769.html
標籤：腳本語言
下一篇：如何開打pb11.5自帶的示例