السلام عليكم
ممكن تساعدوني اريد كود حفظ بأسم اي ملف اريده، و اكون شاكرا لكم
ودمتم بخير
ممكن تساعدوني اريد كود حفظ بأسم اي ملف اريده، و اكون شاكرا لكم
ودمتم بخير
[كود] اريد كود حفظ بأسم اي ملف اريده
|
السلام عليكم
ممكن تساعدوني اريد كود حفظ بأسم اي ملف اريده، و اكون شاكرا لكم ودمتم بخير
14-09-13, 10:18 PM
تفضل أخي هذا هو الكود لكن يجب إضافة أداة Common Dialog
ثم ضع هذا الكود في حدث الضغط على الزر commonDialog1.Filter = " Text File|*.txt" commonDialog1[/code].ShowSave If commonDialog1.FileName <> "" Then AppPath = commonDialog1.FileName ValText = Text1 Open AppPath For Append As #1 Print #1, ValText Close #1 هذا بالنسبة للملفات النصية بس انا مش فاهم عبارة "اي ملف اريده" يا ريت توضح
15-09-13, 12:12 PM
(آخر تعديل لهذه المشاركة : 15-09-13, 12:14 PM {2} بواسطة ماستر قراند.)
تسلم يالغالي بس انا اقصد اني احفظ اي ملف اريد مثلا ز.bin iso img...الخ اي ملف في بالي ومشكور وجعله الله في ميزان حسناتك
ودمتم بخير و انتظر الرد منكم أعزائي الكرام
16-09-13, 11:36 AM
(آخر تعديل لهذه المشاركة : 16-09-13, 11:37 AM {2} بواسطة ماستر قراند.)
20-09-13, 01:27 AM
السلام عليكم
- إستخدم هذا الكود : كود : Private Sub Command1_Click() - تحياتي . كود : For each Breathe in MyLife تم الشكر بواسطة: ماستر قراند , VB_Local
20-09-13, 01:45 AM
(آخر تعديل لهذه المشاركة : 20-09-13, 01:45 AM {2} بواسطة ماستر قراند.)
مشكور وياليت اتسوي هذا المثال كمشروع جديد وترفع في الموقع واكون ممتن لك ودمت بالف خير
20-09-13, 05:08 AM
السلام عليكم
- في المرفقات . - تحياتي . كود : For each Breathe in MyLife تم الشكر بواسطة: ناجي إبراهيم , allayl , abulayth , VB_Local
05-11-15, 08:30 PM
كل الشكر لكم
|
|