VFP 愛用者社區

[RORI]

這段SQL語法單獨執行沒有問題，擺在RECORDSOURCE好像不行，請指教
WITH THISFORM.GRID1
.RECORDSOURCE="SELECT 報價日期,收件日期,客
戶, 規格,材質,外幣單價,數量,外幣小計,備註1,備註2,備
註3,備註4,備註5,外幣模具費"+;
" FROM QUOTE WHERE (LEN
(ALLTTHISFORM.TEXT2.VALUE))=0 OR
QUOTENO=THISFORM.TEXT2.VALUE)"+;
" AND (LEN(ALLT(THISFORM.TEXT1.VALUE))=0 OR
QUOTENO=THISFORM.TEXT2.VALUE) AND"+;
" (收件日期 BETWEEN FROMDATE AND TILLDATE)
INTO CURSOR QTV"
.COLUMN1.WIDTH=46
.COLUMN2.WIDTH=80
.COLUMN3.WIDTH=40
.COLUMN4.WIDTH=120
.COLUMN5.WIDTH=120
.COLUMN6.WIDTH=90
.COLUMN7.WIDTH=150
.COLUMN8.WIDTH=90
.COLUMN9.WIDTH=76
.COLUMN10.WIDTH=100
.COLUMN11.WIDTH=70
.COLUMN1.CONTROLSOURCE="RECNO()"
.COLUMN2.CONTROLSOURCE="QTV.收件日期"
.COLUMN3.CONTROLSOURCE="QTV.客戶"
.COLUMN4.CONTROLSOURCE="QTV.規格"
.COLUMN5.CONTROLSOURCE="QTV.材質"
.COLUMN6.CONTROLSOURCE="QTV.數量"
.COLUMN7.CONTROLSOURCE="QTV.備註1"
.COLUMN8.CONTROLSOURCE="QTV.外幣模具費"
.COLUMN9.CONTROLSOURCE="QTV.外幣單價"
.COLUMN10.CONTROLSOURCE="QTV.外幣小計"
.COLUMN11.CONTROLSOURCE="QTV.報價日期"
.COLUMN1.HEADER1.FONTSIZE=11
.COLUMN2.HEADER1.FONTSIZE=11
.COLUMN3.HEADER1.FONTSIZE=11
.COLUMN4.HEADER1.FONTSIZE=11
.COLUMN5.HEADER1.FONTSIZE=11
.COLUMN6.HEADER1.FONTSIZE=11
.COLUMN7.HEADER1.FONTSIZE=11
.COLUMN8.HEADER1.FONTSIZE=11
.COLUMN9.HEADER1.FONTSIZE=11
.COLUMN10.HEADER1.FONTSIZE=11
.COLUMN11.HEADER1.FONTSIZE=11
ENDWITH

[Erwin]

好像少了.RecordSourceType = 4

[RORI]

謝謝回應

[RORI]

問題沒有解決，歡迎指導

[Erwin]

看起來沒什麼問題, 不如你先簡化RecordSource的內容
一個條件一個條件慢慢加試試吧

[elleryq]

不要加 into cursor 試試看~

[catjoke]

請多加幾句:

WITH THISFORM.GRID1
SELECT 0 && 新的工作區
.COLUMNCOUNT = -1
.RECORDSOURCE = ""
.RECORDSOURCETYPE = 4
.RECORDSOURCE = " Select...."