เขียนโค้ดใน Variable อย่างไร ให้แสดงวันที่ ที่ไม่เป็นตัวเลขทั้งหมด

[pardon.yu]

ผมทำสติ๊กเกอร์วันนัด ทุกอย่างใช้ได้หมด อยากแก้ให้วันที่ เป็นวัน แบบ ตัวอย่างแบบนี้ 11 ม.ค. 2565  จะต้องเขียนโค้ดอย่างไรครับ ด้านล่างคือตัวอย่างโค้ดที่เขียนไว้ครับ วันที่มันออกมาเป็นแบบนี้ 11/01/2565

Label59.Caption:= GetSQLStringData ('select max(nextdate) from oapp where vn = "'+DBPipeline1['vn']+'"');
Label61.Caption:= GetSQLStringData ('select max(nextdate) from oapp where vn = "'+DBPipeline1['vn']+'" and note like "%lab%"  ');
Label64.Caption:= GetSQLStringData ('select max(nextdate) from oapp where vn = "'+DBPipeline1['vn']+'" and note like "%สถานีสุขภาพ%"  ');

[pop_hosxp]

ผมทำสติ๊กเกอร์วันนัด ทุกอย่างใช้ได้หมด อยากแก้ให้วันที่ เป็นวัน แบบ ตัวอย่างแบบนี้ 11 ม.ค. 2565  จะต้องเขียนโค้ดอย่างไรครับ ด้านล่างคือตัวอย่างโค้ดที่เขียนไว้ครับ วันที่มันออกมาเป็นแบบนี้ 11/01/2565

Label59.Caption:= GetSQLStringData ('select max(nextdate) from oapp where vn = "'+DBPipeline1['vn']+'"');
Label61.Caption:= GetSQLStringData ('select max(nextdate) from oapp where vn = "'+DBPipeline1['vn']+'" and note like "%lab%"  ');
Label64.Caption:= GetSQLStringData ('select max(nextdate) from oapp where vn = "'+DBPipeline1['vn']+'" and note like "%สถานีสุขภาพ%"  ');

ลองทดสอบดูครับ

Label59.Caption:= FormatThaiDate('d mm yyyy',GetSQLDateData ('select max(nextdate) from oapp where vn = "'+DBPipeline1['vn']+'" '));
Label61.Caption:= FormatThaiDate('d mm yyyy',GetSQLDateData ('select max(nextdate) from oapp where vn = "'+DBPipeline1['vn']+'" and note like "%lab%"  '));
Label64.Caption:= FormatThaiDate('d mm yyyy',GetSQLDateData ('select max(nextdate) from oapp where vn = "'+DBPipeline1['vn']+'" and note like "%สถานีสุขภาพ%"  '));

[pardon.yu]

ได้แล้วครับ ขอบคุณมากครับ ผมมือใหม่หัดเขียนครับ

[pardon.yu]

รบกวนอีกครั้ง ครับ หลังจากแก้โค้ดแล้ว ไม่สามารถพิมพ์สติกเกอร์ได้ ถ้าเงื่อนไข วันนัดไม่ครับ
จะมีวันนัดทั้งหมด 3 นัด ถ้าขาดนัดใดนัดหนึ่งจะพิมพ์ไม่ได้ กลายเป็นเออเร่อไปเลยครับ