نمایش نتایج 1 تا 40 از 135

نام تاپیک: نكاتی در مورد برنامه نويسي در Visual Basic

Threaded View

پست قبلی پست قبلی   پست بعدی پست بعدی
  1. #8

    Arrow باز كردن فايل ترتيبي و تصادفي - دستور Open

    شكل كلي دستور:

    Open FilePath For Mode Access AccessType As FileNumber Len = Width

    Open: كلمه كليدي جهت باز كردن فايل
    FilePath: آدرس دقيق فايل (با پسوند) كه اشاره گر جهت پيدا كردن موقعيت فايل به آدرس فايل ميره.
    For: كلمه كليدي
    Mode: حالات دسترسي به فايل
    Access: كلمه كليدي






    AccessType: نوع دسترسي به فايل با مشخصات زير:
    • Shared: در شبكه كاربران مي توانند همزمان يك فايل رو باز كنند.
    • Lock Read: كاربر فايل رو فقط مي تونه بخونه
    • Lock Write: كاربر اجازه ويرايش يا تغييرات رو در فايل دارند.
    • Lock Read Write: كاربر مي تونه فايل رو بخونه بنويسه
    AS: كلمه كليدي
    FileNumber: شماره فايل كه بوسيله تابع ()FreeFile بدست مياد ( توضيحات:مفهوم فايل - File)
    Len: كلمه كليدي
    Width: طول يك ركورد از فايل رو تعيين مي كنه.
    به هر سطر در فايل ركورد مي گن.
    باز كردن يك فايل ترتيبي جهت خواندن:

    Open "C:\Student.txt" For Input As #FreeFile Len = 7

    اين فايل قبلاً در مسير "C:\Student.txt" وجود داشته در غير اينصورت پيغام خطا صادر ميشه و يك ركورد به طول 7 رو مي خونه.
    باز كردن يك فايل ترتيبي جهت نوشتن (پاك شدن اطلاعات قبلي):

    Open "C:\Student.txt" For Output As #FreeFile Len = 7

    اگر فايلي با اين نام از قبل بوده اطلاعاتش رو پاك مي كنه و اشاره گر رو در ابتداي فايل نگه مي داره و اجازه نوشتن يك ركوردي به طول 7 رو صادر مي كنه.
    باز كردن يك فايل ترتيبي جهت نوشتن (بدون پاك شدن اطلاعات قبلي):

    FileNumber = FreeFile
    Open "C:\Student.txt" For Append As #FileNumber Len = 7
    Print #FileNumber, "Obalit"
    Close #FileNumber

    من در اينجا يك متغير FileNumber از نوع Integer تعريف كردم و مقدارش رو برابر تابع ()FreeFile قرار دادم.
    فايل Student.txt رو باز مي كنه و بدون اينكه اطلاعات قبلي اون رو پاك كنه اون رو باز مي كنه و اجازه نوشتن ركوردي به طول 7 رو صادر مي كنه و بوسيله دستور Print درون فايل كلمه Obalit رو مي نويسه. و در انتها بوسيله دستور Close فايل رو ميبنده.
    باز كردن يك فايل تصادفي:
    براي باز كردن يك فايل تصادفي بايد حالات دسترسي به فايل به صورت Random باشه. فايل تصادفي زماني به د مي خوره كه دسترسي ما به فايل به صورت مستقيم باشه يعني بوسيله آدرس دقيق فايل (آدرس + ركورد مورد نظر) ما بخواهيم يه فايل رو باز كنيم.
     Open "C:\Student.txt" For Random As #FreeFile Len = RecordWidth

    بوسيله اين دستور ميشه اطلاعات فايل tudent.txt به صورت تصادفي خواند.
    معمولاً براي نوشتن (ثبت ركورد) از اين حالت استفاده مي شه.
    آخرین ویرایش به وسیله اوبالیت به بو : سه شنبه 14 خرداد 1387 در 14:39 عصر

برچسب های این تاپیک

قوانین ایجاد تاپیک در تالار

  • شما نمی توانید تاپیک جدید ایجاد کنید
  • شما نمی توانید به تاپیک ها پاسخ دهید
  • شما نمی توانید ضمیمه ارسال کنید
  • شما نمی توانید پاسخ هایتان را ویرایش کنید
  •