这是在ASP.NET中。我们正在使用ExtJS前端,并拥有自己的VB.NET控件来制作所有Ext Forms和东西。但是,我希望这可以在普通的javascript中完成。页面上已经有一些Javascript用于“测试连接”按钮单击并处理结果。
但是,我需要在屏幕上进行验证,以确保用户在保存屏幕之前测试连接。 (在点击保存按钮之前点击测试按钮) - 他们每次访问屏幕。
以下是该页面的代码:
<%@ Page Language="VB" Inherits="Core.Web.EditBaseView" %>
<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
<title></title>
<script language="javascript" type="text/javascript">
function testConnection() {
Global.mask('Testing Connection...');
KBBConnectorController.TestConnection(function(result) { testConnectionCallback(result) });
}
function testConnectionCallback(result) {
Global.unmask();
if (result.Data.Result) {
Global.alert("Connection to KBB Successful.");
}
else {
Global.alertError(result.Data.Messages[0].Text, result.Data.ExceptionId);
}
}
function Validate() {
}
</script>
</head>
<body>
<form id="form1" runat="server">
<div style="display:none">
<% =Html.DropDownList("ddlMarketValues", TryCast(Model.MarketValues, SelectList))%>
</div>
<div>
<%
Using KBBForm As New WebControls.Forms.Form
With KBBForm
.OnValidate = "Validate"
.ID = "KBB"
.ItemName = "connector"
With .Toolbar
.UseDefaultButtons = False
.AddButton(Forms.FormToolbar.ButtonType.Save)
.AddButton(Forms.FormToolbar.ButtonType.Cancel)
.AddButton("Test Connection", "testConnection", "icon-button-testconnection", , "Test connectione")
End With
With .CenterRegion
.Id = "centerRegion"
With .AddFieldSet("Activate Service")
.Id = "activate"
.LabelWidth = 0
Dim cb As New Forms.Control("IsActive", "", "", Model.IsActive, Forms.Control.ControlType.CheckBox)
cb.BoxLabel = "Activate Service"
.AddControl(cb)
End With
With .AddFieldSet("Connection Parameters")
.Id = "params"
.LabelWidth = 150
.AddControl(New Forms.Control("UserName", "", "User Name", Model.UserName, Forms.Control.ControlType.TextField))
.AddControl(New Forms.Control("Password", "", "Password", Model.Password, Forms.Control.ControlType.Password))
.AddControl(New Forms.Control("LoginUrl", "", "URL", Model.LoginUrl))
With .AddControl(New Forms.Control("ddlMarketValues", "", "Market Value", , Forms.Control.ControlType.ComboBox))
.Id = "ddlMarketValues"
End With
End With
End With
Response.Write(.ToString)
End With
End Using
%>
</div>
</form>
</body>
</html>
正如你所看到的那样,我在其中放了一个OnValidate函数,但它是空白的,你可以看到它也与Form相关联。我试着搞砸了,但是我只能把一些东西放在一起,要求我每次点击保存都要测试,而且不知道我是否已经测试过。
有任何帮助吗?提前谢谢。
-Scott
答案 0 :(得分:0)
为什么不隐藏保存按钮,直到按下测试连接并且连接有效?
答案 1 :(得分:0)
呃,如果我理解你的话,这应该有用。
connection test
结果的代码中,设置一个标志,指示连接已经过测试。Save
按钮的处理程序中检查该标志,如果未设置,则显示某种消息,而不是实际执行保存操作。您的标志可以是全局变量,最初设置为false
,这样每次访问页面时都需要用户运行测试。
关于如何覆盖/拦截“保存”按钮处理程序...呃...猜测你必须扩展VB的东西。