or
<
fieldset
style
=
"float: left; width: 340px; height: 195px"
>
<
legend
>Category:
<%# CType(Container.DataItem, PropertyUtente).Category%>
</
legend
>
<
table
cellpadding
=
"0"
cellspacing
=
"0"
width
=
"95%"
>
<
tr
>
<
td
style
=
"width: 75%;"
>
<
table
cellpadding
=
"5"
cellspacing
=
"0"
>
<
tr
>
<
td
style
=
"width: 25%;"
>
Userid:
</
td
>
<
td
style
=
"width: 75%; text-align:left"
>
<%# CType(Container.DataItem, PropertyUtente).Userid%>
</
td
>
</
tr
>
<
tr
>
<
td
style
=
"width: 25%;"
>
Name:
</
td
>
<
td
style
=
"width: 75%; text-align:left"
>
<%# CType(Container.DataItem, PropertyUtente).user%>
</
td
>
</
tr
>
<
tr
>
<
td
>
City:
</
td
>
<
td
style
=
"width: 75%; text-align:left"
>
<%# CType(Container.DataItem, PropertyUtente).city%>
</
td
>
</
tr
>
<
tr
>
<
td
>
Phone:
</
td
>
<
td
style
=
"width: 75%; text-align:left"
>
<%# CType(Container.DataItem, PropertyUtente).phone%>
</
td
>
</
tr
>
<
tr
>
<
td
>
Cellular:
</
td
>
<
td
style
=
"width: 75%; text-align:left"
>
<%# CType(Container.DataItem, PropertyUtente).Cellular%>
</
td
>
</
tr
>
<
tr
>
<
td
>
</
td
>
<
td
style
=
"width: 75%; text-align:left"
>
<
asp:Button
ID
=
"Button1"
runat
=
"server"
Text
=
"Details"
/>
</
td
>
</
tr
>
</
table
>
</
td
>
<
td
style
=
"vertical-align: top; text-align: right; width: 25%;"
>
<
asp:Image
ID
=
"Image1"
runat
=
"server"
ImageUrl='<%# CType(Container.DataItem, PropertyUtente).imageprofile%>' Height="120px" Width="100px"/>
</
td
>
</
tr
>
</
table
>
</
fieldset
>
Sys.UI.DomEvent.addHandler(window, 'load',
function()
{
// My initialization stuff
}
);
<
LabelsAppearance
DataFormatString
=
"{0:F}"
>
<
TextStyle
Bold
=
"true"
Color
=
"#003366"
/>
</
LabelsAppearance
>
<
LabelsAppearance
>
<
TextStyle
Bold
=
"true"
Color
=
"#003366"
/>
</
LabelsAppearance
>
<
telerik:RadGrid
ID
=
"grdDesc"
runat
=
"server"
AutoGenerateColumns
=
"false"
>
<
MasterTableView
CommandItemDisplay
=
"Top"
EditMode
=
"InPlace"
DataKeyNames
=
"Descrip"
InsertItemPageIndexAction
=
"ShowItemOnCurrentPage"
ShowHeader
=
"false"
>
<
Columns
>
<
telerik:GridEditCommandColumn
ButtonType
=
"PushButton"
UniqueName
=
"Edit"
>
</
telerik:GridEditCommandColumn
>
<
telerik:GridBoundColumn
DataField
=
"Descrip"
UniqueName
=
"Descrip"
>
</
telerik:GridBoundColumn
>
</
Columns
>
</
MasterTableView
>
<
ClientSettings
>
<
Scrolling
UseStaticHeaders
=
"true"
AllowScroll
=
"true"
/>
</
ClientSettings
>
</
telerik:RadGrid
>
<
telerik:RadInputManager
runat
=
"server"
ID
=
"RadInputManager1"
Enabled
=
"true"
>
<
telerik:TextBoxSetting
BehaviorID
=
"TextBoxSetting1"
>
</
telerik:TextBoxSetting
>
</
telerik:RadInputManager
>
Protected
Sub
Page_Load(sender
As
Object
, e
As
System.EventArgs)
Handles
Me
.Load
...
Dim
ctxSql
As
LINQtoSQLDataContext =
New
LINQtoSQLDataContext()
If
chkDesc.Checked =
True
Then
grdDesc.Visible =
True
Dim
descrips = From c
In
ctxSql.COMBOBOXes Where c.fieldname =
"DESCRIP"
Select
New
With
{c.descrip}
grdDesc.DataSource = descrips
grdDesc.DataBind()
Else
grdDesc.Visible =
False
End
If
...
End
Sub
Protected
Sub
grdDesc_ItemCreated(
ByVal
sender
As
Object
,
ByVal
e
As
GridItemEventArgs)
Handles
grdDesc.ItemCreated
If
TypeOf
e.Item
Is
GridEditableItem
AndAlso
(e.Item.IsInEditMode)
Then
Dim
editableItem
As
GridEditableItem =
DirectCast
(e.Item, GridEditableItem)
Dim
textBox = (
DirectCast
(editableItem.EditManager.GetColumnEditor(
"Descrip"
), GridTextBoxColumnEditor)).TextBoxControl
textBox.ID =
"TextBox1"
Dim
inputSetting
As
InputSetting = RadInputManager1.GetSettingByBehaviorID(
"TextBoxSetting1"
)
inputSetting.TargetControls.Add(
New
TargetInput(textBox.UniqueID,
True
))
inputSetting.InitializeOnClient =
True
inputSetting.Validation.IsRequired =
True
End
If
End
Sub
Protected
Sub
grdDesc_InsertCommand(sender
As
Object
, e
As
Telerik.Web.UI.GridCommandEventArgs)
Handles
grdDesc.InsertCommand
Dim
ctxSql
As
LINQtoSQLDataContext =
New
LINQtoSQLDataContext()
Dim
custFileID = ctxSql.CUSTFILEs.Where(
Function
(c) c.CUSTNO = cboCustNew.SelectedValue).
Single
.CUSTFILE
Dim
newComboBox
As
COMBOBOX =
New
COMBOBOX()
newComboBox.custfile = custFileID
newComboBox.department = -1
newComboBox.fieldname =
"DESCRIP"
newComboBox.descrip =
""
ctxSql.COMBOBOXes.InsertOnSubmit(newComboBox)
End
Sub