以下代碼,在我編程環境下產生的資料視窗源代碼和在客戶那里產生的不一樣。
我這里是這樣
column=(type=datetime update=yes updatewhereclause=yes
客戶是這樣
column=(type=datetime updatewhereclause=yes
為什么呢,很奇怪了。就是沒有update屬性。哪位大俠遇到過。
string ls_dw,new_syntax,error_syntaxfromSQL,error_create
ls_dw="select * from t_saleexport"
new_syntax = sqlca.SyntaxFromSQL(ls_dw, &
'Style(Type=grid)', error_syntaxfromSQL)
IF Len(error_syntaxfromSQL) > 0 THEN
messagebox('創建視窗錯誤',error_syntaxfromSQL)
ELSE
dw_1.Create(new_syntax, error_create)
IF Len(error_create) > 0 THEN
return
END IF
dw_1.Modify("DataWindow.Table.UpdateTable='t_saleexport'")
dw_1.Modify("[流水號].Key=Yes")
dw_1.Modify("[商品編號].Key=Yes")
DW_1.MODIFY('updatewhere=1 updatekeyinplace=no datawiendow.readonly=false')
String ColName,Name1[]
Integer Columns,i,n1=0
Columns=Integer(dw_1.Describe("DataWindow.Column.Count"))
FOR i=1 TO columns
ColName=Upper(dw_1.Describe("#"+string(i)+".Name"))
Name1[i]=ColName
Next
FOR i=1 TO n1
dw_1.Modify(Name1[i]+".update=yes")
dw_1.Modify(Name1[i]+".Protect=0")
dw_1.Modify(Name1[i]+".edit.displayonly=no")
dw_1.Modify(Name1[i]+".tabsequence="+string(i*10))
NEXT
dw_1.settransobject(sqlca)
dw_1.retrieve()
END IF
uj5u.com熱心網友回復:
應該是因為用戶的資料庫里這個表t_saleexport未建主鍵或者唯一索引引起的
轉載請註明出處,本文鏈接:https://www.uj5u.com/shujuku/31446.html
標籤:腳本語言
上一篇:pb怎么封裝函式
