ข้างล่างเป็นตัวกำหนด attribute ของไฟล์ครับก่อนหน้าลองรันแล้ว text file ก็มี attribute ตามที่ผมกำหนด Code
Dim attributes As FileAttributes
attributes = FileAttributes.Archive
File.SetAttributes(filePath, attributes)
แต่พอเอาไฟล์นั้นผ่านโค๊ดด้านล่างคือ zip text file ตัวนั้นครับก็ zip ได้ครับ Code
Dim spath As String = "filePath"
Dim zippath As String = "filePath".ZIP"
ZipFile.CreateFromDirectory(spath, zippath)
แต่พอแต่ไฟล์มา attribute ที่เคยเซ็ทเป็น archive กลายเป็น not index
มีวิธีการแก้ไขยังไงครับ เพื่อให้ zip ไฟล์แล้วแต่ไฟล์มาเพื่อให้ได้ attribute เดิม ผมสงสัยว่า text file ที่ผมจะเอาไปใช้ต่อมันใช้งานไม่ได้ครับ