or
<%@ Page Language=
"VB"
AutoEventWireup=
"false"
CodeFile=
"TestBed2.aspx.vb"
Inherits
=
"TestBed2"
%>
<!DOCTYPE html>
<html xmlns=
"http://www.w3.org/1999/xhtml"
>
<head runat=
"server"
>
<title></title>
<style type=
"text/css"
>
.classDiv
{
float: left;
width: 150px;
}
.clear
{
width: 100%;
clear: both;
height: 110px;
}
</style>
</head>
<body>
<form id=
"form1"
runat=
"server"
>
<telerik:RadStyleSheetManager ID=
"RadStyleSheetManager1"
runat=
"server"
>
</telerik:RadStyleSheetManager>
<telerik:RadScriptManager ID=
"RadScriptManager1"
runat=
"server"
>
<Scripts>
<asp:ScriptReference
Assembly
=
"Telerik.Web.UI"
Name=
"Telerik.Web.UI.Common.Core.js"
>
</asp:ScriptReference>
<asp:ScriptReference
Assembly
=
"Telerik.Web.UI"
Name=
"Telerik.Web.UI.Common.jQuery.js"
>
</asp:ScriptReference>
<asp:ScriptReference
Assembly
=
"Telerik.Web.UI"
Name=
"Telerik.Web.UI.Common.jQueryInclude.js"
>
</asp:ScriptReference>
</Scripts>
</telerik:RadScriptManager>
<telerik:RadAjaxManager ID=
"RadAjaxManager1"
runat=
"server"
>
</telerik:RadAjaxManager>
<div class=
"classDiv"
>
<telerik:RadButton ID=
"RadButton16"
runat=
"server"
ToggleType=
"Radio"
ButtonType=
"StandardButton"
GroupName=
"StandardButton"
AutoPostBack=
"false"
>
<ToggleStates>
<telerik:RadButtonToggleState Text=
"Checked"
PrimaryIconCssClass=
"rbToggleRadioChecked"
/>
<telerik:RadButtonToggleState Text=
"UnChecked"
PrimaryIconCssClass=
"rbToggleRadio"
/>
</ToggleStates>
</telerik:RadButton>
</div>
</form>
</body>
</html>
protected
void
RadGrid1_NeedDataSource(
object
sender, GridNeedDataSourceEventArgs e)
{
dtValues =
new
DataTable();
dtValues.Columns.Add(
"Items"
);
dtValues.Columns.Add(
"Rate"
);
dtValues.Columns.Add(
"Quantity"
);
dtValues.Columns.Add(
"Amount"
);
RadGrid1.DataSource = dtValues;
}
protected
void
btnAdd_Click(
object
sender, EventArgs e)
{
RadGrid1.MasterTableView.IsItemInserted =
true
;
RadGrid1.MasterTableView.Rebind();
}
protected
void
RadGrid1_ItemCreated(
object
sender, GridItemEventArgs e)
{
if
(e.Item
is
GridEditFormInsertItem && e.Item.OwnerTableView.IsItemInserted)
{
GridEditFormInsertItem insertItem = (GridEditFormInsertItem)e.Item;
RadComboBox combo = insertItem.FindControl(
"RadComboBox1"
)
as
RadComboBox;
combo.AutoPostBack =
true
;
combo.SelectedIndexChanged +=
new
RadComboBoxSelectedIndexChangedEventHandler(combo_SelectedIndexChanged);
Button Save = insertItem.FindControl(
"btnSave"
)
as
Button;
Save.Click +=
new
EventHandler(Save_Click);
Button cancel = insertItem.FindControl(
"btnCancel"
)
as
Button;
cancel.Click +=
new
EventHandler(Cancel_Click);
}
}
protected
void
Cancel_Click(
object
sender, EventArgs e)
{
Button Cancel = (Button)sender;
GridEditFormInsertItem insertItem = (GridEditFormInsertItem)Cancel.NamingContainer;
RadComboBox combo = insertItem.FindControl(
"RadComboBox1"
)
as
RadComboBox;
Label lblRate = (Label)insertItem.FindControl(
"lblRate"
);
RadNumericTextBox txtQauntityE = (RadNumericTextBox)insertItem.FindControl(
"txtQuantityE"
);
Label lblAmount = (Label)insertItem.FindControl(
"lblAmount"
);
combo.SelectedIndex = -1;
lblRate.Text =
""
;
txtQauntityE.Text =
""
;
lblAmount.Text =
""
;
RadGrid1.MasterTableView.IsItemInserted =
false
;
RadGrid1.MasterTableView.Rebind();
}
protected
void
Save_Click(
object
sender, EventArgs e)
{
Button Save = (Button)sender;
GridEditFormInsertItem insertItem = (GridEditFormInsertItem)Save.NamingContainer;
RadComboBox combo = insertItem.FindControl(
"RadComboBox1"
)
as
RadComboBox;
Label lblRate = (Label)insertItem.FindControl(
"lblRate"
);
RadNumericTextBox txtQauntityE = (RadNumericTextBox)insertItem.FindControl(
"txtQuantityE"
);
Label lblAmount = (Label)insertItem.FindControl(
"lblAmount"
);
if
(combo.SelectedIndex > 0 && txtQauntityE.Text !=
null
)
{
DataRow drValues = dtValues.NewRow();
drValues[
"Items"
] = combo.SelectedItem.Text;
drValues[
"Rate"
] = lblRate.Text;
drValues[
"Quantity"
] = txtQauntityE.Text;
drValues[
"Amount"
] = lblAmount.Text;
dtValues.Rows.Add(drValues);
dtValues.AcceptChanges();
RadGrid1.DataSource = dtValues;
RadGrid1.Rebind();
RadGrid1.MasterTableView.IsItemInserted =
false
;
RadGrid1.MasterTableView.Rebind();
}
else
{
}
}
protected
void
combo_SelectedIndexChanged(
object
o, RadComboBoxSelectedIndexChangedEventArgs e)
{
RadComboBox combo = (RadComboBox)o;
GridEditFormInsertItem insertItem = (GridEditFormInsertItem)combo.NamingContainer;
Label lblRate = (Label)insertItem.FindControl(
"lblRate"
);
SqlConnection conn =
new
SqlConnection(ConfigurationSettings.AppSettings[
"conn"
].ToString());
SqlCommand cmd =
new
SqlCommand(
"select [Rate] FROM [tblProducts] where ProductName=@ProductName"
, conn);
cmd.Parameters.Add(
new
SqlParameter(
"@ProductName"
, combo.SelectedValue));
SqlDataAdapter da =
new
SqlDataAdapter(cmd);
DataSet ds =
new
DataSet();
da.Fill(ds);
if
(ds.Tables[0].Rows.Count > 0)
{
lblRate.Text = ds.Tables[0].Rows[0].ItemArray.GetValue(0).ToString();
}
RadNumericTextBox Quantity = (RadNumericTextBox)insertItem.FindControl(
"txtQuantityE"
);
Quantity.Focus();
}
protected
void
RadGrid1_ItemDataBound(
object
sender, GridItemEventArgs e)
{
if
(e.Item
is
GridEditFormInsertItem && e.Item.OwnerTableView.IsItemInserted)
{
GridEditFormInsertItem insertItem = (GridEditFormInsertItem)e.Item;
}
}
'Enter Branch Office name for LookUp
'''vSearchedit = "name:=ctl00\$c\$NameTextBox
Browser(vBrowser).Page(vPage).WebEdit(vSearchEdit).Click
Wait 1
'Browser(vBrowser).Page(vPage).WebEdit(vSearchEdit).Set brNameIn
'Browser(vBrowser).Page(vPage).WebEdit(vSearchEdit).Type brNameIn
'Browser(vBrowser).Page(vPage).WebEdit(vSearchEdit).Object.Value = brNameIn
'Browser(vBrowser).Page(vPage).WebEdit(vSearchEdit).Object.Click
' ''''have to use this ReplayType technique gotta love telerik
Setting.WebPackage(
"ReplayType"
) = 2
Browser(vBrowser).Page(vPage).WebEdit(vSearchEdit).set brNameIn
Setting.WebPackage(
"ReplayType"
) = 1
Wait 1
Browser(vBrowser).Page(vPage).WebEdit(vSearchEdit).Click
Wait 1
didSet = Browser(vBrowser).Page(vPage).WebEdit(vSearchEdit).GetROProperty(
"value"
)
If
didSet <>
""
Then
Wait 1
'Press the Search button
Browser(vBrowser).Page(vPage).WebButton(
"name:=Search"
).Click
Else
Reporter.ReportEvent micFail,
"Set Entity Search"
,
"Unable to set the search value. Check your code!!!!"
ExitTestIteration
End
If
<
span
class
=
"riSingle RadInput RadInput_Office2007"
id
=
"ctl00_c_NameTextBox_wrapper"
style
=
"width: 180px;"
><
input
name
=
"ctl00$c$NameTextBox"
tabIndex
=
"2"
class
=
"riTextBox riEnabled"
id
=
"ctl00_c_NameTextBox"
style
=
"width: 165px;"
type
=
"text"
size
=
"20"
_events
=
"[object Object]"
control
=
"[object Object]"
RadInputValidationValue
=
""
/><
input
name
=
"ctl00_c_NameTextBox_ClientState"
id
=
"ctl00_c_NameTextBox_ClientState"
type
=
"hidden"
autocomplete
=
"off"
value
=
'{"enabled":true,"emptyMessage":"","validationText":"","valueAsString":""}'
/></
span
>