Jump to content
Steku1997

Jak w notatniku utworzyć wyskakujący komunikat?

Recommended Posts

Witam!

Dzięki temu poradnikowi dowiecie się, jak za pomocą notatnika stworzyć wyskakujący komunikat w systemie Windows.

Przykładem, jest komunikat, który widzicie na poniższym screenie.

bdscreen.png

Aby stworzyć taki komunikat, wystarczy utworzyć nowy dokument tekstowy na pulpicie, a następnie wkleić do niego ten kod:

msgbox"x", xx, "xxx"

x - tutaj należy wpisać tekst, który pojawi się po wyświetleniu komunikatu.

xx - tutaj podajemy styl komunikatu, tzn.:

vbCritical - Wyświetla ikonę Komunikatu krytycznego.

vbQuestion - Wyświetla ikonę Pytanie ostrzegawcze.

vbExclamation - Wyświetla ikonę Komunikatu ostrzeżenia.

vbInformation - Wyświetla ikonę Komunikatu informacyjnego.

xxx - tutaj podajemy tytuł komunikatu, który pojawi się na górze wyskakującego okna.

Teraz zapisujemy plik, pamiętając że musimy zapisać go z rozserzeniem .vbs.

Zapisując, pamiętamy także, aby zmienić typ zapisywanego pliku z dokumenty tekstowe, na wszystkie pliki.

Gotowe! Teraz wystarczy otworzyć plik, aby został wyświetlony komunikat.

Kolejnym wariantem wyskakującego komunikatu, jest pytanie. Którego przykład widać na screenie.

pytaniescreen.png

Postępujemy tak, jak poprzednio. Tworzymy dokument tekstowy na puplicie. Następnie kopiujemy kod:

odp = msgbox("x", vbyesno)
if odp =6 then
msgbox"xx"
else
msgbox"xxx"
end if

x - tutaj wpisujemy tekst, który wyświetli się po pojawieniu się komunikatu pytającego.

xx - tutaj wpisujemy tekst, który wyświetli się po wybraniu pozytywnej odpowiedzi.

xxx - tutaj wpisujemy tekst, który wyświetli się po wybraniu negatywnej odpowiedzi.

Teraz zapisujemy plik, pamiętając że musimy zapisać go z rozserzeniem .vbs.

Zapisując, pamiętamy także, aby zmienić typ zapisywanego pliku z dokumenty tekstowe, na wszystkie pliki.

Gotowe! Teraz wystarczy otworzyć plik, aby został wyświetlony komunikat.

Kody te, można ze sobą łączyć tzn. że po wyświetleniu się komunikatu, może pojawić się pytanie.

Pamiętajmy, aby przed kolejnym kodem pozostawić wolną linijkę.

Mam nadzieję, że poradnik się przydał. Pozdrawiam!

  • Upvote 4

Share this post


Link to post
Share on other sites

A jak zrobić coś takiego, że przy wybraniu odpowiedzi tak, program działa dalej, a przy wybraniu odpowiedzi nie program się wyłącza?

Wystarczy, że nie dodasz sekcji związanej z zadaniem po wciśnięciu "Nie".

W tym przypadku nie dodajesz tego poniżej:

msgbox"xxx"
Edited by EpicFace

Share this post


Link to post
Share on other sites

@Hawpo

Z tego co wiem w VBS nie ma takiej opcji. Takie rzeczy możesz sobie machnąć czy to w C++ (np. z Qt) czy C#, Javie itd. itd.

Share this post


Link to post
Share on other sites

A jak zrobić coś takiego, że przy wybraniu odpowiedzi tak, program działa dalej, a przy wybraniu odpowiedzi nie program się wyłącza?

Sam o tym nie wiem, ale jest cos podobnego do MsgBox.Tyle ze wyłączy ci komputer za okreslony czas i nie mozesz tego w żaden sposób wyłączyć biggrin_prosty.gif, wypróbuj takie coś

Utwórz skrót na pulpicie w ten sposób

PPM/Utwórz Nowy/Skrót

*(PPM)-Prawy przycisk myszy.

I wpisujesz takie coś

shutdown -s -t 4000 -c "Komputer wyłączy sie za XXXX minut"

Nazywamy jakoś skrót, i zapisujemy na pulpicie.

*(4000 Oznacza czas w sekundach w którym wyłączy sie komputer)

