Somebody know how to do a Yes/No alert or msgbox?
And explain how to use please

code:

---

var result = Interop.Call('user32', 'MessageBoxW', 0, 'Main message text', 'Title text',4);

---

Hi Hit !!

To make a Yes/no msgbox, I will use my Basic knowledge to explain it to you

code:

---

Val=Interop.Call("User32.dll", "MessageBoxW", WndHandle,'Message','Title', Param);

// WndHandle can set to 0 if MsgBox is not attached to a window
// Param :
// 4 = MB_YESNO
//
// 16 = MB_ICONERROR
// 48 = MB_ICONEXCLAMATION
// 32 = MB_ICONQUESTION
// 64 = MB_ICONINFORMATION
//
// So, if you want a Yes/No MsgBox with an error icon, Param=4|16
//
// If Yes button pressed : Val=6
// If No button pressed : Val=7

---

Whoow thx both
Fast!
But is it
If( val == 6) Then???

code:

---

var Val=Interop.Call("User32.dll", "MessageBoxW", 0,"Message","Title", 4|32);

if (Val==6) { // Yes
    // ....
}
else if (Val==7) { // No
    // ....
}

---

Yes thx it works
One more question you know how to block something sending
So if i type something it wont send if you click no

quote:

---

Originally posted by Hit
One more question you know how to block something sending
So if i type something it wont send if you click no

---

code:

---

function OnEvent_ChatWndSendMessage(ChatWnd,Message) {
    var Val=Interop.Call("User32.dll", "MessageBoxW", ChatWnd.Handle,"Message","Title", 4|32);
    if (Val==6) { // Yes
        return Message;
    }
    else if (Val==7) { // No
        return "";
    }
}

---

code:

---

function OnEvent_ChatWndSendMessage(ChatWnd,Message) {
    if (Message=="MyMessage") {
        var Val=Interop.Call("User32.dll", "MessageBoxW", ChatWnd.Handle,"Message","Title", 4|32);
        if (Val==6) { // Yes
            return Message;
        }
        else if (Val==7) { // No
            return "";
        }
    }
return Message;
}

---

You mean, if the user tries to send a message it'll display a box and if the box result is No, it shouldn't send it?
Very easy, just let it return nothing!

code:

---

} else if(Val == 7) {
   return;
}

---

thx i finaly done my sure to send project
If i do return;
It still sends if i do return ""; message is gone it most stay there

quote:

---

Originally posted by Hit
thx i finaly done my sure to send project
If i do return;
It still sends if i do return ""; message is gone it most stay there

---

k
You may know an option it holds data so
If( Message == "!Sure Off"){
savedata("off")}

If(getdata("off")){
}

You know some option?

quote:

---

Originally posted by Hit
k
You may know an option it holds data so
If( Message == "!Sure Off"){
savedata("off")}

If(getdata("off")){
}

You know some option?

---

I just want to place data some where

Somewhere.... hummm....

code:

---

// On a variable
Variable = "off"

---

code:

---

// On registry
shell=new ActiveXObject("WScript.Shell");
// Store the value
shell.RegWrite(MsgPlus.ScriptRegPath+Messenger.MyUserId+'\\Off',"1");
// Key : HKEY_CURRENT_USER\Software\Patchou\Messenger Plus! Live\GlobalSettings\Scripts\<Script Name>\Settings\<UserID>\
// Name : Off
// Get the value
try {value=shell.RegRead(MsgPlus.ScriptRegPath+Messenger.MyUserId+'\\Off');}
catch(err) {value="0";} // If the key does not exist, value="0"
MsgPlus.DisplayToast("",value); // Verification

---

quote:

---

Originally posted by Mattike

quote:

---

Originally posted by Hit
thx i finaly done my sure to send project
If i do return;
It still sends if i do return ""; message is gone it most stay there

---

Hmm, strange. I saw scripts just sending nothing with the return... But if that wouldn't work, I suggested you to use return "" anyway.

---

Hi Hit,

I tested your script, and I have a suggestion :

Your script :

code:

---

