2012-08-03 90 views
1

我已經創建了一個VBScript函數OnRefreshList(),它在點擊「Refresh List」按鈕時被調用。要點擊Enter鍵調用VBScript函數?

Sub OnRefreshList() 

Initdatatable(false) 

if ReadFilters() = false then 
    msgbox "It is not possible to refresh the whole orders list. Please enter more filters" 
    exit sub 
end if 

End Sub 

「刷新列表」按鈕被定義爲

<td class="button cmd" valign="center" nowrap id="cmdRefresh" onclick="OnRefreshList()" title="Refresh the order list">Refresh List</td> 

此功能工作正常,當我點擊按鈕。

現在我想在按鍵盤上的Enter鍵的時候調用這個函數。

爲此,我嘗試更改下面的一段代碼,但它沒有爲我工作。

<td class="button cmd" valign="center" nowrap id="cmdRefresh" onKeydown="vbscript: if (event.keyCode==13) then OnRefreshList()" onclick="OnRefreshList()" title="Refresh the order list">Refresh List</td> 

如果有人有答案,請幫助我。

回答

1

您的onKeydown事件中沒有正確的VBScript語句。它應該是:

onKeydown="vbscript: if event.keyCode=13 then OnRefreshList()" 

注意單個=符號和缺少括號(它們不是強制性的)。如果您對javascript更加熟悉:您可以混合使用VBScript和Javascript:

onKeydown="javascript: if (event.keyCode==13) OnRefreshList(); //this will work too!"