Protected Sub RadGrid1_ItemCreated(sender As Object, e As Telerik.Web.UI.GridItemEventArgs)
    If e.Item.IsInEditMode Then
        Dim item As Telerik.Web.UI.GridEditableItem = TryCast(e.Item, Telerik.Web.UI.GridEditableItem)

        ' Add validator for PortalID (Non-nullable)
        Dim portalIDEditor As Telerik.Web.UI.GridTextBoxColumnEditor = CType(item.EditManager.GetColumnEditor("PortalID"), Telerik.Web.UI.GridTextBoxColumnEditor)
        AddRequiredFieldValidator(portalIDEditor.TextBoxControl, "PortalID")

        ' Add validator for asset_sn (Non-nullable)
        Dim assetSNEditor As Telerik.Web.UI.GridTextBoxColumnEditor = CType(item.EditManager.GetColumnEditor("asset_SN"), Telerik.Web.UI.GridTextBoxColumnEditor)
        AddRequiredFieldValidator(assetSNEditor.TextBoxControl, "Asset Serial Number")

        ' Add validator for asset_model (Nullable)
        Dim assetModelEditor As Telerik.Web.UI.GridTextBoxColumnEditor = CType(item.EditManager.GetColumnEditor("asset_model"), Telerik.Web.UI.GridTextBoxColumnEditor)
        AddRequiredFieldValidator(assetModelEditor.TextBoxControl, "Asset Model")

        ' Add validator for asset_location (Nullable)
        Dim assetLocEditor As Telerik.Web.UI.GridTextBoxColumnEditor = CType(item.EditManager.GetColumnEditor("asset_location"), Telerik.Web.UI.GridTextBoxColumnEditor)
        AddRequiredFieldValidator(assetLocEditor.TextBoxControl, "Location")

        ' Add validator for Fill_qty (Nullable but must be numeric if provided)
        Dim fillQtyEditor As Telerik.Web.UI.GridTextBoxColumnEditor = CType(item.EditManager.GetColumnEditor("Fill_qty"), Telerik.Web.UI.GridTextBoxColumnEditor)
        AddNumericValidator(fillQtyEditor.TextBoxControl, "Fill Quantity")

        Dim maintEditor As Telerik.Web.UI.GridDateTimeColumnEditor = CType(item.EditManager.GetColumnEditor("maint_Date"), Telerik.Web.UI.GridDateTimeColumnEditor)
        Dim actIndEditor As Telerik.Web.UI.GridCheckBoxColumnEditor = CType(item.EditManager.GetColumnEditor("active_indicator"), Telerik.Web.UI.GridCheckBoxColumnEditor)
        Dim notesEditor As Telerik.Web.UI.GridTextBoxColumnEditor = CType(item.EditManager.GetColumnEditor("Notes"), Telerik.Web.UI.GridTextBoxColumnEditor)

        ' Checks to see if items if item is 'PerformInsert' else check if it is 'UpdateButton'
        Dim buttonName As String = If(TypeOf item Is Telerik.Web.UI.IGridInsertItem, "PerformInsertButton", "UpdateButton")
        TryCast(item.FindControl(buttonName), Button).ValidationGroup = "gridFormValidation"




        Dim objConnection As SqlConnection
        Dim strSQL As String

        objConnection = New SqlConnection(ConfigurationManager.ConnectionStrings("DC2_Data_WarehouseConnectionString_PRODUCTION").ConnectionString)


        ' Insert record
        strSQL = "INSERT INTO [data_warehouse].[dbo].[t_d_ATracker] ([PortalID],[asset_SN],[Fill_Qty],[Maint_Date],[asset_location],[asset_model],[active_indicator],[Asset_Notes]) " &
                         "VALUES (@PortalID, @asset_SN, @Fill_Qty, @Maint_Date, @asset_location, @asset_model, @active_indicator, @Asset_Notes);" &
                         "SELECT CAST(scope_identity() AS int);"


        Dim cmd As New SqlCommand(strSQL, objConnection)

        ' Add parameters
        cmd.Parameters.Add("@PortalID", SqlDbType.VarChar, 10).Value = portalIDEditor.Text
        cmd.Parameters.Add("@asset_SN", SqlDbType.VarChar, 20).Value = assetSNEditor.Text
        cmd.Parameters.Add("@Fill_Qty", SqlDbType.Int).Value = System.Convert.ToInt32(fillQtyEditor)
        cmd.Parameters.Add("@Maint_Date", SqlDbType.Date).Value = maintEditor
        cmd.Parameters.Add("@asset_location", SqlDbType.VarChar, 20).Value = assetLocEditor.Text
        cmd.Parameters.Add("@asset_model", SqlDbType.VarChar, 20).Value = assetModelEditor.Text
        cmd.Parameters.Add("@active_indicator", SqlDbType.Bit).Value = actIndEditor
        cmd.Parameters.Add("@Asset_Notes", SqlDbType.VarChar, -1).Value = notesEditor.Text
    End If


End Sub
Private Sub AddRequiredFieldValidator(textBox As TextBox, fieldName As String)
    Dim validator As New CustomValidator()
    validator.ID = "CustomValidator_" & fieldName.Replace(" ", "_")
    validator.ControlToValidate = textBox.ID
    validator.ValidateEmptyText = True
    validator.ErrorMessage = String.Format("* {0} is required", fieldName)
    validator.ForeColor = Color.OrangeRed
    validator.ClientValidationFunction = "requiredFieldValidation"
    validator.ValidationGroup = "gridFormValidation"
    AddHandler validator.ServerValidate, AddressOf RequiredField_ServerValidate
    textBox.Parent.Controls.Add(validator)
End Sub

Private Sub AddNumericValidator(textBox As TextBox, fieldName As String)
    Dim validator As New CustomValidator()
    validator.ID = "CustomValidator_" & fieldName.Replace(" ", "_")
    validator.ControlToValidate = textBox.ID
    validator.ValidateEmptyText = True
    validator.ErrorMessage = String.Format("* {0} must be a numeric value", fieldName)
    validator.ForeColor = Color.OrangeRed
    validator.ClientValidationFunction = "numericFieldValidation"
    validator.ValidationGroup = "gridFormValidation"
    AddHandler validator.ServerValidate, AddressOf NumericField_ServerValidate
    textBox.Parent.Controls.Add(validator)
End Sub

Protected Sub RequiredField_ServerValidate(source As Object, args As ServerValidateEventArgs)
    args.IsValid = Not String.IsNullOrWhiteSpace(args.Value)
End Sub

Protected Sub NumericField_ServerValidate(source As Object, args As ServerValidateEventArgs)
    Dim value As String = args.Value.Trim()
    args.IsValid = String.IsNullOrEmpty(value) OrElse IsNumeric(value)
End Sub