javascript中window.confirm這個方法很好用,可以彈出一個確認對話框。

但有一個問題是,它默認的情況下,將選中那個"確定"按鈕,當用戶有意無意的在鍵盤回車,就是說按下Enter鍵的時候,就會自動返回true。在很多時候其實我們不希望這樣。
我們之所以彈出這個對話框,可能就是因為該操作很危險,所以要用戶確認。但如果默認選擇"確定",則可能違背了這個原則。
另外,confirm對話框的按鈕都是固定在"確定"和"取消"這兩個。可能有些時候也不是很直觀。
所以,可以考慮用vbscript中的msgbox來改寫這個行為。下面是一個范例
<%@ Page Language="C#" AutoEventWireup="true" CodeBehind="Default.aspx.cs" Inherits="WebApplication1._Default" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
<title></title>
<script>
function deleteConfirm(msg)
{
function window.confirm(str)
{
str= str.replace(/\'/g, "'& chr(39) &'").replace(/\r\n/g, "'& VBCrLf &'");
execScript("n = msgbox('"+ str +"', 289, '刪除框')", "vbscript");
return(n == 1);
}
return window.confirm(msg);
}
</script>
</head>
<body>
<form id="form1" runat="server">
<div>
<asp:Button ID="deleteButton" runat="server" OnClientClick="javascript:return deleteConfirm('你確定要刪除嗎?')" Text="刪除"
onclick="deleteButton_Click" />
</div>
</form>
</body>
</html>
關于msgbox 方法的具體細節,還可以參考下面的介紹
MsgBox 函數
在對話框中顯示消息,等待用戶單擊按鈕,并返回一個值指示用戶單擊的按鈕。
MsgBox(prompt[, buttons][, title][, helpfile, context])
參數
prompt
作為消息顯示在對話框中的字符串表達式。prompt 的最大長度大約是 1024 個字符,這取決于所使用的字符的寬度。如果 prompt 中包含多個行,則可在各行之間用回車符 (Chr(13))、換行符 (Chr(10)) 或回車換行符的組合 (Chr(13) & Chr(10)) 分隔各行。
Buttons
數值表達式,是表示指定顯示按鈕的數目和類型、使用的圖標樣式,默認按鈕的標識以及消息框樣式的數值的總和。有關數值,請參閱“設置”部分。如果省略,則buttons 的默認值為 0。
Title
顯示在對話框標題欄中的字符串表達式。如果省略 title,則將應用程序的名稱顯示在標題欄中。
Helpfile
字符串表達式,用于標識為對話框提供上下文相關幫助的幫助文件。如果已提供helpfile,則必須提供 context。在 16 位系統平臺上不可用。
Context
數值表達式,用于標識由幫助文件的作者指定給某個幫助主題的上下文編號。如果已提供 context,則必須提供 helpfile。在 16 位系統平臺上不可用。
設置
buttons 參數可以有以下值:
常數 | 值 | 描述 |
---|
vbOKOnly | 0 | 只顯示確定按鈕。 |
vbOKCancel | 1 | 顯示確定和取消按鈕。 |
vbAbortRetryIgnore | 2 | 顯示放棄、重試和忽略按鈕。 |
vbYesNoCancel | 3 | 顯示是、否和取消按鈕。 |
vbYesNo | 4 | 顯示是和否按鈕。 |
vbRetryCancel | 5 | 顯示重試和取消按鈕。 |
vbCritical | 16 | 顯示臨界信息圖標。 |
vbQuestion | 32 | 顯示警告查詢圖標。 |
vbExclamation | 48 | 顯示警告消息圖標。 |
vbInformation | 64 | 顯示信息消息圖標。 |
vbDefaultButton1 | 0 | 第一個按鈕為默認按鈕。 |
vbDefaultButton2 | 256 | 第二個按鈕為默認按鈕。 |
vbDefaultButton3 | 512 | 第三個按鈕為默認按鈕。 |
vbDefaultButton4 | 768 | 第四個按鈕為默認按鈕。 |
vbApplicationModal | 0 | 應用程序模式:用戶必須響應消息框才能繼續在當前應用程序中工作。 |
vbSystemModal | 4096 | 系統模式:在用戶響應消息框前,所有應用程序都被掛起。 |
第一組值 (0 - 5) 用于描述對話框中顯示的按鈕類型與數目;第二組值 (16, 32, 48, 64) 用于描述圖標的樣式;第三組值 (0, 256, 512) 用于確定默認按鈕;而第四組值 (0, 4096) 則決定消息框的樣式。在將這些數字相加以生成 buttons 參數值時,只能從每組值中取用一個數字。
返回值
MsgBox 函數有以下返回值:
常數 | 值 | 按鈕 |
---|
vbOK | 1 | 確定 |
vbCancel | 2 | 取消 |
vbAbort | 3 | 放棄 |
vbRetry | 4 | 重試 |
vbIgnore | 5 | 忽略 |
vbYes | 6 | 是 |
vbNo | 7 | 否 |
說明
如果同時提供了 helpfile 和 context,則用戶可以按 F1 鍵以查看與上下文相對應的幫助主題。
如果對話框顯示取消按鈕,則按 ESC 鍵與單擊取消的效果相同。如果對話框包含幫助按鈕,則有為對話框提供的上下文相關幫助。但是在單擊其他按鈕之前,不會返回任何值。
當MicroSoft Internet Explorer使用MsgBox函數時,任何對話框的標題總是包含"VBScript",以便于將其與標準對話框區別開來。
下面的例子演示了 MsgBox 函數的用法:
Dim MyVar MyVar = MsgBox ("Hello World!", 65, "MsgBox Example")
' MyVar contains either 1 or 2, depending on which button is clicked