[MOSTAFA.KAMEL]

(15-03-17, 05:46 PM)abulayth كتب : السلام عليكم

اخ مصطفى السؤال غير واضح

ابدا بالكود وارفقه لكي تتضح الصورة اكثر للجميع

يعطيك العافية

تمام

المشروع اهو تمام
الملف مضغوط اول ما البرنامج يشتغل بيفك الضغط عن الملف وبينقل الفولدر الى برتشن الE تمام بس بعد كدة عايز اتصل بالملفات دى داخل البرنامج فقط وشكرااااااا

الكود الخاص بالفك والنقل المجلد

كود :

       Dim Dir As String = My.Computer.FileSystem.SpecialDirectories.Temp
       Dim Filename As String = Dir + "ak.zip"
       IO.File.WriteAllBytes(Filename, My.Resources.ak)
       Dim zipFile As String = "ak.zip"
       Dim targetDirectory As String = "E:\"

       Using zip As Ionic.Zip.ZipFile = Ionic.Zip.ZipFile.Read(zipFile)
           zip.Password = "1995"
           zip.ExtractAll(targetDirectory, Ionic.Zip.ExtractExistingFileAction.DoNotOverwrite)
       End Using

       Console.WriteLine("Zip file has been successfully extracted.")
       Console.Read()

ثانيا الاتصال بالملف من المجلد ازاى بقي ؟

كود :

       WebBrowser1.Navigate("رابط الملف هنا")

الروابط الى هيتم الاتصال بيها داخل البرنامج الى عليها سهم المجلد موجود فى برتشن ال E المجلد اسمو aK