How to make Error Messages in NotePad

Archive of the first decade of Off Topic Posts
Locked
jwdo
Rainbow Seeker
Posts: 224
Joined: Mon Apr 24, 2006 4:45 pm

How to make Error Messages in NotePad

Post by jwdo » Mon Oct 08, 2007 7:45 pm

First type:

X = MsgBox("<Box text>",<Buttons> ,"<Box title>")

Replace <Box text> with the text you want to enter.
Replace <Boc title> with the title of the box.
Replace <Buttons> with one of these numbers:

Number Effect
0 OK Button only
1 OK and Cancel buttons
2 Abort, Retry, and Ignore buttons
3 Yes, No and Cancel buttons
4 Yes and No buttons
5 Retry and Cancel buttons

16 Critical Message icon
32 Warning Query icon
48 Warning Message icon
64 Information Message icon

0 Normal message box
4096 Always stays top of the desktop

If you want to add more then one, place a + between the two numbers.
Example: 3+16 results in a message box with Yes, No and Cancel buttons and a Critical Message icon

To add more rules, press Return and add a new rule.

To save use this guide:
1. Click File, Save
2. Set 'Save as type' on All files
3. Enter your filename. Make sure it ends with .vbs

To open it, click the new file.

To change the icon, make a shortcut, go to properties and change the icon.

Have fun!!! :D

I've added two examples:

Example.vbs:
X = MsgBox("This is an Example, click on the button",0+64 ,"Example")

Example - Copy.vbs:
X = MsgBox("This is an Example, click on the button",0+64 ,"Example")
X = MsgBox("This is the second rule. Does this work?",4+32 ,"Example")

I can't add this as an attachment... :(
User avatar
Blast!10
Rainbow Star
Posts: 1739
Joined: Thu Nov 02, 2006 7:26 pm
Location: New Hampshire

Post by Blast!10 » Tue Oct 09, 2007 6:50 pm

I made some long ago, they're fun to make, though completely useless... :wink:
Locked