Εμφάνιση ενός μόνο μηνύματος
  #4  
Παλιά 13-01-18, 09:50
kapetang Ο χρήστης kapetang δεν είναι συνδεδεμένος
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Καλημέρα

Κώστα το αρχικό μήνυμά σου περιέχει τον παρακάτω κώδικα:
Κώδικας:
Private Sub Εντολή0_Click()
    Dim Apath As String
    Apath = "C:\Windows\system32\osk.exe"
    FollowHyperlink Apath
End Sub
Όπως επίσης προκύπτει από το μήνυμα σου, ο κώδικας, που τρέχει πατώντας το κουμπί [Εντολή0] της φόρμας, ανοίγει κανονικά το αρχείο osk.exe, αλλά εμφανίζει ένα ενοχλητικό προειδοποιητικό μήνυμα.

Επειδή το μήνυμα το εμφανίζει η μέθοδος FollowHyperlink, σκέφτηκα ότι, αν ανοίξεις το αρχείο osk.exe με την εντολή Shell, δηλαδή αν χρησιμοποιήσεις τον κώδικα:
Κώδικας:
Private Sub Εντολή0_Click()
    Dim Apath As String
    Apath = "C:\Windows\system32\osk.exe"
    Shell Apath, vbNormalFocus
End Sub
Το προειδοποιητικό μήνυμα θα εξαφανιστεί.

Τρέξε τον παραπάνω κώδικα, ίσως σου λύσει το πρόβλημα (εξαφάνιση μηνύματος).

Δεν έχω ασχοληθεί με τα προγράμματα osk.exe και TabTip.exe. Συνεπώς δεν μπορώ να σε βοηθήσω
Απάντηση με παράθεση