Ten kto odpali plik, odpalli jednocześnie zegarowe wyłączanie komputera

powiadomienie takie jak MsgBox Gwarantowane na Windows XP i starsze :)

na Windows 7/8 (Możliwe ze na "Vista" tez) nie bedzie takiego efektu jak na MsgBox, pojawi się jedynie dymek na pasku zadań z informacją która została podana przy tworzeniu pliku.

A teraz jak wyłączyć tą bombe zegarową ;d

Wchodzimy w uruchom, i w okienku wpisujemy

shutdown -a

W ZAŁĄCZNIKU SCREENY KROK PO KROKU JAKBY KTOS NIE ROZUMIAŁ :))

Jesli to będzie uznane za spam to bardzo przepraszam :)

xx - tutaj podajemy styl komunikatu, tzn.:

vbCritical - Wyświetla ikonę Komunikatu krytycznego.

vbQuestion - Wyświetla ikonę Pytanie ostrzegawcze.

vbExclamation - Wyświetla ikonę Komunikatu ostrzeżenia.

vbInformation - Wyświetla ikonę Komunikatu informacyjnego.

Tutaj podaje łatwiejszą opcje na styl komunikatu

Zamiast wprowadzenia tego:


vbCritical - Wyświetla ikonę Komunikatu krytycznego.
vbQuestion - Wyświetla ikonę Pytanie ostrzegawcze.
vbExclamation - Wyświetla ikonę Komunikatu ostrzeżenia.
vbInformation - Wyświetla ikonę Komunikatu informacyjnego.

Mozna użyć cyferek ;)


16 - Ikona krytyczna (X)
32 - Ikona Pytania. (?)
48 - Ikona Ostrzeżenia (!)
64 - Ikona informacyjna (I)

Do tego dochodzą cyfry odpowiadające za przyciski


0=OK
1=OK,ANULUJ
2=PRZERWIJ,PONÓW,IGNORUJ
3=TAK,NIE,ANULUJ
4=TAK,NIE
5=PONÓW,ANULUJ

Przykład:

x=MsgBox("AWARIA WYŁACZ KOMPUTER",4,"AWARIA!!!")

Wtedy pokaże nam się komunikat "AWARIA WYŁĄCZ KOMPUTER" z Klawiszami "Tak" i "Nie"

Gdy uzywamy ikony komunikatu, nie mamy innego przycisku niz "OK"...Zeby posiadać Ikone komunikatu i do tego przyciski np: "Tak" i "Nie" Musisz to zapisać w ten sposób


x=MsgBox("AWARIA WYŁACZ KOMPUTER",16+4,"AWARIA!!!")

16-Oznacza ikone stanu krytycznego

4-Oznacza przyciski "Tak" i "Nie"

W miejsce 16 mozna tez wpisac 32, 48, 64...PAMIĘTAJ!! zeby to zadziałało, Liczbe odpowiadającą ikonie musisz zawsze wpisywać jako pierwszą

16+4- Ikona stanu krytycznego i przyciski "Tak" i "Nie"

32+4- Ikona pytania i przyciski "Tak" i "Nie"

Myśle że pomogłem ;)

post-1085919-0-96000800-1417995940_thumb

post-1085919-0-23050200-1417995963_thumb

post-1085919-0-22224300-1417995985_thumb

post-1085919-0-33811800-1417996014_thumb

post-1085919-0-00679600-1417996042_thumb

post-1085919-0-24030100-1417996071_thumb

Share this post


Link to post
Share on other sites

A próbowałem zrobić coś takiego że po kliknięciu tak albo nie wyskakuje kolejne pytanie.

Jednak mi się udawało zrobić tylko tak że jedna odpowiedź odpowiadała innym komunikatem a druga zamykała komunikat nic nie odpowiadając. Czy da się zrobić coś takiego żeby i "tak" i "nie" zadawało kolejne pytanie?

Jeżeli napisałem nie przejrzyście to proszę o odpowiedź to postaram się napisać zrozumialej.

Z góry dziękuje za odpowiedź i pozdrawiam.

Share this post


Link to post
Share on other sites

Mam pytanie jak zrobić tak że po wyskoczeniu ostrzeżenia i kliknięcia,,OK" wyskoczy nam pytanie? 

Proszę o szybką odpowiedz po to zadanie z informatyki na jutro?

Share this post


Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.


  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...