قرار دادن مقدار بازگشتي از داس در textBox

[ak0100]

با سلام خدمت دوستان گرامي

اگه ميشه راهنماييم كنيد كه چطور ميتونم بعد از اينكه دستوري به داس فرستادم جوابي كه ازش صادر ميشه رو تو برنامه خودم به نمايش بگذارم
براي مثال دستور زير


shell "help cd"


كه بعد از اجراي دستور زير جوابي كه از داس برميگرده توي يه تكست تو برنامه نشون بديم

[davood_mortazavi]

اینجا (http://barnamenevis.org/showthread.php?361728-اجرای-فرامین-داس-تحت-vb.net) مطالب خوبی هست

[SHD.NET]

سلام. من از این استفاده می کنم . کاملا جواب میده و به درستی کار می کنه
Public Function ExecuteDos(ByVal Comm As String) As String
Dim objShell, objExecObject
objShell = CreateObject("WScript.Shell")
objExecObject = objShell.Exec("%comspec% /c " & Comm)
Return objExecObject.StdOut.ReadAll()
End Function

روش استفاده:
MsgBox(ExecuteDos("Your Command"))


موفق باشید

[davood-ahmadi]

من قبلا توسط روش شما استفاده کردم و فقط یک مشکل داشت . اونم با فارسی
مثلا به فرض مثال اگر بخوای نام فایلی رو در فلان درایو بخوای که به زبان فارسی باشه اونرو با علامت سوال نشون می ده (؟؟؟؟؟؟؟) ( البته می دونم که از توی وی بی هم میشه ولی دستورات اقتضا می کردند که از طریق داس بگیرم.)
که رفتم درگیر تبدیل از acsci به unicode شدم که کلی دردسر داشت و آخرش هم نتیجه نگرفتم ( البته شاید راهی داشته باشه و من نتونستم )