+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : تعديل على كود فتح ملف معين و إنشاء ملف جديد (/showthread.php?tid=17433)
تعديل على كود فتح ملف معين و إنشاء ملف جديد - أبووسم - 24-09-16
السلام عليكم
لدي كود وظيفته
إنشاء ملف جديد أو فتح الملف اذا كان موجود مسبقاً و البحث يكون عن طريق التكست بوكس (F6TextBox)
كود :
If F6TextBox.Text = "" Then
MessageBox.Show("لم تكتب شيئا للبحث عنه ")
'---- يقوم بالتاكد من وجوده بملفات البرنامج_موجود بملفات البرنامج --
ElseIf My.Computer.FileSystem.DirectoryExists(Application.StartupPath & "\Almarkz\" + F6TextBox.Text) Then
Process.Start("\Almarkz\" + F6TextBox.Text)
Else
MessageBox.Show(" غير موجود ,جاري الانشاء")
My.Computer.FileSystem.CreateDirectory(Application.StartupPath & "\Almarkz\" + F6TextBox.Text)
End IfRE: تعديل على كود فتح ملف معين و إنشاء ملف جديد - أبووسم - 24-09-16
(24-09-16, 05:05 PM)الكاتب كتب : انت جمعت string هنا
Process.Start("\Almarkz\" + F6TextBox.Text)
بالتالي عند فتح المجلد وليس الملف سيصبح هكذا
AlmarkzNewFolder
قم بالتعديل إلى
Process.Start("Almarkz" & "\" & F6TextBox.Text)
للأسف لم ينجح الكود ,,,,
الكود أذا كان المجلد غير موجود ينشأه بدون مشاكل و لكن عند البحث عنه يظهر الخطأ .
RE: تعديل على كود فتح ملف معين و إنشاء ملف جديد - أبووسم - 25-09-16
اعتذر منك
المشكلة لدي كانت في الكود التالي ("\Almarkz\")
والصحيح هي ("Almarkz")
اشكرك على سعة صدر و على الشرح المصور وتقبل فائق تحياتي