ไม่ต้องงงครับ ถ้าเซลล์ไหนมีคำสั่ง Line Feed อยู่ มันก็ขึ้นเรคอร์ดใหม่ (เท่าที่นึกออกนะ)

อาจารย์ครับ ผมไม่รู้จัก Line Feed มันต้องดูตรงไหนว่ามีครับ ผมก็ส่งออกจากตารางโดยตรงเลยครับ

กำหนดรูปแบบตัวคั่นของ Text File เป็น | (Pii)
มีความจำเป็นต้องใช้ Code ในการเขียน จึงเขียนออกมาแบบนี้

       
        Dim filex
        Dim rst As DAO.Recordset
        Set rst = CurrentDb.OpenRecordset("Tableที่ส่งออก")
 
                filex = FreeFile
                Open "D:\Folder\FileName.txt" For Output As filex
                Print #filex, "Text ต่างๆ ที่ต้องใช้ประกอบไฟล์"
                Do Until rst.EOF
                Print #filex, rst("ฟิลด์ที่1") & "|" & rst("ฟิลด์ที่2") & "|" & rst("ฟิลด์ที่3")      <---- บรรทัดนี้เอา | มาขั้น
                rst.MoveNext
                Loop
                Print #filex, "Text ต่างๆ ที่ต้องใช้ประกอบไฟล์"
                Set rst = Nothing
           
                Close

ผลที่ส่งมา บางไฟล์ที่ส่งมา สามารถรับ Text ไฟล์ แยกฟิลด์ตาม | ที่ขั้นได้ปกติ
บางไฟล์ ไม่สามารถ แยกได้ ฟิลด์ซ้อนกันใน 1 เรคคอด

ในกรณีปกติ ผมส่งออกแล้วบันทึกรูปแบบการส่งออกมา แต่ถ้าจะนำรูปแบบที่บันทึก
มาใช้ใน Code นี้ ต้องเขียนยังงัยครับ

ขอบพระคุณครับ

ตกลงรู้แล้วหรือยังว่า CheckSum ต้องคำนวนจากไหนถึงไหน ถ้าได้แล้ว ก็น่าจะเขียนต่อท้ายลงเท็กซ์ไฟล์ได้แล้วนี่ครับ หรือปัญหาเกิดตรงไหน

ผมเข้าใจว่ามันเป็นการเช็คไฟล์ ประมาณว่า ไม่ให้แก้ไขได้
ปัญหาของผมคือ ต้องทำไฟล์ให้เสร็จที่เดียวเลย จะมาเขียน แบบที่ผมตั้งใจจะไม่ได้
เพราะค่า CheckSum จะเปลี่ยนไปถ้ามีการแก้ไขไฟล์นั้น

เข้ากูเกิลหาอ่านไปเรื่อยๆ
CheckSum คือ การตรวจสอบแบบนึง มีหลายชนิด
ในส่วนที่ผมสอบถามคือ ชนิด MD5

ผมก็เลยหาไปเรื่อยๆ มันก็มีคนเขียนฟังก์ชั่น ตัวนี้ใน Access เหมือนกัน
เดี๋ยวจะลองทำดูครับ

ส่วนคำถาม ยังไม่รู้จะทำไง เบื่องต้นนึงถีง Bat ไฟล์ ที่เอา Text มาเขียนต่อๆ กัน
อาจต้องทำกึ่งทำมือไปก่อนจนกว่าจะทำได้ครับ

หน้าตาเป็นแบบนี้ครับ

บันทัดสุดท้าย ไม่รู้จะทำงัยครับ

การ Export Query หลายๆ Query ออกเป็น Text ไฟล์ๆ เดียว โดยที่
Query แต่ละ Query คอลัม ไม่เท่ากัน เลย สามารถทำได้มั้ยครับ

ทำอย่างไรครับ

แก้ไขตาม อ.pizza_p แล้วออกมาแบบที่ต้องการแล้วครับ

ส่วนของ อ.สันติสุข ยังออกมาเป็น Error #Name อยู่เหมือนเดิม

ทั้ง 2 แบบ ผมยังไม่เข้าใจหลักการทำงาน ต้องขอเวลาทำความเข้าใจ
โชคดีที่แบบของ อ.pizza_p ผมไม่ต้องแทนค่าเลย ทำให้ง่ายในการนำไปใช้
แต่ผมเชื่อว่า ทั้ง 2 แบบน่าจะเหมาะกับ เหตุการคนละแบบ ต้องขอศึกษาวิธีการ
เพิ่มเติมอีกครับ

ขอบขอบพระคุณอาจารย์ทั้ง 2 ที่กรุณาด้วยดีเสมอมาครับ

vd(visitdate)  คือ วันที่ และต้องการให้ค่าซ้ำแสดงค่าเดียว
นอกนั้น ไม่ซ้ำเลยครับ ผลที่ได้ อยากให้ออกมาแบบนี้

VD                     ชื่อโรค
12/12/2561        AAA
                         BBB
13/12/2561         CCC
14/12/2561         BBB
                          SSS
                          AAA