كود استدعاء الالة الحاسبة الخاصة بالويندوز

[حمادة عثمان]

اريد كود لاستدعاء الحاسبة الخاصة بالويندوز

[jjafferr]

تفضل

 

    Dim stAppName As String
    stAppName = "C:\WINDOWS\system32\calc.exe"
    Call Shell(stAppName, 1)

 

جعفر

[حمادة عثمان]

21 minutes ago, jjafferr said:

تفضل

 

    Dim stAppName As String
    stAppName = "C:\WINDOWS\system32\calc.exe"
    Call Shell(stAppName, 1)

 

جعفر

شكرا جزيلا

[محمد سلامة]

7 ساعات مضت, jjafferr said:

تفضل

 

    Dim stAppName As String
    stAppName = "C:\WINDOWS\system32\calc.exe"
    Call Shell(stAppName, 1)

 

جعفر

بعد اذن معلمى جعفر

Shell "calc"

هذا الامر يفتح الالة الحاسبة بغض النظر عن موقعا بالجهاز لانه يختلف من نسخ الويندوز 

[jjafferr]

8 ساعات مضت, محمد سلامة said:

بعد اذن معلمى جعفر

Shell "calc"

هذا الامر يفتح الالة الحاسبة بغض النظر عن موقعا بالجهاز لانه يختلف من نسخ الويندوز 

 

شكرا أخي محمد