function OnEvent_ChatWndSendMessage(ChatWnd,Message) {
    var Val=Interop.Call("User32.dll", "MessageBoxW", 0,"Are you sure, you want to send:" + Message,"Sure?", 4|32);
    if (Val==6) { // Yes
        // ....
    }
    else if (Val==7) { // No
      return "";
    }
}

---

code:

---

function OnEvent_ChatWndSendMessage(ChatWnd,Message) {
    var Val=Interop.Call("User32.dll", "MessageBoxW", ChatWnd.Handle,"Are you sure, you want to send:" + Message,"Sure?", 4|32);
    if (Val==6) { // Yes
        return; // Not compulsory, but for the understanding
    }
    else if (Val==7) { // No
      return "";
    }
}

---

* RaceProUK coughs
var result = confirm("Ask your question here");
* RaceProUK coughs

Edit: Hmm, seems I was looking at an HTML resource. Damn.

Edit 2: Since MsgBox is defined in VBScript, is there a way to get JScript to use it?

quote:

---

Originally posted by RaceProUK
* RaceProUK coughs
var result = confirm("Ask your question here");
* RaceProUK coughs

---

quote:

---

Originally posted by CookieRevised

quote:

---

Originally posted by Mattike

quote:

---

Originally posted by Hit
thx i finaly done my sure to send project
If i do return;
It still sends if i do return ""; message is gone it most stay there

---

Hmm, strange. I saw scripts just sending nothing with the return... But if that wouldn't work, I suggested you to use return "" anyway.

---

returning nothing and returning nothing are two different things ()...

If a script wants to change the send text it should do:
    return "change text";

If a script wants to send 'nothing' (mind the quotes; as you do send something: an empty string, that's not nothing). In other words cancel what has been send:
    return "";

If a script wants to do nothing. Thus not cancelling the message, nor changing it:
    return;
(and as such this can be left out in the function too, as a function will return anyways if it ends)


It always has been like this and every script does it like this...

---

With all due respect (so don't get me wrong), but I'm not certain if such scripts should be accepted in the database.

Reason: poorly written. So why not including it:
1) People who know how to script will also know how to do this simple function for themselfs.
2) People who do not know how to script (and want to learn scripting by looking at such simple scripts) will not learn proper formatting their scripts or why something is done, etc...

code:

---

function OnEvent_ChatWndSendMessage(ChatWnd,Message)
{


var Val=Interop.Call("User32.dll", "MessageBoxW", 0,"Are you sure, you want to send:" + Message,"Sure?", 4|32);

if (Val==6) { // Yes
    // ....
}
else if (Val==7) { // No
  return "";
}

}

---

code:

---

function OnEvent_ChatWndSendMessage(ChatWnd, Message)
{
    If (Interop.Call("User32.dll", "MessageBoxW", ChatWnd.Handle, "Are you sure you want to send:\n" + Message, "Confirm", 36) === 7) return "";
}

---

code:

---

function OnEvent_ChatWndSendMessage(ChatWnd, Message)
{
        // Define constants to make up the message box
        var MB_ICONQUESTION = 32;
        var MB_YESNO = 4;

        // Define constants which can be returned
        var IDYES = 6;
        var IDNO = 7;

        // Show confirmation box
        // Note: We attached the chat window handle (ChatWnd.Handle) to make this message box a child of the chat window.
        //       In that way, you can't use the chat window any further until the message box is answered.
        // Note: We define a YES/NO message box (MB_YESNO) and show a question icon (MB_ICONQUESTION) by binary adding the constants with the OR function.
        var Result = Interop.Call("User32.dll", "MessageBoxW", ChatWnd.Handle, "Are you sure you want to send:\n" + Message, "Confirm", MB_YESNO | MB_ICONQUESTION);
   
        // Check the returned result
        switch(Result) {
                // User pressed 'yes', so simply return without doing anything
                case IDYES: return;
                // User pressed 'no', so return the new message being an empty string; nothing will be send
                case IDNO: return "";
        }
}
// More info in the MSDN Library:
//http://search.msdn.microsoft.com/search/Redirect.aspx?title=MessageBox+Function&url=http://msdn.microsoft.com/library/en-us/winui/winui/windowsuserinterface/windowing/dialogboxes/dialogboxreference/dialogboxfunctions/messagebox.asp

---