إعـــــــلان

تقليص
لا يوجد إعلان حتى الآن.

اســــتفسار بخصوص حفظ اكثر من سطر في(Value )ملفini

تقليص
هذا الموضوع مغلق.
X
X
تقليص
 
  • الصفحة لـ 1
  • تصفية - فلترة
  • الوقت
  • عرض
إلغاء تحديد الكل
مشاركات جديدة
السابق template التالي
  • #1

    اســــتفسار بخصوص حفظ اكثر من سطر في(Value )ملفini

    [CENTER]
    بسم الله الرحمن الرحيم
    السلام عليكم ورحمة الله وبركاته
    أساتـــذتي الكـــــرام
    احتاج مساعدتكم في تعديل هذا الملف لحفظ البيانات في ملف ini
    Input يدعم تعدد الاسطر ويحفظ الاسطر في الملف
    لكن عند الاستدعاء يحضر سطر واحد فقط ...؟

    هذا كــــــــــــــــــود الحفـــــظ



    كود PHP:
    NAME=Input.GetText("Input_Item");
    RUDANAME = Input.GetText("Input2");

    R1 = Input.GetText("m1");
    R2 = Input.GetText("m2");
    if     RUDANAME =="" then
     Dialog    .Message("----", "----------------ð", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
    else
      
         Folder.Create(_SourceFolder.."\\AutoPlay\\Docs\\"..RUDANAME);  
    end


    if NAME =="" then
    result     = Dialog.Message("-----", "-------ð", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
    else
     

    INIFile.SetValue(_SourceFolder.."\\AutoPlay\\Docs\\"..RUDANAME.."\\"..NAME..".ini", NAME, "RW1", R1); 
    INIFile.SetValue(_SourceFolder.."\\AutoPlay\\Docs\\"..RUDANAME.."\\"..NAME..".ini", NAME, "RW2", R2);
    end 
    وهــــــــــــــذا كود الاستعادة

    كود PHP:
    NAME=Input.GetText("Input_Item");
    RUDANAME = Input.GetText("Input2");

    R1 = Input.GetText("m1");
    R2 = Input.GetText("m2");
    if     RUDANAME =="" then
     Dialog    .Message("-----", "--------ð", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
    else
      
         Folder.Create(_SourceFolder.."\\AutoPlay\\Docs\\"..RUDANAME);  
    end


    if NAME =="" then
    result     = Dialog.Message("-----", "---------Çð", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
    else
     

    X1 =INIFile.GetValue(_SourceFolder.."\\AutoPlay\\Docs\\"..RUDANAME.."\\"..NAME..".ini", NAME, "RW1");
    Input.SetText("m1", X1);
    X2 =INIFile.GetValue(_SourceFolder.."\\AutoPlay\\Docs\\"..RUDANAME.."\\"..NAME..".ini", NAME, "RW2");
    Input.SetText("m2", X2);
    end 

    هذا ملف مفتوح مختصر
    http://www.gulfup.com/?a5qsJZ

    ولكم جزيل الشكر والتقدير
    [/CENTER
    الكلمات الدلالية: اســــتفسار, اكثر, بخصوص, حفظ, سطر, فيvalue, ملفini
  • #2
    السلام عليكم ورحمة الله وبركاته
    للحفظ:
    [html]NAME=Input.GetText("Input_Item");
    RUDANAME = Input.GetText("Input2");
    g = Input.GetText("m1");
    R1 = String.Replace(g, "\r\n", "belkiss", false);
    g2 = Input.GetText("m2");
    R2 = String.Replace(g2, "\r\n", "belkiss", false);
    if RUDANAME =="" then
    Dialog.Message("notice", "*****", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
    else
    Folder.Create(_SourceFolder.."\\AutoPlay\\Docs\\". .RUDANAME);
    end
    if NAME =="" then
    result = Dialog.Message("notice", "***", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
    else
    INIFile.SetValue(_SourceFolder.."\\AutoPlay\\Docs\ \"..RUDANAME.."\\"..NAME..".ini", NAME, "RW1", R1);
    INIFile.SetValue(_SourceFolder.."\\AutoPlay\\Docs\ \"..RUDANAME.."\\"..NAME..".ini", NAME, "RW2", R2);
    end[/html]

    تعليق

    • #3
      للاستعادة
      [html]NAME=Input.GetText("Input_Item");
      RUDANAME = Input.GetText("Input2");
      R1 = Input.GetText("m1");
      R2 = Input.GetText("m2");
      if RUDANAME =="" then
      Dialog.Message("notice", "****", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
      else
      Folder.Create(_SourceFolder.."\\AutoPlay\\Docs\\". .RUDANAME);
      end
      if NAME =="" then
      result = Dialog.Message("notice", "****", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
      else
      X1 = INIFile.GetValue(_SourceFolder.."\\AutoPlay\\Docs\ \"..RUDANAME.."\\"..NAME..".ini", NAME, "RW1");
      n = String.Replace(X1, "belkiss", "\r\n", false);
      Input.SetText("m1", n);
      X2 =INIFile.GetValue(_SourceFolder.."\\AutoPlay\\Docs \\"..RUDANAME.."\\"..NAME..".ini", NAME, "RW2");
      n2 = String.Replace(X2, "belkiss", "\r\n", false);
      Input.SetText("m2", n2);
      end[/html]

      موفق

      تعليق

      • #4
        شكر وتقدير

        بسم الله الرحمن الرحيم
        أستاذي الفاضل / ابو بلقيس
        الف شكر لك على هذا الكود الرائع
        تم التطبيق بنجاح
        --------------






        شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .

        تعليق

        • #5
          بارك الله فيك شكرا على هذه اللمسة الجميلة
          ماشاء الله تصميمك و تصميماتك رائعة

          تعليق

          السابق template التالي

          مواضيع تهمك

          تقليص
          Empty RSS Feed.
          يعمل...
          X