שלום לכולם.

כתבתי תוכנית שמריצה בין השאר גם פקודת ping דרך חלון cmd.
הייתי רוצה לדעת האם יש אפשרות לשלב את החלון הזה בחלון התוכנית עצמה, כלומר שלא יפתח חלון cmd אלא יופיע הקוד כחלק מחלון התוכנית.
אם אין כזאת אפשרות או שהיא מסובכת, אני אשמח לדעת האם יש דרך לשמור על החלון cmd פתוח גם לאחר שהפקודה שרצה בו הסתיימה.

תודה מראש
רועי

כן אפשרי ובקלות רבה
תשתמש ב CreateProcess

עם std handles's

ואז אתה יכול לקרוא ל ReadFile כדאי לקרוא
ול WriteFile כדאי לכתוב

תקרא בתיאור של STARTUPINFO
על:
HANDLE hStdInput;
HANDLE hStdOutput;
HANDLE hStdError;

ניתן לבצע זאת בקלות רבה אפילו יותר באמצעות WMI

קוד:

 '=================================================  =========================
' The following function will test if a machine is reachable via a ping
' using WMI and the Win32_PingStatus Class
'=================================================  =========================
If Reachable("10.50.138.48") Then
 WScript.Echo "Computer is Reachable!"
Else 
 WScript.Echo "Computer is Unreachable!"
End If

Function Reachable(strComputer)
' *** On Error Resume Next

 Dim wmiQuery, objWMIService, objPing, objStatus
 
 wmiQuery = "Select * From Win32_PingStatus Where Address = '" & strComputer & "'"
 
 Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
 Set objPing = objWMIService.ExecQuery(wmiQuery)
 
 For Each objStatus in objPing
 *** If IsNull(objStatus.StatusCode) Or objStatus.Statuscode<>0 Then
 *** *** Reachable = False 'if computer is unreacable, return false
 *** Else
 *** *** Reachable = True 'if computer is reachable, return true
 *** End If
 Next
End Function

http://www.visualbasicscript.com/m_42535/tm.htm

ולכן אני לא כל כך מבין.
בסך הכל מדובר באפליקציה פשוטה למשרד שבו אני עובד... והיה לי יותר נוח לעבוד עם VB בגלל הממשק הפשוט.

האם יש מישהו שיוכל להסביר לי או לרשום לי את הקוד כפשוטו ולאמר לי איפה אני צריך לתקוע אותו?
אם זאת בקשה גדולה מידי או שזה עובר על הנהלים של הפורום תאמרו לי ואני אשתוק...

הוספתי תמונה של האפליקציה. כל מה שאני רוצה זה שהחלון CMD יהיה משולב בתוך חלון האפליקציה ולא יפתח כל פעם מחדש... וכמובן אני אוכל לעצור את הפינג...
https://2007-uploaded.fresh.co.il/2...01/75327797.jpg

תודה רבה מראש
רועי

הנה מאמר שמסביר מה שאמרתי לך : http://support.microsoft.com/kb/190351

CreateProcess
ReadFile
WriteFile
CloseHandle

זה כל הפונקציות שאתה צריך

עזרתם לי מאוד