تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
تغيير أسم ملف
#1
السلام عليكم ورحمة الله وبركاته 


أستخدمت OpenFileDiloge  

محتاج كود  بحيث أنه لما تفتح النافذه ويتم أختيار الملف ( أجلب المسار + أسم الملف ) وأغير أسم الملف إلى تسميه جاهزه عندي 
وأحصل على المسار الجديد 


لاحظ محتاج أن أعملها كلها في فتح نافذه واحده كييييف..؟

الكود اللي أستخدمته 
كود :
Dim OpenFileBr As New OpenFileDialog
               OpenFileBr.Filter = "Files (*.pdf)|*.pdf"

               If OpenFileBr.ShowDialog = Windows.Forms.DialogResult.OK Then
                   FileGetName = OpenFileBr.FileName
                   MsgBox(FileGetName)

محتاج أغير أسم الملف بنفس الأمتداد
الرد
تم الشكر بواسطة:
#2
كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
   Using OpenFileBr As New OpenFileDialog With {.Filter = "Files (*.pdf)|*.pdf"}
       If OpenFileBr.ShowDialog = Windows.Forms.DialogResult.OK Then
           Dim FileName = OpenFileBr.FileName
           Dim PathFile = IO.Path.GetDirectoryName(OpenFileBr.FileName) & "\"
           MsgBox(PathFile)
       End If
   End Using
End Sub
الرد
تم الشكر بواسطة: DOX.1
#3
وعليكم السلام ورحمة الله وبركاته

مرفق سورس + برنامج للاختبار
سورس (2015)

اتمنى ان يكون به جميع ما تطلبه وما قد تحتاجه فيما بعد
واتمنى ان يكون الكود مبسط وواضح داخل السورس

تحياتى لك
وتمنياتى لك التوفيق


الملفات المرفقة
.zip   Pro.zip (الحجم : 23.29 ك ب / التحميلات : 4)
.zip   Rename File.zip (الحجم : 34.93 ك ب / التحميلات : 4)
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى تقديم   لكل من يقوم بالمساهمة
فى حل اى مشكلة او استفسار لديك مع اضافة رد بشكره ودعوة له
فالجميع هنا يعمل على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله
الرد
تم الشكر بواسطة: ابو روضة , DOX.1 , DOX.1 , عبدالله الدوسري


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] مشكلة في كود تغيير لغة البرنامج ay.alhaj 13 228 09-10-18, 08:52 PM
آخر رد: ay.alhaj
  [سؤال] عدم تغيير قيمة NumericUpdown Simo1991 7 94 09-10-18, 12:21 PM
آخر رد: Simo1991
Smile [VB.NET] تغيير شكل الفورم Mahmoud Nasser 7 449 30-09-18, 02:36 PM
آخر رد: mustafa husaieen
  [VB.NET] استفسار :- بخصوص تغيير اسم ال Button بعد الضغط dubai.eig 10 261 17-09-18, 10:53 AM
آخر رد: dubai.eig
  [سؤال] تغيير السكاين من الكومبوبكس العيدروس 14 379 14-09-18, 11:46 PM
آخر رد: العيدروس
Exclamation [سؤال] تغيير الماك ادرس DK-x 4 140 13-09-18, 03:22 PM
آخر رد: DK-x
  كود تغيير التاريخ vb آسير بلآ قيود 1 132 08-09-18, 08:07 AM
آخر رد: elgokr
  كيف تغيير صيغه الترميز في اداه TextBox معاذ العامري 1 116 09-08-18, 07:26 PM
آخر رد: Finish
  [سؤال] هل يمكن تغيير ال opacity للفورم بعد التحميل ؟ dametucorazon 4 171 12-07-18, 09:29 AM
آخر رد: elgokr
  تغيير اللون الى لون غير معروف 43:43:43 hichem1 13 469 22-06-18, 09:43 PM
آخر رد: hichem1

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم