錄入代碼:
updateblob wd set wd_content=:tot_b where wdbh=:ls_wdbh using SQLCA;
SQLCA.autocommit=false
SELECT wd.title
INTO :l_title
FROM wd
WHERE wd.wdbh = :ls_wdbh ;
if l_title<>'' then
commit using sqlca;
messagebox('','入庫成功！')
else
rollback using sqlca;
messagebox('','入庫失敗，請重新錄入！')
end if
提取代碼：(在ole_1的doublelicked event 中)（ole為ole控制元件中create new中的microsoft word）
blob pic
int n
selectblob wd_content into :pic from wd where wdbh=555555;
if isnull(pic)<> true then //若有記錄
ole_1.objectdata=https://bbs.csdn.net/topics/pic。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。line 6
ole_1.activate(inplace!)
end if
運行并雙擊ole_1后出現的錯誤：
Bad runtime function reference at line 6 in doubleclicked event of object ole_1 of w_2
請各位大俠幫忙
uj5u.com熱心網友回復：
這種錯誤經常采用的方法是 全編譯一次,或者把相關的物件洗掉掉，重新填加一次uj5u.com熱心網友回復：
也可以跟蹤一下，看看到了這一行發生了什么事，比如BLOB中是否有資料，或者可以把BLOB變數中的資料寫到檔案中，然后在系統中用WORD打開看看是否正常uj5u.com熱心網友回復：
洗掉后再重加一下轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/112184.html
標籤：數據庫相關