Saya bekerja di Van 't Hek, sebuah perusahaan Belanda yang berspesialisasi dalam semua jenis pekerjaan pondasi (tumpukan bor pabrikan / pabrikan, pile sheet, dll). Saya sebenarnya adalah autocad engineer, tetapi saya memiliki banyak pengalaman scripting dalam bahasa komputer (html, java & amp; lua).
Masalah:
- Derek auguring kami memiliki IPC dengan modul gprs untuk mengirim data produksi tumpukan dalam format zip ke alamat email kami yang ditentukan. Operator derek harus memasukkan # proyek dan # tiang pancang, IPC menambahkan di belakang # proyek nomor tambahan untuk melihat urutan produksi. Jadi file zip terlihat seperti:
16000_1_1.zip (proyek # _incrementing # _pile #)
Di masa lalu saya dan rekan kerja saya harus secara manual menyimpan lampiran ke folder yang benar. Pengirim surat adalah id crane dan subjeknya seperti: "Lampiran email: 16000_1_1.zip"
Saat ini kami menggunakan program kecil bernama Outlook SaveAttachment untuk memudahkan pencarian (kirim dari / tanggal / proyek #) dan menyimpan file ke lokasi yang benar. Di bawah ini adalah contoh tempat menyimpannya:
K: \ 3 Proyek \ 16000-16050 \ 16000 Projectlocation - Projectname, Constructioncompany \ 06 Productiondata
Perhatikan bahwa folder 06 data Produksi kadang-kadang perlu dibuat jika tidak ada yang disimpan sebelumnya. Semua bagian lain dari jalur adalah variabel dan satu-satunya referensi adalah jumlah proyek (mis. 16000).
- Kemudian kita mendekompres file zip ke csv dengan 7zip.
- Kami memiliki lembar-Excel dari produsen crane untuk mengimpor pilihan file dan mencetaknya printer standar (pdf24) dalam kasus ini. Ini menampilkan semua file ke folder tertentu di K: dan kami memindahkan file secara manual ke yang benar.
Anda semua bisa membayangkan proses ini menjadi menyakitkan di pelacur, terutama ketika mempertimbangkan kami memiliki +10 crane menambah setiap hari kerja selusin tumpukan.
Saya bisa mendapatkan file ke folder K: drive dengan aturan dan skrip, tetapi tidak membuat semacam skrip pencarian / perbandingan untuk meletakkannya di folder yang benar atau untuk mengotomatiskan untuk membuka Excelsheet dan memproses file ( s). Saya mengutak-atik program yang disebut DirListing untuk memindai struktur folder dan mengeluarkannya ke file (txt / csv).
Ini akan banyak membantu saya untuk secara otomatis menyimpan file ke projectfolder yang benar dan pada akhirnya untuk mengotomatiskan pengimporan ke dalam Excel dan menghasilkan file pdf ke folder yang sama seperti file csv.
Adakah yang punya ide bagaimana mencapainya? Mungkin semacam file batch atau jenis solusi PowerShell (Saya belum terbiasa dengan)?
Kode saya:
Public Sub SaveToDisk(itm As Outlook.MailItem)
Dim objAtt As Outlook.Attachment
Dim saveFolder As String
Dim dateFormat dateFormat = Format(Now, "yyyy-mm-dd")
'Change this path to the your folder location
saveFolder = "c:\temp\"
objAtt.SaveAsFile saveFolder & "\" & dateFormat & ".xls"
Set objAtt = Nothing
End Sub
Public Sub SaveToDisk(itm As Outlook.MailItem)
Dim objAtt As Outlook.Attachment
Dim saveFolder As String
Dim dateFormat
dateFormat = Format (Sekarang, "yyyy-mm-dd") objAtt.SaveAsFile saveFolder & amp; "\" & amp; dateFormat & amp; ".xls" Tetapkan objAtt = Sub Tidak Ada Akhir