Zaman geliyor ki program içinde zip kullanmak gerekiyor. Ben bi aralar zip yapan bir activeX çok aramıştım. Bak burda iki sattır kodla halletmiş eleman herşeyi. Helal.

zaten winzip lazımsa niye kasıyoz anlamadım тнєвlα¢к∂

Dosyaları sıkıştırın ama winzip yüklü olması lazım Function winZipit zipIT = App. Path & "winzip32 -a" unzipIT = App. Path & "winzip32 -e " If zip = True Then Shell Else: Shell End If End Function

biri sana reklam yaptığını mı söyledi bana gereksiz bir yazı gibi geldi sen anlamassın ne demek тнєвlα¢к∂

dostum ne biçim bir yorum yapmışsın böyle anlamadım! Burada amacım winzip'in reklamını yapmak diil! Amacım bir program içinde sıkıştırma tekniğini öğretmek! Sen anlamassın desem ayıp olmaz dimi?

neyse takıl kafana göre!