الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

تحديد مكان لحفظ txt بشكل تلقائي و حفظ الحقوق للقراءه فقط

بدأه persoon في 23 يوليو 2010 · 7 رد · 560 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ورحنة الله وبركاته

ممكن أحد يساعدني في هذا السؤال المهم للغايه ..

أنا عامله برنامج أختبار .. وبأخر فورم يطلع له نتيجته .. وكمان خليته بشكل ضمني ينشئ txt بأسم الطالب ويحفظ فيه درجات الطالب

وضبط معاي

لكن الاشكاليه في أنه ينحفظ الـ txt هذا على سطح المكتب وأنا ماحددت وين ينحفظ..

أبغى أحدد وين ينحفظ مثلا أبغاه بملف معين ,, وكمان أبغى أحد ميزه فيه أنه للقراءه فقط,, علشان ممكن الطالبه تعرف وين ينحفظ وتغير درجاتها

فأذا سويته للقراءه فقط أضمن أنه ماراح تغير عليه الطالبه لو حصلت عليه !

اذا عندكم فكره تؤدي نفس الغرض تبع السريه

قولوا لي

اتمنى الرد عاجلا .. لان غدا التسليم :blush:

وعساكم ع القوه يارب

وهذا الكود تبع حفظ درجة الطالب في txt وتسميته بأسم الطالب اللي حفظته بمتغير أسمه ss


System.IO.File.CreateText(ss + ".txt")
' Write text to the stream
MyWriter.WriteLine("الطالبة: " & ss)
MyWriter.WriteLine()
MyWriter.Write(TextBox1.Text)
Dim MyWriter As System.IO.StreamWriter = _


      
      

      
You CAN

    

  

    
    

      
#2
        
        

      
باك
الحمدلله طلع معاي قلت خليني أنزل رد لعل الجدد على اللغه يتعلمون منها
فقط في هذا السطر
System.IO.File.CreateText(ss + ".txt")
كنت معتبره أنه ss هي اسم الطالب ويتخزن من الادخال في تكست بوكس
الان بحطه في مسار معين 
أسوي كذا
اعرف متغير قبل الكتابه هذي
Dim path As String = "c:\" + ss + ".doc"
طبعا أنا أبغى امتداد الملف اللي راح ينشئ هو doc
وببقيه الكود سويت

        System.IO.File.CreateText(path)
        ' Write text to the stream

 MyWriter.WriteLine("الطالبة: " & ss)
MyWriter.Close()

   Dim MyWriter As System.IO.StreamWriter = _
يبقى سؤالي أبغى أنشئ فولدر واحط فيه هالـdoc كيف ؟!

      
      

      
You CAN

    

  

    
    

      
#3
        
        

      
بامكانك تحديد مكان الحفظ بالطريقة التالية :
Dim MyWriter As System.IO.StreamWriter = System.IO.File.CreateText("c:\" + ss + ".txt")
ايضا بامكانك الحفظ في المكان اللي بدأ البرنامج منه :
Dim MyWriter As System.IO.StreamWriter =  System.IO.File.CreateText(Application.StartUpPath + ss + ".txt")
بالنسبة للقراءة فقط :
Dim fileDetail As IO.FileInfo = My.Computer.FileSystem.GetFileInfo("yourfile.jpg")  

fileDetail.IsReadOnly = True
بالتوفيق ،،

      
تم تعديل هذه المشاركة بواسطة profesor-xp في 23 يوليو 2010 في 12:48

      
1

      
    

  

    
    

      
#4
        
        

      
انشاء فولدر :
My.Computer.FileSystem.CreateDirectory(Application.StartUpPath + "name")

      
      

      
    

  

    
    

      
#5
        
        

      
اخ profesor-xp     :wub: 
يعطيك الف عافيه على مساعدتي .. الله يكتبها في ميزان حسناتك..
لكن جت في بالي فكره .. بخصوص السريه انه الطالبات مايشوفون درجاتهم + انه ما أتعب الأستاذه أنها تمر على كل كمبيوتر وتأخذ ملف اللي فيه الدرجه
يما أنهم على شبكة محليه 
ليش ما يصير الـ path تبعي هو من الشيرد فولدر وتكون طبعا عامله هناك بالأدمن ملف أسمه مثلا" 2010" وأنا بـ path ارسله 
وش رايك بالطريقه؟
صعبه ..
أو لا
المشكله أنا بالشبكات توني مبتدئه ودراستي كانت فيها نظريه بحته وكنت أتعلم فيها بالجافا كمان 
لكن ممكن تساعدني؟

      
      

      
You CAN

    

  

    
    

      
#6
        
        

      
مبدئيا ..
أبغى أطلب من كل طالبه بعدما تنتهي من أختبارها  تروح لشيرد فولدور وتضيف ملفها هناك
بكذا حليت مشكله أنه مو كل جهاز تمر عليه الاستاذه وتأخذ الملف تبع الطالبه اللي فيه حلها ودرجتها
لكن ..
الاشكال عندي أنه سويت مثل ماقلت لي تبع read only
تمشي بدون ارر لكن أروح للملف اللي أقدر أعدل عليه 
أنا بس أبغى مسموح له فقط يشوفه بس مايقدر يكتب عليه ..


fileDetail.IsReadOnly = True
Dim fileDetail As IO.FileInfo = My.Computer.FileSystem.GetFileInfo(path)

      
      

      
You CAN

    

  

    
    

      
#7
        
        

      
ضبط يا خوي
صار مايسمح بالأستبدال اذا كان نفس الأسم 
يعطيك العافيه وأعتذر منك ,, لاني قلت أنه مامشى معاي ,, لكن كنت أنا المخطئه 
الله يوفقك يارب
شكرا من القلب  :wub:

      
      

      
You CAN

    

  

    
    

      
#8
        
        

      
العفو ،،
بالتوفيق يا رب ،،

      
      

      
    

  

    
    
    
 مواضيع مشابهة





  

    
عدد الزوار حالياً
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

    
—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

    
جارٍ التحقق من المتواجدين…