آژانس هواپیمایی
tanki

چگونه باید محتوای یک لیست باکس رو روی هارد ذخیره کنم؟

شروع موضوع توسط sylvester ‏15 ژوئن 2007 در انجمن Visual Basic 6

  1. sylvester

    sylvester Registered User

    تاریخ عضویت:
    ‏26 مارس 2007
    نوشته ها:
    497
    تشکر شده:
    61
    محل سکونت:
    ترکیه
    سلام به دوستان!
    من یه فرم دارم که یک سری اطلاعات رو از سیستم میخونه و یک سری هم از طریق textbox ها میگیره و همگی رو در لیست باکس میریزه. حالا میخوام در پایان کار همه محتوای لیست باکسم بره تو یه فایل txt روی هارد. ولی نمیتونم اینکارو بکنم! راهش چیه. کدی هم که در آخر برنامه اضافه کردم برای حصول بدین منظور اینجوری است
    کد:
    Set b = CreateObject("scripting.filesystemobject")
    Set m = b.createtextfile("d:\listbox.txt")
    m.write =[COLOR="Red"] ListBox[/COLOR]
    m.Close
    به جای قسنت قرمز کدهای دیگری هم تست کردم ولی افاقه نکرد.
    باید چیکار کنم بچه ها؟:(
     
  2. mehrdad201

    mehrdad201 همکار بازنشسته

    تاریخ عضویت:
    ‏10 سپتامبر 2005
    نوشته ها:
    15,043
    تشکر شده:
    16,308
    محل سکونت:
    ایران
    یه حلقه باید بزنی از 0 تا listcount-1
    بعدش هم هر سطر از لیست باکست رو بریزی توی فایل (به صورت خط به خط(

    آخرش هم فایل رو ببندی
     
  3. sylvester

    sylvester Registered User

    تاریخ عضویت:
    ‏26 مارس 2007
    نوشته ها:
    497
    تشکر شده:
    61
    محل سکونت:
    ترکیه
    مهرداد جان! دستت درد نکنه زود جواب دادی!
    میشه لطف کنی کدش رو برام بزاری! میدونم حالا بازم برم سراغش یه جایی باز ریپ میزنم:blush:
    دستت درد نکنه
     
  4. mehrdad201

    mehrdad201 همکار بازنشسته

    تاریخ عضویت:
    ‏10 سپتامبر 2005
    نوشته ها:
    15,043
    تشکر شده:
    16,308
    محل سکونت:
    ایران
    والا حفظ نیستم

    اما فکر کنم اینطوری باشه
    کد:
    dim iIndex as integer
    for iIndex = 0 to list1.listcount-1
    write to file command list1.list(iIndex)
    next
    
    ممکنه غلط داشته باشه کدم اما مدل کاریش همینطوریه

    یه نگا به MSDN بندازی بد نیست
     
avanak همکاری در فروش عسل طبیعی و گرده گل ایرانیتبلیغات در گوگل