Forum

Forum (https://www.ms-office.gr/forum/)
-   Access - Ερωτήσεις / Απαντήσεις (https://www.ms-office.gr/forum/access-erotiseis-apantiseis/)
-   -   AccHideMainHwnd-Αποκρυψη εικονιδιου access κατα την εκκινηση (https://www.ms-office.gr/forum/access-erotiseis-apantiseis/5569-acchidemainhwnd-apokrypsi-eikonidioy-access-kata-tin-ekkinisi.html)

gianniskar 17-06-20 09:55
AccHideMainHwnd-Αποκρυψη εικονιδιου access κατα την εκκινηση
 
Καλημερα σε ολους.Εχω βαλει στην δικια μου βαση την την εφαρμογη του Τασου

https://www.ms-office.gr/forum/1038-post7.html

αλλα κατα την εκκινηση μου εμφανιζεται για λιγο το εικονιδιο "Access".Τασο μεσα στον κωδικα που βλεπει η access το εικονιδιο opensplashscreen.bmp?

vraxnakisg 17-06-20 10:42
1 Συνημμένο(α)
Καλημέρα Γιάννη,

Όπως αναφέρει και ο Τάσος για να μην σου εμφανίζεται το λογότυπο της access όταν ανοίγεις ένα αρχείο access στο φάκελο που είναι το αρχείο της βάση σου βαλέ το επισυναπτόμενο αρχείο Name File Access.bmp και απλά άλλαξε του το όνομα και κάνε το ίδιο με το όνομα του αρχείου της βάση σου.

Ευχαριστώ.

gianniskar 17-06-20 10:52
οποτε βαζω το αρχειο αυτο στον φακελο με την βαση μου.Το ονομα της βασης ειναι πχ ΤΕΣΤ.Αλλαζω και το ονομα στο αρχειο.bmp σε ΤΕΣΤ.bmp. σωστα?

vraxnakisg 17-06-20 14:36
Καλησπέρα Γιάννη,

Σωστά!!!!

Ευχαριστώ.

gianniskar 18-06-20 09:42
Οκ εγινε.Το μονο προβλημα που εχω τωρα ειναι αν μεταφερω τον φακελο της βασης πχ στο "c:\programs files\my progmam " βγαζει μηνυμα "η γραμμη εντολων που χρημοποιησατε για να ανοιξει η access περιεχει μια επιλογη την οποια η access δεν μπορει να αναγνωρισει" και μετα αλλο μηνυμα "η access δεν μπορει να βρει το αρχειο c:\my.mdb"

Μηπως χρειαζεται καποια αλλαγη στο αρχειο .vbs ? Αν ο φακελος ειναι στην επιφανεια εργασιας τρεχει κανονικα

Tasos 18-06-20 18:48
Καλησπέρα σε όλους!

Αν η διαδρομή του αρχείου περιέχει κενούς χαρακτήρες τότε ο κώδικας στο VBS πρέπει να τροποποιηθεί:
Κώδικας:
Dim WshShell
Function currentDir()
Dim l
l = Len(Wscript.scriptname)
currentDir = Left(Wscript.scriptfullname, Len(Wscript.scriptfullname) - l - 1)
End Function
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run("msaccess " & chr(34) & currentDir & "\Login_SplashScreen.mdb" & chr(34) & " /x OpenSplashScreen"),0

gianniskar 19-06-20 08:52
Καλημερα.Εχεις δικιο Τασο,τα κενα ηταν το προβλημα.Παντως εφτιαξα και ενα exe αρχειο απο το αρχειο .vbs (αν θελει καποιος και επιτρεπεται να ανεβασω το προγραμμα που κανει compile.Βρηκα και αλλα αλλα δεν δουλεψαν) Τωρα αντι να τρεχει απο το αρχειο.vbs τρεχει απο .exe

gianniskar 22-06-20 09:25
Καλημερα.Για ποιο λογο ομως οταν κανω την access σε .accde δε τρεχει το script,παρολο που αλλαζω μεσα στο αρχειο απο .accdb σε .accde?


Η ώρα είναι 06:29.

Ms-Office.gr - ©2000 - 2026, Jelsoft Enterprises Ltd.


Search Engine Optimization by vBSEO 3.3.2