תוכנה בתוך תוכנה

[yosi7171]

תוכנה בתוך תוכנה

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

 

[שא12]

השאלה לא ברורה פרט יותר

 

[yosi7171]

פרוט

1. הרצתי תוכנה שלי ב- VB 2. מהתוכנה שלי אני מפעיל תוכנה 2 (חיצונית) 3. התוכנה עושה פעולה מסויימת ונסגרת לבד 4. אני צריך לדעת בתוכנה שלי (VB) שתוכנה 2 הסתיימה בכדי לעשות דברים נוספים בתודה מראש

 

[שא12]

לדעתי רק בעזרת פונקציות API

צריך לבדוק זאת קיצר לא בשליפה מהמותן

 

[המלך ברק הראשון]

תחפש בגוגל - ShellAndWait

 

[ארזירון]

אפשר גם עם

WScript.Shell - יש לו פונקציה בשם Run שיודעת להחזיר חיווי וזה יותר פשוט מאשר עם API...

 

[הקוסם המעופף]

בבקש.

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Sub Timer1_Timer() Dim sd As String label1.capion = sd hwndcurrent = FindWindow(vbNullString, sd) 'hwndcurrent = FindWindow(vbNullString, "Eliran") If hwndcurrent <> 0 Then magbox"Eliran" End If End Sub זה ימצא לך את כל החלונות או התוכנות תחת אותו שם.

 

[yosi7171]

באמת קוסם...........

כמה פשוט וקל...... ועושה את העבודה.... תודה רבה