صفحه ها
دسته
وبلاگ من در بلاگفا
عکس من
وبلاگهاي دوستان
ورودي هاي پنجره اميد
معرفي وب سايت هاي پرطرفدار
سايتهاي دوستان
لينك هاي دسترسي سريع
مطالب من در ثبت مطالب روزانه
آرشیو
آمار وبلاگ
تعداد بازدید : 574726
تعداد نوشته ها : 1492
تعداد نظرات : 394
Rss
طراح قالب
مهدي يوسفي
توسط این دستور می تونید فایلی را در وی بی اجرا کنید .آدرسی که جلوی این دستور نوشته می شه اجرا میشه .شکل این دستور به این صورت است

Shell ProgramPath,RunModel

در آرگومان اول مسیر فایل نوشته می شود ودر آرگومان دوم مدلی که برنامه باید اجرا شود.در این ارگومان از آرگومان های زیر استفاده می گردد

vbHide=0 vbMaximizedFocus=1 vbMinimizedFocus=2 vbMinimizedNoFocus=3 vbNormalFocus=4 vbNormalNoFocus=5

در مدل صفر برنامه به صورت پنهان ظاهر می شود.برای مواقعی که می خواهیم عمل اجرا را از دید کاربر پنهان کنیم .در مدل 2 برنامه اجرا می شود به صورت کمینه(روی منوی استارت-مینیمایز شده)وفاکس هم روی ان می رود یعنی این که بعد از اجرا هی زرد و آبی می شود تا کار بر روی آن کلیک کند.مدل 3برنامه به

صورت ینیمایز -کمینه اجرا می شود زرد وآبی نمی شود (معمولی-فاکس رویش نمی رود).مدل 1برنامه به صورت تمام صفحه اجرا شده فاکس هم روی آن می رود(زرد و ابی می شود).در مدل 4برنامه با اندازه پیش فرض اجرا می شودوفاکس را هم می گیرد.درمدل 5برنامه با اندازه معمولی اجرا شده و فاکس نمی گیرد

کار برد مهم دیگر شل اجرا فایل های معمولی با یک برنامه اجرایی است مثل اجرای یک متن در نت پد.برای این کار نام فایل را بایک فاصله از نام فایل می نویسیم

Shell "NotPath.Exe"+" C:\Text1.txt" ,4

توجه داشته باشید که برای اجرای فایل باید نام ومسیر فیل را با یک کاراکتر فاصله بنویسید

اگر فاصله ندهید قطعآ خطا انجام می شود.اگر فایلی در مسیر برنامه تان کپی کرده اید این کد را بنویسید

shell "notpath.exe"+(app.path+"\"+"your File Name")

کلاسی است که به برنامه اشاره می کند ومی توان اطلاعات برنامه مانند مسیر-نام فایل اجرائی-کمپانی وغیرهapp

برای نوتپد ویندوز چون در درایو ویندوز قرار دارد احتیاج به تایپ مسیر کامل نیست همچنین اگر شما فایلی را از پوشه

اجرا کنید به مسیر کامل نیاز نیست برنامه ای مانند کامند پرامپت بازی ها واسکرین سیور ها در این پوشه system32

است.مثال hell "cmd.exe",4

اجرای یک فولدر با شل

واقع در درایو ویندوز را به همراه نام فیل اجرا می کنیمexplorer.exeبرای این کار فایل اجرائی

shell "explorer.exe"+" c:\windows" ,3

با اجرای این برنامه پوشه ویندوز اجرا می شود روش بالا در سی دی های اتوران استفاده ی زیادی دارد

Shell "rundll32.exe shell32.dll,Control_RunDLL appwiz.cpl "کادر حذف برنامه ها
Shell "rundll32.exe shell32.dll,Control_RunDLL desk.cpl"کادر تغییر پس زمینه
Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl"کادر اینتر نت
Shell "rundll32.exe shell32.dll,Control_RunDLL modem.cpl"کادر مودم
Shell "rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl"کادر صدا
Shell "rundll32.exe shell32.dll,Control_RunDLL netcpl.cpl"کادر شبکه
Shell "rundll32.exe shell32.dll,Control_RunDLL powercfg.cpl"کادر پاور-برق
Shell "rundll32.exe shell32.dll,Control_RunDLL sysdm.cpl"کادر سیستم
Shell "rundll32.exe shell32.dll,Control_RunDLL telephon.cpl"کادر تلفن
Shell "rundll32.exe shell32.dll,Control_RunDLL timedate.cpl"کادر ساعت

کتابخانه وسیع Shell

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal_ lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal_ nShowCmd As Long) As Long

کد های زیر را هر جا استفاده کنید جواب می دهدالبته بهد از اینکه کد بالا را در اولین خط فرم نوشتید

Shell "arp"
Shell "drvspace"
Shell "drwatson"
Shell "explorer"برای my document
Shell "freecell"
Shell "ftp"برای تنظیم اف تی پی
Shell "ipconfig"کادر آی پی
Shell "mplayer"مدیا پلیر
Shell "mshearts"
Shell "nbtstat"
Shell "netstat"
Shell "calc"ماشین حساب
Shell "notepad"نوت پد
Shell "packager"
Shell "pbrush"نقاشی
Shell "ping"
Shell "regedit"ریجیستری
Shell "route"روت
Shell "scandskw"اسکن دیسک
Shell "scanregw"اسکن رگ
Shell "setdebug"کخک تری تنظیم ویندوز
Shell "sigverif"
Shell "cdplayer"سی دی پلیر
Shell "sndrec32"ضبط صدا
Shell "sndvol32"تنظیم ولوم صدا
Shell "sol"همون سول
Shell "taskman"وضعیت سی پی یو
Shell "telnet"تلفن
Shell "vcmui"
Shell "winfile"
Shell "winipcfg"
Shell "winmine"
Shell "winrep"
Shell "charmap"کاراکتر مپ
Shell "winver"
Shell "write"وورد پد
Shell "wscript"
Shell "cleanmgr"کلنر پاک کننده اشغال درایو
Shell "control"کنترل پنل
Shell "cvt1"
Shell "defrag"دفراگمنت
Shell "drvspace" فضای خالی دیسک

اجرای فایل اینترنت با Shell
shell "Explorer.exe"+" http://www.VBLog.blogfa.comن به یک سایت
shell "explorer.exe"+" maileto:Mahdi_VBLog@yahoo.com"کادر ارسال ایمیل
shell "explorer.exe"+" yor HTML File.html"کادر اجرای یک فایل اینترنت از حافظه
shell "explorer.exe"+" file://www.سایت شما.com/11.zip"کادردانلود یک فایل از اینترنت

پنج شنبه بیست و ششم 10 1387
X