Parsi Coders

نسخه‌ی کامل: سورس کد باز کردن پوشه از طریق ویندوز اکسپلور
شما در حال مشاهده نسخه آرشیو هستید. برای مشاهده نسخه کامل کلیک کنید.
صفحات: 1 2 3 4 5
سلام
واقعا دستتون درد نکنه !
امروز رفتم یک ویژوال بیسیک 6 گرفتم و نصب کردم اما بازم چیزی سر در نیاوردم . حتی پروژه های شما راهم با هاش باز کردم تا شاید چیزی بفهمم ولی باز هم بی فایده بود . ولی خسته نمی شم شما هم کمکم کنید راه می افتیم انشاالله !
آخه از خود تعریف کردنی نباشه من پسر خیلی خیلی باهوشیم .
شما یک کتاب واقعا خوب که یک آدم کاملا مبتدی که هیچ چیزی از ویژوال سر در نمی یاره و تازه می خواد یاد بگیره سراغ دارین تا من بخرم .
دستورتون را تو وی بی نوشتم کار کرد ممنون !
حالا اگه بخوام دو تا فایل را به ترتیب باز کنه چی جور می شه؟
مثال :
اول بابیلون را اجرا کنه بعد داخل فرم یک دکمه open باشه که اگر فشار داد winrar را اجرا کنه؟
C:\Program Files\Babylon\Babylon-Pro\Babylon.exe
C:\Program Files\WinRAR\WinRAR.exe


البته به تر تیب نه هم زمان
خیلی خوشحالم
گفتم به شما که دوستی با شما برای من یک افتخاره
اولین برنامه موفق وی بی عمرم را همین الان با کمک شما نوشتم
باور کنید خیلی خوشحالم
همون سوالی را که از شما پرسیدم خودم نوشتم (البته با کمک شما)
خدا شما را حفظ کنه .
براتون همین الان دعا کردم .
درود
برای اموزش ویژوال بیسیک به لینک زیر سر بزنید :
http://parsicoders.com/showthread.php?tid=1125

یه باتن روی فرم بزارید و 2 کلیک کنید و این دستورات رو بنویسید :

کد:
Shell ("C:\Program Files\Babylon\Babylon-Pro\Babylon.exe"), vbNormalFocus
Shell ("C:\Program Files\WinRAR\WinRAR.exe"), vbNormalFocus
از اینکه قبول زحمت کردین و استادبنده شدین خیلی ممنون و سپاس گذارم من هم قول می دهم که مطالبی که از شما یاد می گیرم در راه خوب و خدا پسندانه استفاده کنم تا شما هم از صوابش بهره مند شوید .

حالا یه سوال دیگه :
اگه بخوام با زدن یک باتن فقط درایو یا فلش H باز بشه ، دستورش چطوری می شه ؟

البته تورو خدا از اینکه خرد خرد سوال می پرسم از دستم کلافه نشید ها
چون می خوام خوردم یاد بگیرم .
لطفا کمی حوصله کنید
همانطوری که تا الان حوصله کردید .
من یک کتاب ایبوک آموزش اولیه وی بی 6 را خوندم بنا براین با اصول اولیه یه کوچولو آشنا شدم.!
سلام
یه باتن بزار روی فرم این کدها رو بنویسید :
کد:
Private Sub Command1_Click()
Drive = "H:"
Shell ("explorer " + Drive), vbNormalFocus
End Sub
باز نکرد ظاهرا مشکل داره ؟
یه بار خودتون امتحان کنید!
نمی دونم فرق کنه یا نه
ویندوز من سون است 7
اگه نوع ویندوز فرق بکنه یه کدی باشه که به نوع ویندوز حساس نباشه !
تست کردم
درایو h اگر باشه اجراش میکنه
این کدو داخل فرمت بنویس و اجرا کن ببین باز مشکل داری؟
کد:
Private Sub Form_Load()
Drive = "H:"
Shell ("explorer " + Drive), vbNormalFocus
End Sub

پایه برنامه نویسیتون رو قوی کنید.
باز امتحان کردم ولی باز نشد .
البته درایو نیست ها یک فلشه که به USB وصل کردم به اسم H میشناسه !
به هنگام اجرای فرم از وی بی این پیغام را می ده :
compile error
variable not defined
وی بی خودش این قسمت را زرد می کنه :
Private Sub Form_Load()
و این کلمه را آبی رنگ می کنه Big Grinrive
میگه براش متغییر تعریف نکردی
اینجوری میشه :
کد:
Private Sub Form_Load()
Dim Drive As String
Drive = "H:"
Shell ("explorer " + Drive), vbNormalFocus
End Sub
دستت درد نکنه ؟
انشالله خدا عمر با عزت بشما بده!
کار کرد !
و مهمتر از اون اشکال کارم را فهمیدم!
فکر کنم دیر وقته
از اینکه تا این موقع شب مزاحمتون شدم معذرت می خوام و ازتون ممنونم!
شبتون بخیر!
سلام صبح جمعه زیباتون بخیر
یک سوال دیگه :
اگه بخوام یه فایلی را با پسوند EXE.* را مثلا با آدرس زیر پاک کنم دستوری را در وی بی باید به چه شکلی بنویسم .
H:\*.exe
و اگه بخوام یک فایل دیگه برای مثال با inf.* را بعد از اجرای دستور بالا هم پاک کنه
(یکی بشکل به ترتیب و یکی بشکل همزمان)
ممنونم!
اتفاقا من همون کتاب آموزشی آقا میثم .م را خوندم که قبلا داشتم .
صفحات: 1 2 3 4 5