Access สามารถ Export File Excel ใส่ Zip เข้ารหัส
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย

 784   4 Access สามารถ Export File Excel ใส่ Zip เข้ารหัส

รบกวนสอบถามครับ

Access สามารถ Export File Excel ใส่ Zip เข้ารหัส1234 บลาๆ ได้ไหมครับ

ต้องใช้ module เสริมไหมครับ หรือสามารถเขียน code ใช้งานได้เลย


และถ้าหากทำได้ แล้วก็จะได้ File excel ที่ เป็น zip เข้ารหัสไว้

แล้วสามารถสร้างปุ่ม Import zip แล้วถอดรหัส 1234 ที่รู้อยู่แล้วได้ไหมครับ

excel ก็จะเข้ามาใน tbl และ export งานใส่ zip เข้ารหัสไป ...


วนลูป การทำงาน แบบนี้ไปเรื่อยๆครับ

จะมีวิธีไหมครับ ท่านอาจารย์ครับ

ขอบพระคุณอย่างสูงครับ




4 Reply in this Topic. Dispaly 1 pages and you are on page number 1

1 @R23897
1. ติดตั้งโปรแกรม 7z ลงในเครื่อง http://www.7-zip.org/

2. จากนั้นก็สร้างปุ่ม Export Import ตามนี้ครับ
Private Sub Export_Click()

Call Shell(Chr(34) & "C:\Program Files\7-Zip\7z.exe" & Chr(34) & " a [path\zip_file.7z] [path\excel_file.xls] -p1234 -mhe", vbHide)

End Sub

Private Sub Import_Click()

Call Shell(Chr(34) & "C:\Program Files\7-Zip\7z.exe" & Chr(34) & " e [path\zip_file.7z] -o[excel_destination_path] -p1234 -aoa", vbHide)

End Sub

หมายเหตุ
2 @R23900
a กับ e นี่ตัวแปร เก็บ Query ที่จะ ส่งเป็นexcel ไหมครับหรือเปล่าครับ

ยังสงสัย code ท้ายๆครับ


a [path\zip_file.7z] [path\excel_file.xls]
3 @R23902
มันเป็นรูปแบบคำสั่ง command line ของโปรแกรม 7-zip ครับ

สำหรับบีบอัดไฟล์
7z.exe a archieve.7z originalfile -pPassword -mhe
( a คือ add file to archieve
-mhe คือไม่ให้แสดงชื่อไฟล์ใน archieve)


สำหรับคลายไฟล์
7z.exe e archieve.7z -oPathtoExtract -pPassword -aoa
( e คือ extract file
-aoa คือ เขียนทับไฟล์เดิมโดยไม่ต้องถาม)
4 @R23903
ที่ผมให้ไปข้างบนเป็นแค่การทำ zip ไฟล์จาก excel และการคลายไฟล์จาก zip ไฟล์เท่านั้นครับ

ส่วนการที่จะสร้างไฟล์ excel จากฐานข้อมูล หรือนำเข้าข้อมูลจาก excel จะต้องใช้คำสั่งต่างหากนะครับ คือ TransferSpreadsheet ครับ ลองศึกษาดูครับเพราะต้องเตรียมตารางหรือ Query ที่เหมาะสมในการส่งออกหรือนำเข้าครับ
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 3.9311s