این کد در رویداد FormLoad برنامه قرار می گیرد و مسیر اجرای برنامه را بررسی می کند. اگر درایوی که برنامه از روی آن اجرا می شود از نوع CD Rom, CD Writer و ... نبود، برنامه با دستور End بسته می شود.
کد زیر را در رویداد FormLoad فرم اصلی قرار دهید:
کد:Dim appdrive As New IO.DriveInfo(Application.StartupPath.Substring(0, 2)) If appdrive.DriveType <> 5 Then End






پاسخ با نقل قول
Bookmarks